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