Страница 1 из 1
Изменение шрифта в Паскаль 7.1
Добавлено: 09 янв 2010, 20:46
Magnum
В графическом режиме Паскаля не удается изменить шрифт процедурой "SetTextStyle". Установлен кейрус, шрифты в папке BGI.
В чем может быть проблема и как ее исправить?
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 11 янв 2010, 08:51
Хыиуду
Возможно, неправильно прописаны директории, откуда все подгружается? Проверьте в Options - Directories
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 11 янв 2010, 16:30
Magnum
Прописана директория для модулей, остальное все лежит в одной папке.
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 12 янв 2010, 12:29
Хыиуду
Тогда код приведите.
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 12 янв 2010, 17:09
Magnum
Код простейшей программы:
[syntax='Pascal'] uses crt,graph;
Var d,m:integer;
BEGIN d:=detect; m:=2;
Inithraph(d,m,'c:\tp7\bgi');
cleardevice;
setcolor(red);
settextstyle(2,0,2);
outtextxy(320,240,'Primer teksta');
readkey;
END.[/syntax]
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 13 янв 2010, 09:45
Хыиуду
Вариант 1 - попробуйте не задавать явно значение m, пусть работает автоопределение.
Вариант 2 - попробуйте
http://pascal.sources.ru/tmt/help/settextstyle_proc.htm, если это не будет работать - проблемы где-то в папках.
Re: Изменение шрифта в Паскаль 7.1
Добавлено: 13 янв 2010, 20:23
Magnum
Все, получилось... Проблема оказалась где-то в папках, где именно - без понятия. Помог, как всегда, бубен
