Zitat von
Dax:
Noch eine Idde:
Delphi-Quellcode:
var a: integer;
i: TIniFile;
begin
i := TIniFile.Create((ExtractFilePath(ParamStr(0))+'Einstellungen.ini'));
for a := 1 to 97 do
begin
with i do
begin
(findcomponent('form2.edit' + inttostr(a)) as tedit).Text := readstring ('Daten','Feld'+
inttostr (a),'');
end;
end;
i.free;
end;
funzt leider auch net
@Taladan - ich weiß es nicht genau, er zeigt mir ja keine fehlermeldung an oder so, ladet einfach nicht die einträge
