Help.... Gmn cara nge-print data dari file txt ke program Delphi di Quick Report? Misalnya: Saya punya data bentuk txt yang isinya seperti ini : ANDI, JL JAKARTA 21, BANDUNG, 0813XXXXX, SINGLE Gimana cara mendeteksinya berdasarkan field n barisnya? Gimana statementnya? Trims all of you...

tampilan cetak spt apkah yg anda inginkan? mohon diperjelas apakah spt ini ANDI, JL JAKARTA 21, BANDUNG, 0813XXXXX, SINGLE untuk mencetak apa adanya anda bisa menggunakan komponen QRMemo.

Maksudnya membaca per line dan per kata. Jadi membaca "ANDI" dan "JL JAKARTA 21" walaupun dalam 1 baris. Untuk tampilan dari Notepad misalnya seperti ini : ANDI, JL JAKARTA 21, BANDUNG, 0813XXXXX, SINGLE dan ingin ditampilkan di Quick Reportnya sesuai keinginan tergantung kita meletakkan QRLabel- nya di mana... Trims

[pas] type TResultParsing = record nama : string; alamat : string; kota : string; nohp : string; status : string; end; function parsingbaris(baris :String) : TResultParsing; var list : TstringList; i : integer; begin list := TstringList.create; for i := 1 to length(baris) do if baris[i] = ',' then baris[i] :=#13; List.Text := baris; with result do begin nama := trim(List[0]); alamat := trim(List[1]); kota := trim(List[2]); nohp := trim(List[3]); status := trim(List[4]); end; List.Free; end; 1. kamu harus bs misah misah field, di atas adalah koding untuk memisahkan (parsing) dengan format seperti diatas. 2. bs pake opsi bikin tabel temporary..... 3. bikin detail band pada quick report dengan dataset dr tabel temporary tsb M'ga membantu