getasynckeystate und Umlaute

[FirstUserX]

Delphi-Quellcode:

for i := 0 to 254 do
        if boolean(getasynckeystate(i)) then
          begin
            if i = 65 then t:='A';
            if i = 66 then t:='B';
            if i = 67 then t:='C';
[...]
end;

Also das funktioniert für jeden Buchstaben und jede Zahl! Bloß bei Umlauten geht es nicht (ä,ö,ü)...Weis jemand warum?