FiveTech Software tech support forums

... FOOTERS LINES CELL NOBORDER ; BACKGROUND aQueGrad VERTICAL // COLSIZES 90,50,120,60,120,40,40,100,60,100 OF oDlg ; oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr := .f. oBrw:lHScroll := .f. oBrw:nHeadStrAligns := ...

... @0,0 XBROWSE oBrw OF aWnd ; DATASOURCE oQry ; COLUMNS aCols ; LINES CELL FASTEDIT PIXEL WITH OBJECT oBrw :bClrRowFocus := oBrw:bClrSelFocus :nRowHeight := 25 :nHeaderLines := 4 :nHeaderHeight := 60 :oHeaderFonts := oFont :nFooterHeight := 20 :nFooterLines := 2 :oFooterFonts := eFont :nFreeze ...

It is :

:nRowHeight:= if(hBrw["RIJHOOGTE"]>0,hBrw["RIJHOOGTE"],h_system["BRW_RIJHOOGTE"])

... OF oWnd ; DATASOURCE oQry ; COLUMNS aCols ; LINES CELL AUTOSORT SIZE -10,-10 PIXEL FONT oFont WITH OBJECT oBrw :bClrRowFocus := oBrw:bClrSelFocus :nRowHeight := 25 :nHeaderLines := 4 :nHeaderHeight := 70 :oHeaderFonts := oFont :nFooterHeight := 20 :nFooterLines := 2 :nStretchCol := 3 :lAllowColHiding ...

... 60,100,310,40; PICTURE "","","",""; ARRAY acDescriptor UPDATE FOOTERS LINES AUTOCOLS CELL olbx101c:nRowHeight := 25 olbx101c:acols[3]:nEditType:= EDIT_GET olbx101c:acols[3]:cEditPicture:="@!" olbx101c:acols[3]:bEditWhen:= { || olbx101c:aArrayData[olbx101c:nArrayAt][5]="C" ...

Buenas noches.
Necesito cambiar el alto de la linea o registro que muestra un listbox a lo que trae por defecto.
lo que en un xbrowse se haria asi:

oBrw:nStretchCol := 2
oBrw:nRowHeight := 30
oBrw:nMarqueeStyle := 4


Como se puede hacer en listbox?

Gracias

... JUSTIFY .f.,.f.,.t.,.t.,,.t.,.t.,,.t.,.t.,.f. ; ALIAS cAlias FOOTERS LINES CELL NOBORDER ; BACKGROUND aQueGrad VERTICAL oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 oBrw:nRowDividerStyle := 2 // color gris y fino la division de columnas oBrw:nColDividerStyle := 0 // color ...

Hey Rick,

Do you want a extra hor.scroll bar ? Not seen on the forum yet.

For the standart :

oBrw:nRowHeight := 40 // and use a larger font
oBrw:lHScroll := .T.

but I think you are looking for something else ...

WITH OBJECT oBrw
:nRowHeight := 25
:nHeaderLines := 3
END

... dblCLICK ( lsavek := .t., oDlgSTK:End() ) obrw:bKeyDown = { | nKey, nCol, nFlags | iif( nKey = K_ENTER, ( lsavek := .t., oDlgSTK:End() ), ) } oBrw:nRowHeight := 35 REDEFINE BTNBMP 2007 prompt HB_UTF8CHR( 57611 ) + " Confirma " font oSegoe ID 120 OF oDlgStk ACTION ( lsave := .t., oDlgSTK:End() ...

... el foco oBrw:lColDividerComplete := (.t.) // (.T.) Mantiene siempre llena la pantalla oBrw:nHeaderHeight := 35 // Altura de los encabezados oBrw:nRowHeight := 25 // Altura del renglón oBrw:nHeaderLines := 3 // Número de líneas de encabezados oBrw:nDataLines := 2 // Número de líneas de detalle ...

... olbx1:nRowDividerStyle := LINESTYLE_BLACK olbx1:lallowrowsizing :=.f. olbx1:setcolor(rgb(0,0,0),rgb(255,255,206)) olbx1:nRowHeight := 27 oLbx1:acols[1]:lMergevert:=.t. Imagen https://drive.google.com/file/d/1BZfNI0KHL-ax-1n5aYod_eDHdac1lvnR/view?usp=drive_link ...

... ; JUSTIFY .T.,.f.,.f.,.t. ; ALIAS cAlias AUTOSORT FOOTERS LINES CELL NOBORDER ; Font oFont; BACKGROUND aGrad VERTICAL oBrw:nStretchCol := 2 oBrw:nRowHeight := 30 oBrw:nMarqueeStyle := 4 // anulo el doble color d los registros oBrw:lContrastClr := .f. // quitar barra horizontal oBrw:lHScroll := ...

... of the browse. i.e., during runtime, it is never used and changing the values does not do anything. During runtime, you can change the data oBrw:nRowHeight. thanks run correctly this is only a test one row https://i.postimg.cc/tgNsGyTP/onerow.png two rows https://i.postimg.cc/3xgR2726/two-rows.png

nDataLines is used by xbrowse only while creating the browse for the first time for calculating the row height. After creation of the browse. i.e., during runtime, it is never used and changing the values does not do anything.
During runtime, you can change the data oBrw:nRowHeight.