![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Клик мыши на 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