
No negocio con psicopatas. Yo... me los cargo. [?]
Añademe a tus favoritos!
Contacto
Post al azar
RSS
BUSCAR
Mapa de la web
el 2001-01-01 00:00:00 - Secciones: - Enlace permanente: 442
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
ShowMessage('Tecla pulsada: '+inttostr(ord(key)));
end;
No olvidar poner la propiedad keypreview del form a true.
procedure TForm1.Button4Click(Sender: TObject); var aux : char; begin aux:=chr(VK_RETURN); FormKeyPress(sender,aux); end;
VK_RETURN es el codigo del enter, para la lista completa, busca en la ayuda del Delphi.
![]() | Anonimo (02/08/2005, 21:16) ?????????? ![]() |
Saiyine recommends the easiest way to earn money with your web: get paid just by having some links! Click this button to check it out.
