hi chriss,
mach dir doch einfach ein label auf eine form, und tu dies:
Delphi-Quellcode:
procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);
begin
label1.Caption := '#' + IntToStr(Ord(key));
end;
in das Ereigniss "OnKeyPress" des Forms
gruss silent