Zitat von
Prym:
würde das gehen
Vielleicht. Probiers doch aus. Dann würdest du merken, dass der Compiler meckert.
Besser ist's deshalb so:
Delphi-Quellcode:
uses
IniFiles
procedure TForm1.Button1Click(Sender: TObject);
var DelphiIni: TIniFile;
begin
DelphiIni := TIniFile.Create('c:\x\x.ini');
DelphiIni.WriteString('Section','Str1','test');
DelphiIni.Free;
end;
procedure TForm1.Button2Click(Sender: TObject);
var a : string;
DelphiIni: TIniFile;
begin
DelphiIni:= TIniFile.Create('c:\x\x.ini');
a:= DelphiIni.ReadString('Section', 'Str1','');
DelphiIni.Free;
label1.caption := a;
end;
Evtl. solltest du (nochmal) in der
OH nachschauen, wie ein
TIniFile arbeitet.
MfG
Binärbaum
//Edit: QT ausgebessert