moduł graph nie działa [turbo pascal]

[Wojtol]

Witam. Napisałem program:

Kod: Zaznacz cały

program ptp;

uses
graph;


var
karta,tryb:integer;
napis:string;

begin

detectgraph (karta,tryb);
initgraph (karta,tryb,'C:\FPC\2.4.0\units\i386-win86\graph');

setcolor (yellow);

circle (205,270,195);
setcolor (white);
napis:='kolko';
outtextXY (50 div 2-textwidth(napis) div 2,50 div 2- textheight(napis)div 2, napis);



readln;
closegraph;
readln;
end.

program kompiluje się i wyłącza nie dając żadnego wyniku na ekranie (turbo pascal). Uruchamiając ten program w free pascalu wszystko jest w porządku i wyświetla się okrąg. Co zrobić by wyświetlał się on też używając turbo pascala?

[Rgl]

Może tak:

Kod: Zaznacz cały

initgraph (karta,tryb,'');

Strzelam ale kilka(naście) lat temu to działało