Ver Mensaje Individual
  #8  
Antiguo 30-09-2020
Avatar de ecfisa
ecfisa ecfisa is offline
Moderador
 
Registrado: dic 2005
Ubicación: Tres Arroyos, Argentina
Posts: 10.508
Reputación: 36
ecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to beholdecfisa is a splendid one to behold
Hola.

Intenta de este modo:

.h
Código PHP:
...

class 
TForm1 : public TForm
{
__published:    // IDE-managed Components
  
TEdit *Edit1;
  
TEdit *Edit2;
  
TEdit *Edit3;
  
TEdit *edCenso;
  
void __fastcall edCensoExit(TObject *Sender);
private:    
// User declarations
  
void __fastcall CMDialogKey(TWMKeymsg);
  
BEGIN_MESSAGE_MAP
    MESSAGE_HANDLER
(CM_DIALOGKEYTWMKeyCMDialogKey)
  
END_MESSAGE_MAP(TForm)
public:        
// User declarations
  
__fastcall TForm1(TComponentOwner);
};

... 
.cpp
Código PHP:
...

bool Valida true

void __fastcall TForm1::edCensoExit(TObject *Sender)
{
  if (
Valida)
    
ShowMessage("SE VALIDA");
  else
    
ShowMessage("NO SE VALIDA");
}


void __fastcall TForm1::CMDialogKey(TWMKeymsg)
{
  
Valida = !(msg.CharCode == VK_TAB && GetKeyState(VK_SHIFT) < 0);
  
TForm::Dispatch(&msg);

Saludos
__________________
Daniel Didriksen

Guía de estilo - Uso de las etiquetas - La otra guía de estilo ....

Última edición por ecfisa fecha: 30-09-2020 a las 16:40:39.
Responder Con Cita