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

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

Изменение свойств шрифта у кнопки [D5, WinME]


AHTOH ©   (2004-07-13 17:07:00) 

Добрый день, мастера!

Как программно изменить свойства шрифта у кнопки или иного объекта?

пробую так:

...
var
 LogRec : TLOGFONT;
 _hFont : HFONT;
begin
 GetObject(Wnd, SizeOf(LogRec), Addr(LogRec));
 LogRec.lfCharSet := EASTEUROPE_CHARSET;
 LogRec.lfItalic := 1;
 _hFont := CreateFontIndirect(LogRec);
 SendMessage(Btns[3],WM_SETFONT,_hFont,1);
end;


но что-то ничего не выходит. Заранее спасибо


YuRock   (2004-07-13 20:37:00) [1]

Попробуй вместо

GetObject(Wnd, SizeOf(LogRec), Addr(LogRec));

написать

GetObject(SendMessage(Wnd, WM_GETFONT, 0, 0), SizeOf(LogRec), Addr(LogRec));


:)


Наверх

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