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

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

Клик мыши на StatusBarе [D7, XP]


Alex_C ©   (2006-03-01 15:05:00) 

Как в событии OnMouseClick на StatusBar'е определить, на какой StatusBarPanel был клик?


Alex_C   (2006-03-02 08:28:00) [1]

ОК! Спасибо!


begin...end   (2006-03-01 17:10:00) [2]

> Alex_C ©   (01.03.06 15:47) [2]

uses CommCtrl;

type
 TForm1 = class(TForm)
   StatusBar1: TStatusBar;
 private
   procedure WMNotify(var Message: TWMNotify); message WM_NOTIFY;
 end;

procedure TForm1.WMNotify(var Message: TWMNotify);
begin
 with Message.NMHdr^ do
   if (hwndFrom = StatusBar1.Handle) and (code = NM_CLICK) then
     Caption := IntToStr(PNMMouse(Message.NMHdr).dwItemSpec);
 inherited
end;


Alex_C   (2006-03-01 15:47:00) [3]

Дык это понятно. Думал - может какое готовое средство есть...


clickmaker   (2006-03-01 15:42:00) [4]

GetCursorPos
искать в цикле, пользуясь Panels[i].Width


Наверх

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