button on taskbar

From

Leonid Troyanovsky ()

To

Alex Shakhajlo ()

Date

2001-09-17T16:09Z

Area

SU.WINDOWS.NT.PROG

From: Leonid Troyanovsky <lv.t@eco-pro.ru>

Alex Shakhajlo wrote:

> Как узнать шиpину кнопки на таскбаpе ?

  IMHO, не совсем просто. 
 
    h0 := FindWindow('Shell_TrayWnd', nil);
    h0 := FindWindowEx(h0, 0, 'MSTaskSwWClass', nil);
    h0 := FindWindowEx(h0, 0, 'SysTabControl32', nil);

  т.е. это TabControl принадлежащий Explorer.
  Т.к. это "новый" контрол, то память для prc : TRect
  необходимо VirtualAllocEx в адресном пространстве Explorer.
  Если
  SendMessage(h0, TCM_GETITEMRECT, iItem, LParam(@prc));
  отработал гладко, то можно ReadProcessMemory.

-- 
С уважением,	LVT

ЗЫ Т.к. аварийные завершения Explorer достаточно неприятны,
   потренироваться лучше на чем-то другом.
--- ifmail v.2.15dev5
 * Origin: Demos online service (2:5020/400)