Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Прочее";
Текущий архив: 2006.07.02;
Скачать: [xml.tar.bz2];

Вниз

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;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.093 c
6-1140364701
аноним
2006-02-19 18:58
2006.07.02
как обойти проксю используя EmbeddedWB?


4-1143057564
microcomp2005
2006-03-22 22:59
2006.07.02
Вопрос к знатокам железа по COM портам.


6-1140008368
ZeFiR
2006-02-15 15:59
2006.07.02
простой парсинг XML файлов


2-1150369751
КиТаЯц
2006-06-15 15:09
2006.07.02
Align:= alButton (выстроить в нужном порядке)


2-1150447376
inulik
2006-06-16 12:42
2006.07.02
Нужна помощь, срочно, нужнa программка которая автоматически буде





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский