Zeichen zur eignen Form zur Weiterverarbeitung schicken

[EWeiss]

Zitat von Furtbichler:

Hi Emil, Hi Wo

SendKeys wird es wohl sein. Danke für den Hinweis und den Link.

Du kannst das Projekt Progcommand laden oder ich lade die Unit hier nochmal hoch.

EDIT:
Hab sie hochgeladen..
Bei einigen mußt du den Key mappen bei einer ausgabe als string.. aber ich denke das ist dir bekannt..

Delphi-Quellcode:

function GetKeyName(aKey:Byte): string;
var
  ScanCode: cardinal;
  KeyName: array[0..255] of char;

begin
 Result := '';
 ScanCode := (MapVirtualKey(byte(aKey), 0) shl 16);

 if ScanCode <> 0 then
 begin
   GetKeyNameText(ScanCode, KeyName, SizeOf(KeyName));
   Result := KeyName;
 end;
end;

gruss