Kezdőoldal » Számítástechnika » Programozás » Free Pascalban megakadtam....

Toths1952 kérdése:

Free Pascalban megakadtam. Hogyan lehet az F1; F2;. Funkcióbillentyűkre hivatkozni, ill. figyelni a leütésüket (readkey)? TP-ben #59; #60;. , de itt valamiért nem jön össze. Kösz előre is a segítséget.

Figyelt kérdés

2014. jan. 31. 22:13
 1/5 anonim ***** válasza:
2014. jan. 31. 22:17
Hasznos számodra ez a válasz?
 2/5 SimkoL ***** válasza:

program F1F2;

uses Crt;

var ch : char;

begin

repeat

ch := ReadKey;

if ch = #0 then ch := ReadKey;

case Ord(ch) of

59: Write('F1');

60: Write('F2');

end;

until ch = #27;

end.

2014. jan. 31. 22:31
Hasznos számodra ez a válasz?
 3/5 A kérdező kommentje:
Köszi. Ez így nekem is ment. Grafikus környezetben az elsődleges kódokkal semmi gond, a másodlagosak közül is pl. a #80 megy, de a funkcióbillentyűk nem.
2014. febr. 1. 22:25
 4/5 A kérdező kommentje:

Az első válaszhoz: Tehát a keyboard unit megoldás lehet. De hogyan hivatkozzak rá?

if g=#60 then... most sem megy.

2014. febr. 1. 22:50
 5/5 SimkoL ***** válasza:
GetKeyEvent: [link]
2014. febr. 1. 22:56
Hasznos számodra ez a válasz?

Kapcsolódó kérdések:




Minden jog fenntartva © 2024, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu

A weboldalon megjelenő anyagok nem minősülnek szerkesztői tartalomnak, előzetes ellenőrzésen nem esnek át, az üzemeltető véleményét nem tükrözik.
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!