![]() |
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]() ![]() ![]() |
|
Spawn |
|
|||
Опытный ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 278 Регистрация: 3.6.2002 Репутация: нет Всего: нет |
При посылке сообщения мыши WM_LBUTTONDOWN Lparam.Lo должно содержать х-координату курсора, а Lparam.Hi - Y-координату. Как при посылке сообщения надо указать эти значения
![]() SendMessage(HWND,WM_LBUTTONDOWN,MK_LBUTTON,???) |
|||
|
||||
adminlion |
|
|||
Новичок Профиль Группа: Участник Сообщений: 27 Регистрация: 14.7.2002 Репутация: нет Всего: нет |
procedure TAdvancedGridInplaceEdit.MouseMove(Shift: TShiftState; X, Y: Integer);
var ListPos: TPoint; MousePos: TSmallPoint; begin if FTracking then begin TrackButton(X, Y); if FListVisible then begin ListPos := FActiveList.ScreenToClient(ClientToScreen(Point(X, Y))); if PtInRect(FActiveList.ClientRect, ListPos) then begin StopTracking; MousePos := PointToSmallPoint(ListPos); SendMessage(FActiveList.Handle, WM_LBUTTONDOWN, 0, Integer(MousePos)); Exit; end; end; end; inherited MouseMove(Shift, X, Y); end; |
|||
|
||||
Dexter |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 1562 Регистрация: 2.7.2002 Где: Москва, Бирюлево Репутация: 1 Всего: 4 |
Корче если проще то я так понял что:
var Point: TPoint; begin Дальше записываешь туда координаты и вставляешь в SendMessage -------------------- The only thing you really know about me is... ...that's all you'll ever know |
|||
|
||||
Baa |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 2639 Регистрация: 12.4.2002 Где: Москва Репутация: нет Всего: 12 |
var
X : WORD; Y : WORD; XY: DWORD; begin X := 100; Y := 10; XY := X or (Y shl 16); SendMessage (Form1.Handle, WM_LBUTTONDOWN, MK_LBUTTON, XY); end; -------------------- "Duty is everything; the greatest of joys, the deepest of sorrows" Aribeth de Tylmarande |
|||
|
||||
Song |
|
|||
![]() Sysman.ru ![]() ![]() ![]() Профиль Группа: Участник Сообщений: 1095 Регистрация: 2.6.2002 Репутация: 2 Всего: 4 |
SendMessage (Form1.Handle, WM_LBUTTONDOWN, MK_LBUTTON,MakeLParam(10,100));
-------------------- Прежде чем сказать "Невозможно", подумай, прав ли ты |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Общие вопросы" | |
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |