Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 19.03.2010, 18:05   #1
DarkHacker
Форумчанин
 
Аватар для DarkHacker
 
Регистрация: 12.04.2008
Сообщений: 105
Печаль Движение курсора по траектории

Хай! Проблемка есть у меня,хочу я что бы курсор двигался по траектории описывая разлицные геометрические фигуры (элипс,квадрат и т.д.) при этом изменял параметры фигуры (радиус элипса,стороны квадрата). Пока накидал только такой код:

Код:
procedure TForm1.Timer1Timer(Sender: TObject);
  var
pt:TPoint;
dx,dy:integer;
begin
   dx:=1;
   dy:=1;
Application.ProcessMessages;
Screen.Cursor := CrHourglass;
GetCursorPos(pt);
SetCursorPos(pt.x + dx, pt.y - dy);
Application.ProcessMessages;

end;
как быть дальше? ПОмогите!
DarkHacker вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Перемещение рисунка по траектории Noob333 Помощь студентам 1 28.04.2009 10:42
Движение фигуры по траектории Dgohn Общие вопросы Delphi 3 08.01.2009 09:36
Отловить движение курсора, диалоговые сообщения. Deight Общие вопросы Delphi 15 17.11.2008 11:28
движение вокруг тела по заданной траектории PADOCTb Помощь студентам 2 12.10.2008 16:39