Текущий архив: 2004.04.11;
Скачать: CL | DM;
Вниз
Как реализовать? Найти похожие ветки
← →
Driver (2004-03-22 07:37) [0]Данный скрипт
Rad = 100; // for example
...
Center1: TPoint; // Center of moving picture
Center2: TPoint; // Center of static picture
...
for i:=0 to 360 do
begin
Alfa := Pi/180; // 2*Pi/360
Center1 := Point(Rad*Cos(Alfa) + Center2.X, Rad*Sin(Alfa) + Center2.Y);
// Hear some output
// hear some pause
end;
Скажите что конкретно нужно разместить на форме чтобы одна картинка двигалась вокруг другой. И какие действия использовать???
← →
Sphinx © (2004-03-22 07:50) [1]> Скажите что конкретно нужно разместить на форме
Картинки, таймер, кнопку->Старт/Стоп вполне хватит
> И какие действия использовать???
События таймера.
Страницы: 1 вся ветка
Текущий архив: 2004.04.11;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.029 c
