Grafik in dev-pascal :( geht nicht

Error: call by var parameters have to match exactly: Got LONGINT expected SMALLIN

Diese fehler meldung erhalte ich immer habe schon einige grafik scripte durch probiert erhalte diese meldung aber immer:
-----------------------------------------------
Program Grafik;
USES Graph;

VAR Treiber, Modus: Integer;

Begin
Treiber := Detect;
InitGraph (Treiber, Modus, 'G:\Dev-Pas 1.9.2\BGI');
Line (40, 40, 600, 440);
Rectangle (40, 40, 600, 440);
Circle (320, 240,170);
Readln;
End.
------------------------------------------------

so sied mein script aus leider klappt es nciht und ich bin mit meinem latain am ende.Würde mich freuen wen mir einer helfen kann.


commpiler is "freepascal"
Beitrag bearbeiten/löschen

 

probier mal den type der variablen treiber und modus auf "System.Integer" zu setzen. wenn das nicht klappt probiere den type smallint (oder was der compiler sonst erwartet)

nebenbei sollte man den grafikmodus nach gebrauch auch wieder schließen. schreib "closegraph;" zwischen readln und end.

 

Hat beides nichts geholfen. Wo bei das wie ichs geschrieben hab genau nach vorgabe war. auf zich seite .es sollte also klappen. das tut es aber leider nicht.

 

schau halt mal nach wie initgraph definiert ist. den datentyp der da verwendet wird den nimm.

 

Hab ich ja geht nicht!!!

 

was soll denn da nicht gehen?

hab extra wegen dir dev-pascal geladen und siehe da: kaum tauscht man "VAR Treiber, Modus: Integer;" gegen "VAR Treiber, Modus: Smallint;" läuft es.

 

lol jetzt gehts bei mir auch obwohl ich das mit smallint schon probiert hab.^^