AntonioCuomo Posted August 16, 2019 Share Posted August 16, 2019 j have these code: procedure TUniForm_RapportiLavoro.UniSpeedButton3Click(Sender: TObject); begin if ABSTRapporti.State in dseditmodes then begin MessageDlg('Salva Rapporto di Lavoro', mtConfirmation, mbYesNo, procedure(Sender: TComponent; Res: Integer) begin case Res of mrYes : abstrapporti.post; mrNo : abstrapporti.cancel; end; end); end; ABSTRapporti.Close; close; end; The dialog of messagge is open after then close of form Rapporti and the code of anonimous procedure not execute. v. of unigui is 1.90.0.1506 Quote Link to comment Share on other sites More sharing options...
Sherzod Posted August 16, 2019 Share Posted August 16, 2019 10 minutes ago, acuomo said: v. of unigui is 1.90.0.1506 Which edition are you using? Quote Link to comment Share on other sites More sharing options...
AntonioCuomo Posted August 16, 2019 Author Share Posted August 16, 2019 unigui complete professional Quote Link to comment Share on other sites More sharing options...
Sherzod Posted August 16, 2019 Share Posted August 16, 2019 12 minutes ago, acuomo said: unigui complete professional Can you please adjust your forum email address first? Quote Link to comment Share on other sites More sharing options...
AntonioCuomo Posted August 16, 2019 Author Share Posted August 16, 2019 my e-mail is correct… why? Quote Link to comment Share on other sites More sharing options...
AntonioCuomo Posted August 16, 2019 Author Share Posted August 16, 2019 j have resolve: if ABSTRapporti.State in dseditmodes then begin MessageDlg('Salva Rapporto di Lavoro', mtConfirmation, mbYesNo, procedure(Sender: TComponent; Res: Integer) begin case Res of mrYes : begin abstrapporti.post; ABSTRapporti.Close; close; end; mrNo : begin abstrapporti.cancel; ABSTRapporti.Close; close; end; end; end); end; but not is elegant and correct Quote Link to comment Share on other sites More sharing options...
Sherzod Posted August 26, 2019 Share Posted August 26, 2019 On 8/16/2019 at 4:12 PM, Antonio Cuomo said: my e-mail is correct… why? Please specify your registered email address. Quote Link to comment Share on other sites More sharing options...
AntonioCuomo Posted August 28, 2019 Author Share Posted August 28, 2019 antonio.cuomo@mondoconsulenti.it 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.