[Pascal] Funkcja keypressed wyrzuca błąd niezgodności typu danych

[JamesVoo]

Mam za zadania zrobić program który będzie się kończył po naciśnięciu klawisza esc.

Próbowałem najprostszego sposobu czyli wrzucenie całości w pętle repeat until na zasadzie

repeat

....

until keypressed=#27;

Lecz wyskakuje błąd

Error: Incompatible types: got "BOOLEAN" expected "LONGINT"

i

 Error: Incompatible types: got "CHAR" expected "LONGINT"

Pomoże ktoś?

[Lord Hrabula]

Pewności nie mam, ale keypressed to była chyba funkcja, która zwracała wartość boolowską, w zależności od tego czy się cokolwiek wcisnęło czy nie.

IMO najprostszy sposób to uzycie tutaj funkcji ReadKey

 

Repeat

   znak:=ReadKey;

Until znak=Chr(27);

[JamesVoo]

Tyle że jest ten problem że wtedy program się nie zapętla, a powinien. Nad tym też myślałem

Działa także

Until ReadKey=#27

Lecz właśnie wtedy się nie zapętla.

Cóż, najwyżej zrobię tak i potem będę w szkole spróbował zmienić

[Lord Hrabula]

Może tak ruszy, chociaż mam wątpliwości czy nie trzeba będzie dwa razy stukać

Repeat

   if keypressed then

      znak:=ReadKey;

Until znak=Chr(27);

No i wypadałoby gdzieś przed ta pętlą zainicjować zmienną znak.

[JamesVoo]

Niestety nie działa.

Najwyżej nie będę miał tego szczegółu

EDIT:Szczerze mówiąc nie wiem czy to ma jakieś znaczenie ale chodzi mi aby to chodziło w trybie graficznym. Wiem że to może być ważne, ale dopiero teraz wpadłem na to że to może zawadzać