Zitat von
DeddyH:
Ich würde mir eine Property Username im Hauptform deklarieren und bei erfolgreichem Login vom Loginform befüllen lassen.
Anderstrum.
Das modale Login-Formular hat zwei Properties:
Delphi-Quellcode:
property UserName:string;
property Password:string;
Diese Properties werden über Get- und Setmethoden an die beiden Edits auf dem Formular angebunden.
Ein direkter Zugiff auf die Edits vom Hauptformular aus findet nicht statt.
Delphi-Quellcode:
function DoLogin(var UserName, Password: String): Boolean;
var
dlg: TMyLoginDlg;
begin
dlg := TMyLoginDlg.Create(nil);
try
dlg.Username := 'default'; // optional: default user vorschlagen
result := (dlg.ShowModal = mrOk); // Login Dialog anzeigen
if result then
begin
// Ergebnis abgreifen
UserName := dlg.Username;
Password := dlg.Password;
end
finally
dlg.Free;
end;
end;