WagnerAlexandre Posted December 26, 2014 Share Posted December 26, 2014 Hello friends, someone could help me? In the code below only the last message is displayed to the user in a Form login can guide me if i am doing something wrong? I thank you. if Trim(edtUsuario.Text)='' then begin MessageDlg('Digite o Usuário Corretamente!' ,mtWarning, [mbOK], procedure(Sender: TComponent; Res: Integer) begin edtUsuario.SetFocus; exit; end ); end; if Trim(edtSenha.Text)='' then begin MessageDlg('Digite a Senha Corretamente!' ,mtWarning, [mbOK], procedure(Sender: TComponent; Res: Integer) begin edtSenha.SetFocus; exit; end ); end; Link to comment Share on other sites More sharing options...
zilav Posted December 26, 2014 Share Posted December 26, 2014 MessageDlg is not blocking in UniGUI, change code to if Trim(edtUsuario.Text)='' then begin end else if Trim(edtSenha.Text)='' then begin end; 1 Link to comment Share on other sites More sharing options...
WagnerAlexandre Posted December 26, 2014 Author Share Posted December 26, 2014 No message command is able to lock in unigui? Link to comment Share on other sites More sharing options...
Administrators Farshad Mohajeri Posted December 26, 2014 Administrators Share Posted December 26, 2014 No message command is able to lock in unigui? No, running thread can not be suspended. Link to comment Share on other sites More sharing options...
Recommended Posts
Please sign in to comment
You will be able to leave a comment after signing in
Sign In Now