Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.08.20;
Скачать: CL | DM;

Вниз

картинка вглубь экрана   Найти похожие ветки 

 
vladimirg88   (2006-08-03 10:18) [0]

как мне сделать так, чтобы картинка двигалсь в глубь монитора? желательно через OPENGL


 
StriderMan ©   (2006-08-03 13:10) [1]

а монитор ЖК? он же тонкий, там двигаться некуда. пару сантиметров максимум.

это и без OpenGL делается.


 
clickmaker ©   (2006-08-03 14:25) [2]

while( ... )
do begin
  Картинка.Left := Картинка.Left + 1;
  Картинка.Top := Картинка.Top + 1;
  Картинка.Width := Картинка.Width - 1;
  Картинка.Height := Картинка.Height - 1;
  Sleep(...); // чтобы виден процесс был
end;

если Картинка = TImage, то надо Stretch = true;


 
StriderMan ©   (2006-08-03 15:52) [3]


> bugmaker ©   (03.08.06 14:25) [2]

ничего не будет видно.
Application.ProcessMessages надо в цикл добавить.



Страницы: 1 вся ветка

Текущий архив: 2006.08.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.046 c
15-1153560452
brother
2006-07-22 13:27
2006.08.20
Иконки рабочего стола


15-1153407874
Exception
2006-07-20 19:04
2006.08.20
Пошлость или искусство?


2-1154158166
Батя
2006-07-29 11:29
2006.08.20
Реестр


4-1146038577
tvv
2006-04-26 12:02
2006.08.20
Работа с оборудованием


8-1140432629
sco
2006-02-20 13:50
2006.08.20
Ускорение слайд-шоу