Скачать: CL | DM;

TImage   Найти похожие ветки 

← →
Artemkin   (2002-04-30 09:00) [0]

Требуется двигать по форме TImage с задержкой. Как это делать быстро и без моргания???

---

← →
MBo ©   (2002-04-30 09:05) [1]

уменьшить моргание -
doublebuffered:=true;

а может, на канве рисовать ?

---

← →
Artemkin   (2002-04-30 09:24) [2]

А как с задержкой быть ?

---

← →
MBo ©   (2002-04-30 09:34) [3]

Timer1.Timer

image1.left:=image1.left+10;

---

← →
Artemkin   (2002-04-30 09:41) [4]

сильно большое смещение...image1.left:=image1.left +10, надо ..+1 и побыстрее

---

← →
MBo ©   (2002-04-30 10:16) [5]

какое смещение - это уж твое дело

---

← →
Владимир Васильев ©   (2002-04-30 10:52) [6]

Надо буферизировать вывод графики - сначала собираешь картинку в памяти - TBitmap - а потом её копируешь на канву формы

---

← →
Владимир Васильев ©   (2002-04-30 10:54) [7]

И ещё, если прорисовка стоит на OnMouseMove - то надо ограничить вывод разумным пределом - 10-20 раз в секунду.

---

← →
VEG ©   (2002-04-30 17:09) [8]

Короче, кладем на ПАНЕЛЬ (Panel1) все комнпоненты, которые нужно двигать БЕЗ мерцания. Для события OnMouseDown тех компонентов, при клике по которому должно происходить перемещение пишешь:
procedure TForm1.Image1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
ReleaseCapture;
Panel1.perform(WM_SysCommand, $F009, 0);//Двигаем ПАНЕЛЬ!!!
end;

Причем свойство FullRepaint у ПАНЕЛИ (Panel1) ДОЛЖНО стоять в FALSE!!!

---

← →
Doom ©   (2002-05-09 13:04) [9]

> Владимир Васильев © (30.04.02 10:52)
> Надо буферизировать вывод графики - сначала собираешь картинку
> в памяти - TBitmap - а потом её копируешь на канву формы

а если загружен JPG а не битмап, что тогда?
У меня сейчас на этом загвоздка, не знаю что и делать.
Нужно передать изображение по инету. У меня это сделано так. Передает сервер, принимает клиент. Сервер пишет Image1.Picture.Graphic.SaveToStream(MyMemoryStream)
клиент читает Image2.Picture.Graphic.LoadFromStream(MyClientMemoryStream);
все прекрасно получается, НО...у клиента картинка оччень неприятно мигает. КАК от этого избавиться? Оччень надеюсь на помощь.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.009 c