Форум: "Начинающим";
Текущий архив: 2006.08.20;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.44 MB
Время: 0.042 c