Что за канва передаётся в метод OnPaint контрола PaintBox?

[voytalexey]

Пытаюсь рисовать в PaintBox, но выходит что-то странное.

Пытаюсь для начала залить его цветом, пробовал два варианта:

procedure TForm1.PaintBox1Paint(Sender: TObject; Canvas: TCanvas);
begin
  canvas.Clear(TAlphaColorRec.Greenyellow);   <- вариант 1: заливает всю форму
  PaintBox1.canvas.Clear(TAlphaColorRec.Greenyellow); <- вариант 2: опять заливает всю форму
end;

Но оба варианта заливают всю форму вместо того чтоб залить только сам PaintBox.

Проверял в ХЕ6.

 

В хелпе написано так:

Canvas: The drawing surface of the object to be paint

Я думал что это поверхность самого PaintBox, а получаю залитой всю форму.

И даже во втором варианте, где явно указан компонент.

Почему такое странное поведение?

[voytalexey]

Нашел ответ в теме "В каких координатах выполняется отрисовка на канве?"

[Анатолий]

if PaintBox1.Canvas.BeginScene then

    try

        PaintBox1.canvas.ClearRect(PaintBox1.ChildrenRect,TAlphaColorRec.Greenyellow);

    finally

        PaintBox1.canvas.EndScene;

   end;