Pascal-text po grafickom režme – Pascal – Fórum – Programujte.com

čus, mám taký problém že by som chcel aby sa v Pascale vykreslil štvorec a potom sa vypísal nejaký text v textovom režime. Vec je v tom že by som tam chcel aj funkciu Clrscr a tá je v knižnici Crt. Akonáhle ale tuto knižnicu pridám tak funkcia writeln nepracuje správne a hodí mi len čierny odsek(akokeby medzery). Neviete prečo to robí, prípadne ako sa to dá opravit? Diky za pomoc.

program stvorec;
uses Graph, crt;
const gd:integer=9;
gm:integer=2;
cesta='';

BEGIN
Clrscr;
InitGraph(gd,gm,cesta);
Rectangle(200,200,300,350);
readln;
CloseGraph;
writeln('To bol štvorec.' );
readln;
END.

#1 adamec
Nevím proč ti to dělá tu chybu co popisuješ, ale každá změna režimu automaticky znamená vymazání obrazovky, takže si děláš ty potíže naprosto zbytečně, obrazovku mazat nepotřebuješ a tím pádem nepotřebuješ ani knihovnu CRT.

#1 adamec
Tak jsem měl chvilku času, zkusil jsem ten tvůj program pustit a funguje normálně (BP7) vykreslí čtverec, počká na enter a pak vypíše normálně čitelný text a zase počká na enter.

J mne už jeden kamoš včera vysvetlil že je to bugom v verzii Free Pascal 2.6.0 tak som to hodil na Free Pascal 2.4.4 a už to ide :)