Tema: código ascii
Ver Mensaje Individual
  #6  
Antiguo 10-11-2004
Dolpenganger Dolpenganger is offline
Registrado
  
Registrado: nov 2004
Posts: 1
Reputación: 0
Dolpenganger Va por buen camino
Talking intenta lo siguiente
procedure TFormaprincipal.Edit1KeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
begin
edit1.Text:= inttostr(key);
end;


y pulsa la tecla de la que quieras averiguar su codigo
Responder Con Cita