![]() |
So viel Aufwand ist es doch eigentlich auch nicht, das man unbedingt noch eine extra Komponente dafür brauch, oder? Den Code hab ich aber nur mal eben so zusammengeschrieben und nicht getestet! :
Delphi-Quellcode:
setupliste := TStringList.Create;
if FileExists(ExtractFilePath(Application.ExeName)+'setup.txt') then setupliste.LoadFromFile(ExtractFilePath(Application.ExeName)+'setup.txt'); for i := 0 to setupliste.count -1 do if Pos(setupliste[i],'ServerPackages') = 0 then Listbox1.Add(Copy(Pos(setupliste[i].'=',Count(setupliste[i]))); |
Alle Zeitangaben in WEZ +1. Es ist jetzt 23:44 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