[PhoeniX]

Код:

function TUserAuth.Execute : Boolean;
begin
  With TUserAuthForm.Create(Application) Do
    Begin
      If ShowModal = mrOK Then
        Begin
          FUserName := edUseName.Text;
          FPassword := edPassword.Text;
        End;
      Free;
    End;
end;

Никогда не думал, что Imikle допустит такую мелкую, но ошибку