Столкнулся сам с такой проблемой! Решения в интернете не нашёл. Решил поделиться успешным экспериментом. На форме Image1 с Align=alClient.
При уменьшении размера формы все работает нормально, а при увеличении белый прямоугольник первоначального размера Image1 не изменяется, за его пределами ничего не рисуется и Image1 мерцает. Размеры выводятся правильные.
Решение:
1. Мерцание исправляется легко - ставим Doublebuffered:=true; и больше не мерцает.
2. Чтобы имиджа адекватно реагировала на изменения размеров формы, нужно всего-лишь сделать следующее:
Code
procedure TForm1.FormResize(Sender: TObject);
begin
Form1.Image1.Picture.Bitmap.Width := Image1.Width;
Form1.Image1.Picture.Bitmap.Height := Image1.Height;
end;
Спасибо за внимание. Читал много вопросов и ни одного ответа. Надеюсь, кому-нибудь пригодится.