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

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

Как узнать размеры ScrollBar'ов в ScrollBox'е? [D7, XP]

Игорь ©   (2009-10-23 17:01:00) 

Подскажите как можно узнать размеры ScrollBar'ов в ScrollBox'е?

Как вррбще до них добраться?

---

Игорь   (2009-10-23 18:08:00) [1]

Спасибо

Только вот догнать не могу как GetThemeMetric пользовать

var
 Theme: HTHEME;
 DC: HDC;
begin
 if InitThemeLibrary then
 begin
   DC:= GetDC(Form1.Button1.Handle);
   Theme:= OpenThemeData(Form1.Button1.Handle, 'Button');
   GetThemeMetric(Theme, DC, BP_PUSHBUTTON, 0, TMT_WIDTH, Result);
   CloseThemeData(Theme);
   ReleaseDC(Form1.Button1.Handle, DC);
 end;

---

Игорь Шевченко   (2009-10-23 17:10:00) [2]

GetSystemMetrics(SM_CXVSCROLL), GetSystemMetrics(SM_CYHSCROLL) - высота горизонтального скорллбара и ширина вертикального.
Для XP с темами и поздних версий Windows - GetThemeMetrics

---

Наверх