FiveTech Software tech support forums

oLbx:ReSize( nSizeType, nWidth, nHeight )


Hello Antonio,

I can’t find out how to ReSize a listbox.
What do I have to pass as nSizeType?

Thanks in advance
Otto

Otto,

You can use:

oControl:SetSize( nWidth, nHeight [, lRepaint ] )

or

oControl:nHeight = nNewHeight
oControl:nWidth = nNewWidth

Hello Antonio,
thank you.
Best regards,
Otto

Ciao,
come posso colorare una colonna listbox
Help

Lisa,

Do you mean a browse column ?

Te refieres a una columna de un browse ?

In una listbox visualizzo nome,cognome,indirizzo,città
vorrei che tutta la colonna città fosse di un colore diverso
Ciao

Purtroppo il termine "listbox" indica almeno due controlli diversi in FWH: uno è la listbox standard di Windows, quella che va precaricata con i dati e non si aggancia quindi al database, l'altro è il TWBrowse che invece si aggancia al database (o ad altre sorgenti di dati).

Tu quale intendi? In ogni caso, il browse si può colorare ma la listbox standard no, che io sappia.

EMG

Forse mi spiego meglio utilizzando un esempio di Fivewin.
Vorrei colorare di verde la colonna rappresentante il campo "User Id".
Se non è possibile usare ListBox, potrei avere un esempio di come fare altrimenti?
Grazie

DEFINE DIALOG oDlg FROM 3, 3 TO 26, 79 TITLE cTitle

@ 0, 1 SAY cListName OF oDlg

@ 1, 1 LISTBOX oLbx FIELDS USER->Name, USER->User, USER->Title ;
HEADERS "User Name", "User Id", "User Title" ;
SIZE 284, 137 OF oDlg

@ 13, 8 BUTTON btnModify PROMPT "&Modify" OF oDlg SIZE 40, 12
@ 13, 15 BUTTON btnDelete PROMPT "&Delete" OF oDlg SIZE 40, 12
@ 13, 22 BUTTON btnSearch PROMPT "&Search" OF oDlg SIZE 40, 12
@ 13, 29 BUTTON btnEnd PROMPT "&Exit" OF oDlg SIZE 40, 12

ACTIVATE DIALOG oDlg

RETURN( NIL )

Ok, quello è un TWBrowse. Lo riconosci dalla clausola FIELDS. Per colorare la seconda colonna puoi usare qualcosa del genere:

Code: Select all  Expand view

oLbx:nClrPane = { | nCol | If( nCol = 2, CLR_HGREEN, ) }

EMG