tendo o TBROWSE abaixo como eu faço para pegar o resultado de uma coluna, observando que hora o TBROWSE tem 3 colunas hora tera 10 colunas depende do array SGC020101FIELDS, em clipper 5.3 eu faço assim:
FOR nContFor := 1 TO len( SGC020101FIELDS )
xVal := Eval( oBro:GetColumn( nContFor ):Block )
alert(xVal)
*a cada coluna vai mostrar o resultado dela
NEXT nContFor
como fazer em minigui, pergunto porque colocando a mesma linha da erro em Block
Error BASE/1004 Message not found: TSCOLUMN:BLOCK
DEFINE TBROWSE oBROW AT 100,005 OF SGC020101FORM ALIAS 'CLIENTES'
WIDTH LARGURA020101 - 15 ; HEIGHT ALTURA020101 - 160 FONT "Arial" SIZE 10
f := Len( SGC020101FIELDS )
FOR W := 1 TO f STEP 1
ADD COLUMN TO BROW020101 HEADER SGC020101TITULO[W] SIZE
SGC020101TAMANHO[W] FOOTER "";
PICTURE IIF( SGC020101TIPO[W] == "N", SGC020101PICTURE[W], "@!" ) ;
DATA FieldWBlock( SGC020101FIELDS[W], Select( "CLIENTES" ) ) ;
ALIGN IIF( SGC020101TIPO[W] == "C", DT_LEFT , IIF( SGC020101TIPO[W] ==
"N", DT_RIGHT , DT_CENTER ) ) , ; nMakeLong( DT_CENTER, 3 )
BROW020101:UPSTABLE( )
BROW020101:lNoResetPos := .t.
BROW020101:SETFOCUS( .T.)
BROW020101:DRAWSELECT( )
BROW020101:lHasChanged := .T.
BROW020101:Paint()
BROW020101:ResetVScroll(.F.)
END TBROWSE
FOR nContFor := 1 TO len( SGC020101FIELDS )
???????????????????????
NEXT nContFor