also ich habs so gemacht un so geht:
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
begin
ini := TInifile.Create('d:\test.ini');
try
ini.WriteInteger('Aktiv','Wert',1);
finally
ini.Free;
end;
end;
procedure TForm1.FormShow(Sender: TObject);
begin
ini := TInifile.Create('d:\test.ini');
button1.visible := ini.ReadInteger('Aktiv','Wert',1) = 0;
end;
Das nächste problem ist nur wenn die Ini nicht vorhanden ist dann geht's auch auch nicht!
@Dani u´Werd ich mir mal angicken!