Добрый день!
незнаю правильно ли я выбрал раздел, но проблема такая есть код на TP демонстрирующий работу модуля Crt, хотелось бы перенисти код на FP, да возникает проблемма Internal error 200309141 как от нее избавиться?
Заранее благодарен.
X1 := Random(40)+1;
Y1 := Random(12)+1;
X2 := X1+Random(40);
Y2 := Y2+Random(12); { <-- Здесь... Чему равно вначале Y2? }
Window(X1, Y1, X2, Y2);
// Добавляем это после создания окна
Textbackground(cyan);
ClrScr;