Crt unit van de Identifier not found"gotoxy"
2008-06-03T18:47:48+02:00
2008-06-04T15:03:39+02:00
2022-07-29T11:35:31+02:00
zaza97
Sziasztok!
Detektáltam a crt sőt a wincrt unitot is
de a gotoxy-ra az Identifier not found-ot írja.

Tud valaki segíteni?

unit my; {$I-}{$I+} //szorakozni is kell interface procedure triangle; procedure delver; implementation uses graph,dos,windows,wincrt; var x1,y1,x2,y2,x3,y3 : integer; procedure triangle(x1,y1,x2,y2,x3,y3 : integer); begin line(x1,y1,x2,y2); line(x2,y2,x3,y3); line(x3,y3,x1,y1); end; procedure delver(s : integer); var i : integer; begin for i:=1 to 24 do begin gotoxy(i,s); //itt a hiba write(' '); end; end; begin randomize; //megint szorakozas x1:=0; end.
Mutasd a teljes hozzászólást!
Elképzelhetőnek tartom, hogy a wincrt unitban, amit uses-oltál nincs gotoxy eljárás, mivel ott picit másképp működik a szöveges képernyőnek megfelelő ablak felbontása. Ha wincrt helyett crt-t uses-olsz, akkor sem megy?

Amúgy nekem furának tűni kegy picit, hogy a unitodban 2db olyan eljárásod van, ami közül az egyik grafikus, a másik pedig szövöeges képernyőt használ. Valamit a dos és windows unitok egyidejű felhasználása is gyanús.

Sajnos én is nagyon régen pascaloztam már (úgy 10 éve).
FreePascal vagy Borland?
Mutasd a teljes hozzászólást!

Tetszett amit olvastál? Szeretnél a jövőben is értesülni a hasonló érdekességekről?
abcd