Tema: No funciona boton
Ver Mensaje Individual
  #2  
Antiguo 25-01-2008
Avatar de eduarcol
[eduarcol] eduarcol is offline
Miembro Premium
  
Registrado: ago 2003
Ubicación: En los estados Zulia y Merida de Venezuela
Posts: 4.151
Reputación: 27
eduarcol Va por buen camino
btSalir es el boton qe usas para la salida, lo escribi de memoria pero deberia funcionar

Código Delphi [-]
procedure TFprincipal.ECuentaExit(Sender: TObject);
begin
   If ((Length((Sender As TEdit).Text) < 10) OR ((Sender As TEdit).Text='')) and not (ActiveControl is btSalir) Then
     (Sender As TEdit).SetFocus;
end;
__________________
...Yo naci en esta ribera del arauca vibr@d0r
Soy hermano de la espuma,
de la garza, de la rosa y del sol...
Viva Venezuela
Responder Con Cita