![]() |
Variable verarbeiten
Howdy allerseits!
Habe bisher nur Erfahrungen mit Bash sammeln können, bin dementsprechend noch unerfahren mit Delphi. Und zwar möchte ich eine Variable verarbeiten, weiß aber nicht, wie dies geht. In Bash konnte man die Variablen mit einem $-Zeichen vorangestellt verarbeiten. Zum eigentlichen Problem... Ich habe im Unterordner Archiv mehrere Textdateien, die nach einem festen Schema benannt sind: 1-A.txt, 1-B.txt, 1-C.txt, 2-A.txt, 2-B.txt, 2-C.txt, 3-A.text usw. in einer weiteren Datei (nennen wir sie default.txt) ist dann eine einzelne Zahl gespeichert, z.B. "2". Nun möchte ich die entsprechenden Dateien laden:
Code:
nun geht dies allerdings so nicht. Ich möchte aber die Variable in diesen Befehl einsetzen, damit, je nachdem welche Zahl in default.txt steht, die richtige Datei geladen wird, in diesem Falle die Datei 2-A.txt.
test.LoadFromFile('Archiv\')default.Strings[0]('-A.txt');
Ich hoffe, Ihr könnt mir helfen und ich danke Euch schon mal im Voraus für Eure Hilfe! PS: TStringlisten sind übrigens schon initialisiert^^ |
Re: Variable verarbeiten
Einfach die drei Strings mit + verketten ;)
|
Re: Variable verarbeiten
Delphi-Quellcode:
Das als Beispiel wie du das per Schleife machen kannst.
for i := 1 to 10 do
for j := 65 to 90 do begin MyFileName := ExtractFilePath(ParamStr(0)) + 'Archiv\' + IntToStr(i) + '-' + Chr(j) + '.txt'; if FileExists(MyFileName) then test.LoadFromFile(MyFileName); end; |
Re: Variable verarbeiten
Oder etwas verständlicher:
Delphi-Quellcode:
Dann muss j allerdings vom Typ AnsiChar und nicht integer sein.
for i := 1 to 10 do
for j := 'A' to 'Z' do begin MyFileName := ExtractFilePath(ParamStr(0)) + 'Archiv\' + IntToStr(i) + '-' + j + '.txt'; if FileExists(MyFileName) then test.LoadFromFile(MyFileName); end; |
Re: Variable verarbeiten
Hey danke!
Hat funktioniert, zumindest ist die Fehlermeldung verschwunden^^ Sollte es wider aller Erwartungen und Wahrscheinlichkeit doch nicht funktionieren, melde ich mich zurück ;) Danke schön! |
DP-Maintenance
Dieses Thema wurde von "mkinzler" von "Programmieren allgemein" nach "Object-Pascal / Delphi-Language" verschoben.
Geht um Delphi |
Alle Zeitangaben in WEZ +1. Es ist jetzt 14:38 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