Variable Übergeben

[deplinux]

Zitat von 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;

Danke schoneinmal dafür.

Ich habe jetzt den Button im Loginformular.

Nur wie mache ich das jetzt mit deiner Funktion?

Muss die ins Login Formular oder ins 2.?