Keypressed(ord('ö')) --> wie krieg ich das Zeichen raus?

[DracoBlue]

Hallo!

Ich hab nun ein etwas unnormales Problem, glaub ich :-D.

Ich nutze diesen Code

Delphi-Quellcode:

function Keypressed(Wert:word):Boolean;
    var aktkeystate:Word;
    begin
      aktkeystate:=GetKeySTate(Wert);
      if ((aktkeystate=1)or(aktkeystate=0)) then Keypressed:=false else Keypressed:=true;
    end;

Um zu kucken ob eine Taste gedrückt ist.

Das klappt super.

Ich schreibe gerade an einem IngameChat und lasse nebenbei mein Programm laufen.
Wenn man nun Shift+2 drückt ist auf der deutschen Tastatur nen ", --> ich geben nen " aus.
Jedoch weiss ich die ganzen belegungen für die Amerikanischen Tasten nicht.

Gibt es eine Möglichkeit rauszufinden, welches Zeichen ausgegeben werden muss wenn bestimmte tasten gedrückt sind?

Mit freundlichen Grüßen,
Draco