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?