typedef void __fastcall (__closure *TLoginEvent)(System::TObject* Sender, AnsiString &UserName, AnsiString &Password, bool &Continue)