Free Pascal - grafika i klawisze

0

Nie wiem czemu ale klawisze w grafice w Free Pascalu mi nie działają... tylko w osobnym okienku otwiera mi sie grafika a w osobnym moge cos robic z klawiszami w tym programie... dam przykladowy kod w ktorym przez nacisniecie obojetnie jakiego klawisza powinno sie zamknac...

uses GRAPH, CRT;
var
  w,t:integer;
begin
  w:detect;
  InitGraph(w,t,'');
    Circle(320,420,30);
    repeat until keypressed;
  CloseGraph;
end.

EDIT: dodam że wersje Free Pascal mam 2.2.0, a w Turbo Pascalu to raczej normalnie działa...

0

Witam
Mam taki sam problem i nie umiem go rozgryźć od dłuższego czasu. W dev/free Pascalu tworze projekt Console Application i inicjuje w nim tryb graficzny. Podczas uruchamiania programu otwierają się dwa okna: konsola oraz Graph window application. Cały problem w tym tak jak pisał mój przedmówca, że „okno graficzne” nie reaguje na żadne znaki wprowadzane z klawiatury. Dopiero jak wpisze je w konsoli efekty są widoczne w oknie graficznym.
Bardzo proszę o pomoc w rozwiązaniu tego problemu.

PS. Da się całkowicie wyłączyć okno konsoli i pracować w samym oknie graficznym tak jak to ma miejsce w TurboPascalu?

Pozdrawiam

0

Z góry przepraszam, że pisze posta pod postem ale znalazłem rozwiązanie do powyższego problemu. Otóż należy wykorzystać biblioteke WinCRT zamiast zwykłego CRT. Wtedy wszystko ładnie dzaiała w Graph window.

1 użytkowników online, w tym zalogowanych: 0, gości: 1