INI Fragen wie immer

[marabu]

Hallo Sascha,

mein Vorschlag:

Delphi-Quellcode:

const
  LOGIN_SECTION = 'LOGIN';
  USER_KEY = 'Benutzer';
  PSWD_KEY = 'Password';

procedure TForm1.Button3click(Sender: TObject);
var
  fn: TFileName;
begin
  fn := ExtractFilePath(ParamStr(0)) + 'MyIniFile3.ini';
  with TMemIniFile.Create(fn) do
  try
    WriteString(LOGIN_SECTION, USER_KEY, UserEdit.Text);
    WriteString(LOGIN_SECTION, PSWD_KEY, PswdEdit.Text); 
    UpdateFile;
  finally
    Free;
  end;
end;

Freundliche Grüße