![]() |
Re: Datensätze in TStringlist einfügen
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:
Ich wünsche euch allen noch einen schönen Tag =)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; |
Re: Datensätze in TStringlist einfügen
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.
|
Re: Datensätze in TStringlist einfügen
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. |
Alle Zeitangaben in WEZ +1. Es ist jetzt 02:21 Uhr. |
Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz