Du hast nicht angegeben, was wo gemacht werden soll. Deshalb StringGrid :
Delphi-Quellcode:
procedure Tfrm.sgKeyDown(Sender: TObject; var Key: Word;
Shift: TShiftState);
var ch : char;
begin
if key = VK_F9 then begin
frmSuch := TfrmSuch.Create(self);
..
key := VK_RETURN;
ch := chr (key);
sgKeyPress(Sender,ch);
key := ord (ch);
Vielleicht hat jemand besser polierte Glaskugel. 8)