Текущий архив: 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.043 c
