VPF::Управление мышкой - Форум программистов

Dapo

Дата 29.10.2002, 17:27 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 417
Регистрация: 18.4.2002

Репутация: нет
Всего: 1

Есть DrawGrid. Нужно чтобы курсор мыши при движении в области этого DrawGrid "прыгал" по его ячейкам. Как это лучше реализовать, какие функции использовать? Спасибо.

--------------------

Pilot Reaction Trainer
Пятнашки под Андроид
Мой блог по AndEngine

rhf

Дата 29.10.2002, 21:25 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 51
Регистрация: 13.8.2002

Репутация: нет
Всего: нет

в обработчике onMouseMove

Код


var
  c,r:integer;
begin
 with Sender as tDrawGrid do
  begin
    MouseToCell(X,Y,c,r);
    if (c>FixedCols-1)and(r>FixedRows-1) then
     begin
       col:=c;
       row:=r;
     end;
  end;
end;

или

Код


with Sender as tDrawGrid do
  begin
    MouseToCell(X,Y,c,r);
    if (c>FixedCols-1) then col:=c;
    if (r>FixedRows-1) then row:=r;
  end;
end;

эффект будет малость другим.

Dapo

Дата 30.10.2002, 12:46 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 417
Регистрация: 18.4.2002

Репутация: нет
Всего: 1

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

Мне же нужно чтобы курсор мыши перескакивал с ячейки на ячейку (предположим в центр ячейки), а не плавно передвигался. Если вопрос был не корректен - сорри.

--------------------

Pilot Reaction Trainer
Пятнашки под Андроид
Мой блог по AndEngine

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Общие вопросы \| Следующая тема »