Ver Mensaje Individual
  #9  
Antiguo 06-07-2017
cloayza cloayza is offline
Miembro
 
Registrado: may 2003
Ubicación: San Pedro de la Paz, Chile
Posts: 910
Reputación: 22
cloayza Tiene un aura espectacularcloayza Tiene un aura espectacular
Bueno entonces esto...

Código Delphi [-]
procedure TForm1.Edit1KeyDown(Sender: TObject; var Key: Word; var KeyChar: Char; Shift: TShiftState);
begin
     case (Key) of
        vkReturn: label1.Text:='Return';
        vkBack:   label1.Text:='Backspace';
        vkTab:    label1.Text:='Tab';
     else
         label1.Text:='KeyChar...'+KeyChar;
     end;
end;

Saludos cordiales
Responder Con Cita