Ver Mensaje Individual
  #9  
Antiguo 19-08-2006
kman kman is offline
Miembro
 
Registrado: dic 2005
Ubicación: República Dominicana.
Posts: 67
Reputación: 19
kman Va por buen camino
Cita:
Empezado por mahlon
...y que baje en orden del primero al ultimo y luego a los botones del primero al ultimo.
A qué te refieres con esto? al Tab Order?
Si es aí En la Propiedad Taborder organiza tus objetos y usa este código para moverte entre ellos con la tecla + y -(Copia y pega el código en el evento Onkeypress de cada objeto):
Código Delphi [-]
If Key =#45 Then Begin
     keybd_event(16,0,0,0); // SHIFT oprimido
     keybd_event(9,0,0,0); // TAB oprimido
     Keybd_event(16,0,2,0); // Soltar el SHIFT  (NO SE PUEDE OMITIR)
     keybd_event(9,0,2,0); // TAB Released (Puede ser omitido)
     Key := #0
   end;
if key=#43 then begin
    keybd_event(9,0,0,0); // TAB oprimido
    keybd_event(9,0,2,0); // Soltar el Tab
    Key:=#0;
end;
Código Cortesía de un compañero que no recuerdo, pero todo crédito para él

Última edición por kman fecha: 19-08-2006 a las 20:25:16.
Responder Con Cita