Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Шрифт и его размер в STATIC


Barez ©   (2003-08-19 14:10:00) 

Скажите, как поменять шрифт и размер шрифта в статике?


[lamer]Barmaglot   (2003-08-20 13:39:00) [1]

Как это берешь из ресурса? Ты ж его как-то выводишь на экран. Вообщем покажи код, тогда может кто-то и поможет...


Barez   (2003-08-19 19:44:00) [2]

Только я статик не создаю, а беру из ресурса. Как тогда?

SendMessage(getdlgitem(win,1),wm_setfont,hBarFont,1); ??

не получается.... =(


[lamer]Barmaglot   (2003-08-19 14:17:00) [3]

Может я чего не понимаю?

var
hWnd_Label3: THandle;
hBarFont: HFont;

Создать
hWnd_Label3:=CreateWindowEx(0,"Static","Искать на диске",ws_Child or ws_Visible or SS_CENTER,
0,0,0,0,hWnd, id_Label3,hInstance,nil);

Получить системный шрифт
hBarFont:=getstockobject(Default_Gui_Font);

Установить этот шрифт
SendMessage(hWnd_Label3 ,wm_setfont,hBarFont,1);


Наверх

Титульная страница Поиск, карта сайта Написать письмо