Prt_Fld := Format('%-11.10s%03d-%02d %-25.24s%-19.18s%-19.18s%-11.10s%-35.34s%16.15s%16.15s%16.15s',
[ Copy(FieldByName('SLIP_DATE' ).AsString,1,4)+'-'+
Copy(FieldByName('SLIP_DATE' ).AsString,5,2)+'-'+
Copy(FieldByName('SLIP_DATE' ).AsString,7,2) ,
FieldByName('SLIP_NO' ).AsInteger ,
FieldByName('SLIP_SEQ' ).AsInteger ,
FieldByName('CUST_NAME' ).AsString ,
FieldByName('ITEM_NAME1').AsString ,
FieldByName('ITEM_NAME2').AsString ,
FieldByName('ITEM_NAME3').AsString ,
FieldByName('REMARKS' ).AsString ,
FormatFloat('#,###', FieldByName('DR_AMT' ).AsFloat) ,
FormatFloat('#,###', FieldByName('CR_AMT' ).AsFloat) ,
FormatFloat('#,###', FieldByName('BALANCE_AMT').AsFloat) ] );
LPrint(Prt_Fld, 1);
위와 같이 리스트박스에 데이타들을 쭉~~~ 나열합니당...
한줄한줄사이사이에 줄을 넣고 싶은데.. 어케 해야 하져??
아님 데이타5줄다음 라인.. 이런식으러.. 어케 해야 할지 몰겠떠여...