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; Quote 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 Quote 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? Quote 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. Quote Link to comment Share on other sites More sharing options...
Recommended Posts
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.