Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.07.02;
Скачать: CL | DM;

Вниз

OnDblClick в DrawGrid   Найти похожие ветки 

 
Евгений Р.   (2006-05-15 14:24) [0]

Ячейка условно разбита на несколько частей.
Как можно определить по какой части ячейки произведен двойной щеччок мышкой


 
Jeer ©   (2006-05-15 14:31) [1]

OnMouseDown, а дальше сам, ручками


 
unknown ©   (2006-05-15 14:43) [2]

Элементарно :)
procedure TForm1.DrawGrid1DblClick(Sender: TObject);
var
 p:TPoint;
 C:TRect;
begin
 p:=DrawGrid1.ScreenToClient(Mouse.CursorPos);
 with DrawGrid1 do
   C:=CellRect(Col,Row);
 if PtInRect(C,P)  then  // А вдруг щелчек не на ячейке?
   ShowMessage(
     "Координаты относительно DrawGrid1: X:"+IntToStr(P.X)+" Y:"+IntToStr(P.Y)+#13#10+
     "Координаты относительно конкретной ячейки: X:"+IntToStr(P.X-C.Left)+" Y:"+IntToStr(P.Y-C.Top));
end;

Здесь просто локализация курсора относительно ячейки, P.X-C.Left и P.Y-C.Top - конкретные координаты относительно ячейки.
Определить в какой именно части произведен клик - это Вы и сами сделаете.


 
Евгений Р.   (2006-05-15 16:25) [3]

Большое спасибо unknown ©


 
unknown_   (2006-06-03 10:23) [4]

А как учесть скролинг, в DrawGrid?



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

Текущий архив: 2006.07.02;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.041 c
2-1150180566
Тимофей Юрьевич
2006-06-13 10:36
2006.07.02
передача файлов по сети


2-1149843241
VitV
2006-06-09 12:54
2006.07.02
Подсчёт количества строк в DBLookupListBox


2-1150294685
Megabyte
2006-06-14 18:18
2006.07.02
Как "урезать" лишние знаки после запятой у чисел типа real?


2-1149710958
Fiallo4ka
2006-06-08 00:09
2006.07.02
запросы


1-1148291731
DmitryFox
2006-05-22 13:55
2006.07.02
Окна StayOnTop только поверх окон приложения