Hallo erstmal,
Ich wollte in meinem Prog den Wert einer ini Datei überprüfen, und weis nich mehr weiter.
Nun ich habe eine Form mit einem Edit Feld, den darin eingegebenen Benutzernamen, soll er mit dem Wert in der ini Datei auf Richtigkeit überprüfen, und in einer anderen Form anzeigen, ob berechtigt oder nicht.
Also ne kleine Benutzerabfrage.
Hab mir so einiges zusammengebastelt, aber es funzt irgendwie nich er gibt mir dann an, das der Ausdruckstyp nach dem then Boolean sein soll.
Wie muss ich das denn schreiben, oder iss der gesammte Code etwa falsch
uses...., iniFiles;
Delphi-Quellcode:
procedure TForm4.FormCreate(Sender: TObject);
var ini: TIniFile;
begin
ini := TIniFile.Create(IncludeTrailingPathDelimiter(GetCurrentDir)+'kontaktliste.ini');
if Form1.Edit1.Text := ini.ReadString('user', 'usernamen','')
then Form4.Label1.Caption := 'Benutzer berechtigt';
end;
wäre schön wenn mir einer helfen könnte