> Memo1.Lines.Add('ASCII VÆRDI: '+IntToStr(Key));
> if (not (Chr(Key)=#13)) then
> begin
> Label1.Caption := Label1.Caption + IntToStr(Key) + ' ';
> Label1.Update;
> end;
>
> Når jeg så trykker på taller 9 over bogstaverne returnere programmet ascii
> værdi 57 som forventet.
>
> Når jeg trykker på tallet 9 på det numeriske tastatur, så returnere
> programmet ascii værdi 105 !
> Dette mener jeg er lille i !!
Det er det også!
Jeg vil gætte på at du har sat den kode du viser os, ind i KeyDown-eventen.
Denne event returnerer en såkaldt Virtual-Key værdi i Key. Det er ikke
det du leder efter, men det virker nogle gange, fordi de Virtual-Key-Codes
der svarer til 'A'..'Z' er de samme som ASCII-værdierne for disse.
Den event du skal bruge, hedder KeyPress. DEN returnerer en ASCII-værdi
--
Regards, Christian Iversen [FIDUSO]
Flawless.Dk: [
http://domains.flawless.dk]
Do you have a (broken?) IBM75GXP Drive?
Please go to [
http://ibm.flawless.dk]