Variable Übergeben

[Bernhard Geyer]

Zitat von DeddyH:

Ich würde mir eine Property Username im Hauptform deklarieren und bei erfolgreichem Login vom Loginform befüllen lassen.

und damit rekursive abhängigkeiten verursachen

Definiere eine Funktion die du vom Hauptformular aufrufst

Delphi-Quellcode:

function DoLogin(var UserName, Password: String): Boolean;
var
  dlg: TMyLoginDlg;
begin
  result := False;
  dlg := TMyLoginDlg.Create(nil);
  try
    if dlg.ShowModal = mrOk then
    begin
      result := True;
      UserName := dlg.EditUser.Text;
      Password := dlg.EditPassword.Text;
    end
  finally
    dlg.Free;
  end;
end;