roberio Posted October 21, 2011 Report Share Posted October 21, 2011 grupo ajuda com essa gostaria de fechar o dialog somente com o botao OK que criei, nao permitindo o botao X e o ESC alguem sabe como? obrigado RESOLVIDO com o VALID ACTIVATE DIALOG oDlg CENTERED VALID lOk Roberio Maciel(Fortaleza-Ce) roberio_bell@hotmail.com FWH1104(original) - xHarbour 1.2.1 Rev.6741 - BCC582 FWPPC 10.2(original) Editado por - roberio on 21/10/2011 18:00:53 Quote Link to comment Share on other sites More sharing options...
roberio Posted October 21, 2011 Author Report Share Posted October 21, 2011 grupo ajuda com essa gostaria de fechar o dialog somente com o botao OK que criei, nao permitindo o botao X e o ESC alguem sabe como? obrigado RESOLVIDO com o VALID ACTIVATE DIALOG oDlg CENTERED VALID lOk Roberio Maciel(Fortaleza-Ce) roberio_bell@hotmail.com FWH1104(original) - xHarbour 1.2.1 Rev.6741 - BCC582 FWPPC 10.2(original) Editado por - roberio on 21/10/2011 18:00:53 Quote Link to comment Share on other sites More sharing options...
toya Posted October 22, 2011 Report Share Posted October 22, 2011 //////////////////////////////////////////////////////////////////////////////// // inserido/alterado por: #toya:04/10/2011:14:38 //////////////////////////////////////////////////////////////////////////////// #pragma BEGINDUMP #include "hbapi.h" #include "windows.h" HB_FUNC ( TIRA_X ) // DESABILITA O X da janela { HMENU MenuH = GetSystemMenu(GetForegroundWindow(),FALSE); EnableMenuItem(MenuH,SC_CLOSE,MF_GRAYED); //DeleteMenu(MenuH,SC_CLOSE,MF_BYCOMMAND); } #pragma ENDDUMP toya Ahora en la version 6.0 toyasis@yahoo.com.br http://www.toyanet.com.br FWH 8.05+PellesC+xHarbour.org 1.1.0 Clippeiro por opção, Fivewiner por amor ao Clipper... AcbrMonitor, ACBrNfeMonitor.:. Quote Link to comment Share on other sites More sharing options...
Geo_sts Posted October 23, 2011 Report Share Posted October 23, 2011 ou assim: antes da dialog naoFechar:=.f. DIalog.... Botton "OK" action comando(naoFechar:=.t.,odlg:end()) activate dialog valid naoFechar abraços Geovanni Holior Analista de Sistema Clip53 * FHW 9.1/../9.5 MySql skype:geovanni.holior " Tudu Posso naquele que me Fortalece!" Quote Link to comment Share on other sites More sharing options...
emotta Posted October 24, 2011 Report Share Posted October 24, 2011 Eu vi que está resolvido, mas como não postou a solução segue a que eu uso e acho a forma mais prática. No Activate coloque: ACTIVATE DIALOG oDlg CENTERED VALID !Esc() // declare essa função no seu projeto Function Esc() Return GetKeyState(VK_ESCAPE) citação:grupo ajuda com essa gostaria de fechar o dialog somente com o botao OK que criei, nao permitindo o botao X e o ESC alguem sabe como? obrigado RESOLVIDO com o VALID ACTIVATE DIALOG oDlg CENTERED VALID lOk Roberio Maciel(Fortaleza-Ce) roberio_bell@hotmail.com FWH1104(original) - xHarbour 1.2.1 Rev.6741 - BCC582 FWPPC 10.2(original) Editado por - roberio on 21/10/2011 18:00:53 id=quote>id=quote>Eduardo Motta emotta@gmail.com.br FWH 9.09 (original) - xHARBOUR 1.2.1 (comercial e original) - SQLRDD Quote Link to comment Share on other sites More sharing options...
Luiz Arruda (ICO) Posted October 24, 2011 Report Share Posted October 24, 2011 Boa Tarde. basta fazer assim; Activate Dialog oDlg ; Valid !( GetKeyState( 27 ) ) id=code>id=code>Abraços.. Luiz Arruda Corumbá-MS ico.corumba@gmail.com | http://www.facebook.com/profile.php?id=100000933378029 FiveWin 9.04 xHarbour PellesC Bcc 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.