ASCII kódy pro numerickou klávesnici – Pascal – Fórum – Programujte.com

Včera jsem se setkal s divným hlášením ASCII kódů pro numerickou klávesnici, pokud je držen Shift. Tedy Shift+numŠipka.

1) Když zmáčknu normální šipku doleva, tak dostanu kód 0 a 75, výsledně tedy 331.
2) Když zmáčknu numerickou šipku doleva, tak dostanu kód 0 a 75, výsledně tedy 331.
3) Když zmáčknu Shift+normální šipku doleva, dostanu rovněž 331
4) Když zmáčknu Shift+numerickou šipku doleva, dostanu 52 (ASCII kód "4")

V situaci č.4 se tedy klávesnice chová prapodivně. Chci se tedy zeptat, jestli to pozoruje i někdo další, nebo jestli je za tím můj ovladač klávesnice a jestli je to známá věc, jak to ošetřujete. Já jsem to pořešil hlídáním stavu Shiftu a případným překódováním, tedy takto:

if (w>45) and (w<58) and Je_shift then

      case w of

      46:w:=339;

      47:w:=47;      {o kodu 47 nevim nic}

      48:w:=338;

      49:w:=335;

      50:w:=336;

      51:w:=337;

      52:w:=331;

      53:w:=332;

      54:w:=333;

      55:w:=327;

      56:w:=328;

      57:w:=329;

      end;

Shift mění význam mezi čísly a šipkami na numpadu i mně, takže to asi bude normální.

Já totiž chci do svýho GUI přidat označování textu. Text půjde označovat buďto tažením myši (to bude ta obtížnější část) nebo pomocí Shift+šipka. No, a já potřebuju, aby stejně jako v TP šla použít šipka normální i numerická.

Takže, jak na to?

TP má vůbec nějakou docela vymakanou obsluhu klávesnice. Např. ins, ctrl+ins, shift+ins, del, ctrl+del, shift+del - nevím přesně která, ale minimálně jednu z těch kombinací mi readkey vůbec nebral (jako by se nic nezmáčklo) a shift jsem musel testovat samostatně.

Takže bych to viděl na vlastní handler přerušení klávesnice, který bude scankódy podle aktuálního stavu přeřaďovačů a locků převádět na ASCII (ve FP by neměl být problém s nedostatkem paměti pro tabulky s tolika kombinacemi) a ukládat na příslušné místo v paměti, aby si je odtamtud mohly číst standardní služby int $21, $16 a tak.