Автор | Сообщение |
|
| |
Пост N: 68
Зарегистрирован: 05.11.05
|
|
Отправлено: 26.07.11 07:06. Заголовок: шрифт в консольной программе
А как выставить нужный шрифт в консольной программе? Допустим, нужен Lucida Console, размер 24. Имеется в виду, можно ли его самой программой задавать?
|
|
|
Новых ответов нет
[см. все]
|
|
|
| |
Пост N: 2096
Зарегистрирован: 17.05.05
|
|
Отправлено: 26.07.11 08:44. Заголовок: Глянь тему http://cl..
|
|
|
|
| |
Пост N: 69
Зарегистрирован: 05.11.05
|
|
Отправлено: 26.07.11 09:01. Заголовок: Пробовал сделать та..
Пробовал сделать так: #include "gtinfo.ch" gtInfo(GTI_FONTNAME, 'Lucida Console') gtInfo(GTI_FONTSIZE, 24) Ничего не происходит. Что-то еще нужно?
|
|
|
|
| постоянный участник
|
Пост N: 560
Зарегистрирован: 27.01.07
|
|
Отправлено: 26.07.11 09:06. Заголовок: rvu пишет: Что-то е..
rvu пишет: Чем компилируем? Какой терминал?
|
|
|
|
| постоянный участник
|
Пост N: 561
Зарегистрирован: 27.01.07
|
|
Отправлено: 26.07.11 09:12. Заголовок: FUNCTION Main( ...
FUNCTION Main( ... ) HB_GTInfo( HB_GTI_FONTNAME, "Lucida Console" ) HB_GTInfo( HB_GTI_FONTSIZE, 10 ) CLS WHILE .T. ? "Hello" IF Inkey( 0 ) == K_ESC EXIT END HB_GTInfo( HB_GTI_FONTSIZE, HB_GTInfo( HB_GTI_FONTSIZE ) + 1 ) HB_GTInfo( HB_GTI_FONTWIDTH, HB_GTInfo( HB_GTI_FONTWIDTH ) + 1 ) END // WHILE RETURN NIL
|
|
|
|
| |
Пост N: 70
Зарегистрирован: 05.11.05
|
|
Отправлено: 26.07.11 09:24. Заголовок: xHarbour Compiler bu..
xHarbour Compiler build 1.0.0 (SimpLex). Терминал я нигде не указываю, поэтому не знаю. gtwin, наверное.
|
|
|
|
| постоянный участник
|
Пост N: 562
Зарегистрирован: 27.01.07
|
|
Отправлено: 26.07.11 09:26. Заголовок: rvu пишет: xHarbour..
rvu пишет: цитата: | xHarbour Compiler build 1.0.0 (SimpLex). Терминал я нигде его не указываю, gtwin, наверное. |
| Даже не знаю, работает ли HB_GTInfo в этом xHarbour или нет. Это точно работает в Harbour 3.0.0 (и в 2.0.0 тоже работало) PS. В Harbour сказочно работает gtWVT.
|
|
|
|
| постоянный участник
|
Пост N: 1834
Зарегистрирован: 12.09.06
|
|
Отправлено: 26.07.11 10:52. Заголовок: rvu пишет: xHarbour..
|
|
|
|