TWB Risen - 2020-06-21

TFormLogin = class(TForm)
acLoginOk: TAction;
acLoginCancel: TAction;
acRegisterOk: TAction;
acRegisterCancel: TAction;
acLoginRecovery: TAction;
ActionList1: TActionList;
Button1: TButton;
Button2: TButton;
Button3: TButton;
Button4: TButton;
Button5: TButton;
Edit1: TEdit;
Edit2: TEdit;
Edit3: TEdit;
IdSSLIOHandlerSocketOpenSSL1: TIdSSLIOHandlerSocketOpenSSL;
lMessage: TIdMessage;
IdSMTP1: TIdSMTP;
Label1: TLabel;
Label2: TLabel;
Label3: TLabel;
PageControl1: TPageControl;
pLogin: TTabSheet;
pRegister: TTabSheet;
procedure acLoginCancelExecute(Sender: TObject);
procedure acLoginOkExecute(Sender: TObject);
procedure acLoginRecoveryExecute(Sender: TObject);
procedure acRegisterCancelExecute(Sender: TObject);
procedure acRegisterOkExecute(Sender: TObject);
procedure FormCreate(Sender: TObject);
private

public

end;