Яка подія генерується при активізації форми? Позначте одну правильну відповідь.
OnClick
OnCreate
OnPaint
OnResize
Яка подія відбувається, коли поверхня малювання стає недійсною? Позначте одну правильну відповідь.
Які властивості визначають розміри доступної для малювання поверхні форми? Позначте всі правильні відповіді.
Height
ClientWidth
Width
ClientHeight
Як задати зелений колір заливки? Позначте всі правильні відповіді.
Form1.Canvas. Brush.Color := RGBToColor (255,0,0);
Form1.Canvas. Brush.Color := RGBToColor (0,255,0);
Form1.Canvas. Pen.Color := RGBToColor (0,255,0);
Form1.Canvas. Brush.Color := clGreen;
Установіть порядок виконання операторів програми для малювання кола з можливістю масштабування зображення.
dx := Form1.ClientWidth div x;
dy := Form1.ClientHeight div y;
Ellipse(dx, 2*dy, 3*dx, 5*dy);
with Form1.Canvas do
Установіть порядок виконання операторів програми для малювання відрізка, колір і координати кінців якого задані випадковим чином.
Randomize;
Form1.Canvas.LineTo(Random(ClientWidth),Random(ClientHeight));
Form1.Canvas.MoveTo(Random(ClientWidth),Random(ClientHeight));
Form1.Canvas.Pen.Color := RGB(Random(256),Random(256), Random(256));
Визначте, які координати має точка А (див. рисунок), якщо еліпс намальований оператором: Form1.Canvas.Ellipse (10,10,100,100);
Визначте результат малювання оператора For i := 1 to 4 do Canvas.Ellipse(i*100, 100, i*100+100, 200);
4 вкладені прямокутники
4 поряд розташовані прямокутники
4 вкладені кола
4 поряд розташовані кола