Delphi-Quellcode:
procedure TLoginForm.LoginButtonClick(Sender: TObject);
var
ini: TMemIniFile;
fn: TFileName;
begin
if PswdEdit.Text = PASSWORD then
begin
fn := ChangeFileExt(ParamStr(0), '.ini');
ini := TMemIniFile.Create(fn);
ini.WriteString('Einstellungen', 'LetzteAnmeldung', DateTimeToStr(Now));
ini.UpdateFile;
ini.Free;
ModalResult := mrOK;
end else ShowMessage('falsches Kennwort');
end;
das geht auch bei mir und im OnCreate habe ich
Delphi-Quellcode:
var ini : TIniFile;
begin
ini := TIniFile.Create(ExtractFilePath(ParamStr(0)) + 'test.ini');
Edit2.Text := Ini.ReadString('Text', 'test','');
Button1Click(Button1);
und nun geht eben der ButtonClick nicht automatisch..aber NUR wenn eben der Ini-String-Eintrag bereits existiert und ins fenster geladen wurde
