Показать сообщение отдельно
  #3  
Старый 08.05.2015, 07:16
Аватар для SpectraL
SpectraL SpectraL вне форума
Начинающий
 
Регистрация: 19.05.2011
Адрес: Санкт-Петербург
Сообщения: 112
Версия Delphi: 10.1 Berlin
Репутация: 10
По умолчанию

А форма не предоставляет "всего лишь контекст для рисования"? На форме, при изменении размера, изображение не удаляется и она не имеет объект Picture. Вот, что нашёл в модуле Vcl.ExtCtrls:
Код:
procedure TPaintBox.Paint;
begin
  Canvas.Font := Font;
  Canvas.Brush.Color := Color;
  if csDesigning in ComponentState then
    with Canvas do
    begin
      Pen.Style := psDash;
      Brush.Style := bsClear;
      Rectangle(0, 0, Width, Height);
    end;
  if Assigned(FOnPaint) then FOnPaint(Self);
end;
Подобный код (а может это он и есть) должен быть на удаление изображения при изменении размера и вероятно есть какое-то свойство, которое могло бы это отключить.
Ответить с цитированием