Hallo Leute!
Ich hab eure Tipps alle mit meinem bessten "Können" eingebaut!
Die Namen der Edit-Felder werden in einer externen
CSV-datei mit der folgenden Formatierung gespeichert:
Name1
Name2
Name3
....
Ich hab jetzt Edit-Felder statt Labels genommen...
Da Delphi bei
cfg_edit[i]:= cfg_dat.strings[i];
gemeckert hat, hab ich wie unten zu sehen ist noch ein Tedit() davor gesetzt...
Gehe ich richtig in der Annahme, dass der STring dann in einen Tedit-Wert geändert wird ??
Nun kommt mein Problemm... bei der letzten Zeile kommt es leider zum Programmabsturz, da "cfg_edit[7].text" wohl nicht dem vom mir erwarteten Wert entspricht ...
Was macht ich falsch ??
Delphi-Quellcode:
procedure TForm1.FormActivate(Sender:TObject);//beim Starten des Programms
var
cfg_dat : TStrings;
i: integer;
begin
//Auslesen der CFG-Datei
cfg_dat:=TStringList.Create; //StringList erzeugen
cfg_dat.LoadFromFile('CFG.csv');
for i:=0 to 8 do begin
cfg_edit[i]:= Tedit(cfg_dat.strings[i]);
end;
cfg_dat.Free ;
cfg_edit[7].text:='kdhkjdh'; // ----> FEHLER !
end;