Скачать: CL | DM;

Изменение свойств шрифта у кнопки   Найти похожие ветки 

← →
AHTOH   (2004-07-13 17:07) [0]

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

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

пробую так:

...
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) [1]

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

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

написать

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


:)

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.031 c