---

Hej

jeg har lavet et lille program i D5, som ikke gør andet end at skrive ascii
værdierne af det jeg indtaster på skærmen.

Det ser sådan ud:

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 !!

Hvorfor det ?

Michael

---

> 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]

---

"~*~ Mivi ~*~" <mivi@occdata.dk> wrote:
>
> Hej
>
> jeg har lavet et lille program i D5, som ikke gør andet end at skrive ascii
> værdierne af det jeg indtaster på skærmen.
[klip]
> Når jeg trykker på tallet 9 på det numeriske tastatur, så returnere
> programmet ascii værdi 105 !
> Dette mener jeg er lille i !!
>
> Hvorfor det ?

Lige et spørgsmål: Er "Num Lock" slået til eller fra? Du kan eventuelt prøve
dig frem med begge muligheder.

MVH, René
--
Using Virtual Access
http://www.vamail.com