thisform.lstseq.rowsource = "" SELECT TRANSFORM(sequ_che,'@L 9-99')+' - '+STR(banc_che,3,0)+' - '+STR(nume_che,6,0)+' - '; +TRANSFORM(valo_che,'99,999.99')+' - '+DTOC(data_che)+' - '+STR(alin_che,2,0)+; ' - '+IIF(situ_che=1,'Aberto ',IIF(situ_che=2,'Quitado','Perda '))+' - '+DTOC(dtre_che); +' - '+IIF(prot_che=.t.,'P',' ') AS cheque ; FROM cheques_devolvidos ; WHERE ncon_che = .txtncon_che.value ; ORDER BY sequ_che ; INTO CURSOR ler_che thisform..lstseq.rowsource = "ler_che"Ou ainda voce pode utilizar:
i1=0 with thisform..lstseq scan i1=i1+1 .additem(TRANSFORM(sequ_che,'@L 9-99')) .listitem(i1, 2) = STR(banc_che,3,0) .listitem(i1, 3) = STR(nume_che,6,0) *.... * endscan endwith