Показать сообщение отдельно
Старый 23.06.2012, 20:11   #231
AntiRock
Оператор ЭВМ
 
Аватар для AntiRock
 
Регистрация: 23.06.2012
Сообщений: 31
Написано 9 полезных сообщений
(для 9 пользователей)
Ответ: Lib_font32: Графические шрифты

Начал изучать турбо паскаль и библиотеки к нему, сразу же оказался в ступоре...Подскажите мне пожалуйста, где у меня ошибка. Пустой экран, в этом и заключается проблема.

Program galaxy;
Uses font32;
Var 
	su:string;
Begin
	font32.init(1);
	font32.font(0);
	font32.loadfont('myfont1');
	su:='сраный текст не отображается на экране';
	font32.drawstring(su,10,10);
	repaint;
	delay(5000);
End.
Ошибок при компиляции не выдает, путем тыка "halt;" в каждую строку понял, что программа виснет на 10 строке, почему? - понять не могу.
(Offline)
 
Ответить с цитированием