Problem mit GetKeyNameText

[Chris P]

Hier ein Ausschnitt:

Delphi-Quellcode:

procedure TForm1.WndProc(var msg: TMessage); 
var
   c: array [0.255] of Char;
begin 
  inherited; 
  case msg.Msg of 
    WM_KEYDOWN: begin
                   GetKeyNameText(Msg.lParam, c, SizeOf(c)); 
                   ShowMessage(c);
                end; 
  end; 
end;