Datensätze in TStringlist einfügen

[Sternenmaedchen]

Vielen Dank euch beiden

Ich habe es doch noch selbst hinbekommen, hatte nicht daran
gedacht das ich bei meiner TwwTable direkt auf die Felder zugreifen kann.

Meine Vorläufige Lösung (vielleicht nicht perfekt aber sie funktioniert erstmal ^^):

Delphi-Quellcode:

procedure TProzedurname.BtnButtonClick(Sender: TObject);
var
  liste : TStringlist;
begin

  liste := TStringlist.create;
  TblSelData.disableControls;
  TblSelData.first;

  While not TblSelData.EOF do
  begin
    if TblSelDataAusw.value = 'J' then
    Begin
      liste.Add(TblSelDataIrgendwas.value);
    End;
      TblSelData.next;
  end;

    liste.SavetoFile('test.text');
    liste.Free;
    TblSelData.enableControls;

end;

Ich wünsche euch allen noch einen schönen Tag =)

[s-off]

Du solltest alles zwischen dem Erzeugen einer Objektinstanz und deren Freigabe in einen try-finally-Block packen und die Freigabe dann in den Finally-Teil.

[Sternenmaedchen]

Hallo S-Off,

danke das ist mir bewusst
sollte ja auch nur ein vorläufiger Lösungsnsatz sein.

Nocheinmal Danke für eure Mühe.