как предотвратить мерцание в Tflowpanel? - PullRequest
1 голос
/ 05 мая 2020

Я добавляю элемент управления Timage в Tflowpanel с помощью следующего кода

procedure TForm1.AddToFlow(AGpath : string);
var
aGIF:TGIFImage;
aimage : Timage;
begin

aGIF := TGIFImage.Create;
try

aGIF.LoadFromFile(AGpath);

aimage := Timage.Create(FlOWPANEL);
aimage.Parent  := FlOWPANEL;
aimage.Center := True;
aimage.Picture.Graphic := aGIF;

finally
FreeAndNil(aGIF);
end;


end;

, но каждый раз, когда я добавляю TImage, FlowPanel и время внутри него начинают мерцать. Есть идеи, как избежать мерцания в этом случае?

1 Ответ

1 голос
/ 06 мая 2020

В случае мерцания компонентов вы можете установить свойство DoubleBuffered := True. Это приведет к перерисовке компонента перед его фактическим обновлением на экране.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...