![]() |
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 03:26 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-2025 by Thomas Breitkreuz