xBROWSE column only shows three dots ...

[Rick Lipkin]

To All

I am having a dificult time understanding why this one folder with an xbrowse list box is showing up only three dots in the EmailTo column .. see code and screen shot .. The data is not that wide and it showed up perfectly under the standard FWH listbox twbrowse class ??

Varchar(max) seemed to work with twbrowse .. but it may be giving xbrowse a problem .. is there a way to substr(email_to) to give it a fixed width in xBrowse ?

Any Ideas ??

Rick Lipkin

Code: Select all  Expand view

 //----- email tab

    REDEFINE xBROWSE oLbx2      ;
    RECORDSET oRsMail           ;
    ID 111 of oFld1:aDialogs[3] ;
    COLUMNS 'date_sent',        ;
            'email_from',       ;
            'email_to',         ;
            'subject'           ;
    COLSIZES 80,160,160,100     ;
    HEADERS 'DateSent',         ;
            'EmailFrom',        ;
            'EmailTo',          ;
            'Subject'           ;
    AUTOSORT AUTOCOLS LINES CELL


    olBx2:nRowHeight := 15
    oLbx2:bLDblClick := { |nRow,nCol | _VIEWMAIL( "V", oRsMail:Fields("message"):Value  ) }
 

[/url]

[nageswaragunupudi]

Mr. Rick

XBrowse shows "..." where the Type is not understood by XBrowse.

oRsMail:Fields( "mail_to" ):Type returns a number.

Can you please insert this line MsgInfo( oRsMail:Fields( "mail_to" ):Type ) and tell me the the Type number?

[Rick Lipkin]

Rao

It definitly has to do with the type .. when I change the "email_to" field to Char it xBrowse works just fine .. however what was unique .. the twrowse fwh class did not have a problem with identifying the type ..

Here is what you are looking for :

Rick

[nageswaragunupudi]

I sent a personal email to your new address rl.1955@live.com.
The mail could not be delivered.
Can you please send a copy of your version's xbrowse.prg (zipped) to my personal email?

nageswaragunupudi at gmail dot com

[nageswaragunupudi]

Mr Rick

You need to make this small modification to your copy of xbrowse.prg in the folder \fwh\source\classes

Please locate this line of code

Code: Select all  Expand view

  CASE ASCAN( { 8,128,129,130,200,202,204,205 }, nType ) > 0
 

This list does not contain 201.
Please add 201 also in this list and compile xbrowse.prg.
I made this change in my copy and tested with VarChar(MAX) on my SQLSERVER. It is now working here.

[Rick Lipkin]

Rao

Thanks .. I did not see this last post .. I did send you my e-mail just a few min ago .. good to here from you once again !!

Your fix worked ... hope the correction can be made to the next version of FWH !!





Regards,

Rick Lipkin
r1.1955@live.com

[Antonio Linares]

Rick,

Yes, it will be included