aloha
hab grad ein kleine problem, arbeite gerade an einer anwendung mit einer login form...
wird ein benutzername eingegeben der in eine bestimmten directory noch nicht vorhanden ist, dann soll eine neue .ini datei erstellt werden...
jetzt hab ich 2 probleme...
1.) die .ini datei wird mir nicht erstellt (ich vermute mal das es daran lag das ich eine leere .ini datei erstellen wollte)
2.) aufgrund der in 1. angesprochenen vermutung wollt ich in die .ini datei mit writestring was reinschreiben, aber hier bekomm ich dann folgenden fehler beim kompelieren:
[Fehler] Project_login.pas(67): E2076 Diese Form des Methodenaufrufs ist nur für Klassenmethoden erlaubt
weiß jemand woran das liegen könnte???
hier die prozedur:
Delphi-Quellcode:
procedure TLogin_Form.xpbtn_loginClick(Sender: TObject);
var
blEntry, blFile : Boolean;
sPath : String;
Ini : TIniFile;
begin
blEntry := True;
sPath := ExtractFilePath(Application.ExeName);
//ShowMessage(sPath);
If (edt_user.Text = '') Or (edt_password.Text = '') Then
Begin
MessageDlg('User or Password is Missing!' + #13 + 'Please Insert all Informations!',
mtError, [mbOk], 0);
blEntry := False;
End;
If blEntry = True Then
Begin
blFile := FileExists(sPath + 'UserProfiles\' + edt_user.Text + '.ini');
If blFile = False Then
Begin
//ShowMessage(sPath + 'UserProfiles\' + edt_user.Text + '.ini');
Ini := TIniFile.Create(sPath + 'UserProfiles\' + edt_user.Text + '.ini');
Ini := TIniFile.WriteString('UserInformation', 'UserName:', edt_user.Text);
Ini.Free;
End;
End;
end;
die login_form ruf ich aus meine main_form wie folgt auf:
Delphi-Quellcode:
Application.CreateForm(TLogin_Form, Login_Form);
Login_Form.ShowModal;
würde mich freuen wenn mir hier jemand weiterhelfen kann
