Textdatei erstellen / Umsetzung

[sniper_w]

Hmm..hab nicht ganz verstanden...
Vielleicht so ?

Delphi-Quellcode:

while not Form1.table1.eof do
begin
  Form1.table1.Indexname:='auswahlname';
  if CheckBox1.Checked = true then
             s:=' ' + Form1.Table1.FieldByName('Name').AsString ;
  if CheckBox2.Checked = true then
            s := s + ',' + Form1.Table1.FieldByName('Name').AsString +','+#13+#10;
  WriteLn(f, s);
  Form1.table1.next;
end;