[SpectraL]

При изменении размера компонента TPaintBox его изображение удаляется, поэтому нужно его перерисовывать снова. При изменении размера формы её изображение не удаляется. Можно ли в TPaintBox отключить удаление изображения при изменении размера?

[NumLock]

TPaintBox всего лишь предоставляет контекст для рисования, поэтому изображение на нем может "удаляться". Единственно верным вариантом его использования является рисование изображения в событии OnPaint. В отличии от него, TImage "умеет" хранить нарисованное на нем изображение в своем объекте Picture, которое в нужным момент сам перерисует. Плата за такое "удобство" - быстродействие.

[SpectraL]

А форма не предоставляет "всего лишь контекст для рисования"? На форме, при изменении размера, изображение не удаляется и она не имеет объект 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;

Подобный код (а может это он и есть) должен быть на удаление изображения при изменении размера и вероятно есть какое-то свойство, которое могло бы это отключить.

[angvelem]

Форма также не сохраняет изображение.

[NumLock]

Сообщение от SpectraL

Подобный код (а может это он и есть) должен быть на удаление изображения при изменении размера и вероятно есть какое-то свойство, которое могло бы это отключить.

когда нет изображения, то собственно и нечего удалять

[angvelem]

Проще сказать, Винде по фигу, что имеется на холсте. Задача программиста обновлять холст и следить за его содержанием.

[SpectraL]

angvelem,
1. в Delphi XE7, нарисованное на форме изображение, после изменения размера формы, не удаляется.
2. задача кода - не удалять изображение программиста.

NumLock, изображение есть в Canvas.Pixels.

[angvelem]

Сообщение от SpectraL

... в Delphi XE7, нарисованное на форме изображение, после изменения размера формы, не удаляется...

А теперь попробуй форму задвинуть за край экрана и вернуть назад. Будет интересно.
И не важно какая версия Дельфи.

[angvelem]

Если нужно чтобы изображение не терялось, храни его, к примеру, в битмапе, а процедуре OnPaint TPaintBox-а выводи его.

[SpectraL]

Сообщение от angvelem

А теперь попробуй форму задвинуть за край экрана и вернуть назад. Будет интересно.

Это к изменению размера формы не имеет отношения.

Сообщение от angvelem

Если нужно чтобы изображение не терялось, храни его, к примеру, в битмапе, а процедуре OnPaint TPaintBox-а выводи его.

Я так и делаю. А теперь мне нужно отключить удаление изображения при изменении размера, чтобы избавиться от мерцания.

[icWasya]

, чтобы избавиться от мерцания.

Так бы сразу и сказал.
Для начала Form.DoubleBuffered:=True;

[NumLock]

Сообщение от SpectraL

изображение есть в Canvas.Pixels.

это ты видишь результат последних вызовов GDI функций. в реальности информация о Pixels в TPaintBox нигде не сохраняется, поэтому изображение не сохраняется.

[SpectraL]

Сообщение от icWasya

Так бы сразу и сказал.
Для начала Form.DoubleBuffered:=True;

Стало больше мерцания.

Сообщение от NumLock

это ты видишь результат последних вызовов GDI функций. в реальности информация о Pixels в TPaintBox нигде не сохраняется, поэтому изображение не сохраняется.

Сохраняется в краткосрочной памяти, что также нормально, как и в долгосрочной.

[NumLock]

увеличиваем размер окна, согласись это и есть изменение размеров окна, что должно быть нарисовано во вновь появившейся области? правильно, а фиг его знает) пока сам не нарисуешь там.
так что все работает правильно, неправильно работает программист

[SpectraL]

Сообщение от NumLock

увеличиваем размер окна, согласись это и есть изменение размеров окна, что должно быть нарисовано во вновь появившейся области? правильно, а фиг его знает) пока сам не нарисуешь там.
так что все работает правильно, неправильно работает программист

Да, удаление изображения при изменении размера - вещь правильная, но мне нужно её отключить.