Executar Comando no Tbrowse
Enviado: 11 Nov 2004 08:29
Tbrow := {}
tbrow[1,1] := tes_codi
tbrow[1,2] := C
tbrow[1,3] := 10
tbrow[1,4] := 'Codigo'
tbrow[1,5] := ''
tbrow[2,1] := tes_valo
tbrow[2,2] := N
tbrow[2,3] := 10,2
tbrow[2,4] := 'Valor'
tbrow[2,5] := 'transform(tes_valo,"@e 999,999.99")'
FOR N := 1 TO LEN(TBROW) // ADICIONA UMA COLUNA
OB:ADDCOLUMN(TBCOLUMNNEW(ALLTRIM(TBROW[N,4]),iif(TBROW[N,5]=="",FIELDBLOCK(TBROW[N,1]),FIELDBLOCK(TBROW[N,5]))))
Next
Pessoal, é o seguinte:
Nesse FOR é que eu monto meu Tbrowse(isso é apenas um exemplo).
Gostaria de saber se tem como executar um comando(tbrow[2,5]) dentro do FOR, ja tentei por de tudo e nada.
Obrigado pela ajuda
tbrow[1,1] := tes_codi
tbrow[1,2] := C
tbrow[1,3] := 10
tbrow[1,4] := 'Codigo'
tbrow[1,5] := ''
tbrow[2,1] := tes_valo
tbrow[2,2] := N
tbrow[2,3] := 10,2
tbrow[2,4] := 'Valor'
tbrow[2,5] := 'transform(tes_valo,"@e 999,999.99")'
FOR N := 1 TO LEN(TBROW) // ADICIONA UMA COLUNA
OB:ADDCOLUMN(TBCOLUMNNEW(ALLTRIM(TBROW[N,4]),iif(TBROW[N,5]=="",FIELDBLOCK(TBROW[N,1]),FIELDBLOCK(TBROW[N,5]))))
Next
Pessoal, é o seguinte:
Nesse FOR é que eu monto meu Tbrowse(isso é apenas um exemplo).
Gostaria de saber se tem como executar um comando(tbrow[2,5]) dentro do FOR, ja tentei por de tudo e nada.
Obrigado pela ajuda