Ekranda ichma-ich joylashgan va markazlari bir nuqtada bo‘lgan 5 ta aylana chizadigan dastur tuzing

Bilet ¹23, savol ¹3

Javob

Bitta button o‟rnatib, uning prosedurasiga quyidagini yozamiz:
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Canvas.Brush.Color:=clred; form1.Canvas.Ellipse(50,50,450,450);
form1.Canvas.Brush.Color:=clblue; form1.Canvas.Ellipse(100,100,400,400);
form1.Canvas.Brush.Color:=clyellow; form1.Canvas.Ellipse(150,150,350,350);
form1.Canvas.Brush.Color:=clgreen; form1.Canvas.Ellipse(200,200,300,300);
form1.Canvas.Brush.Color:=clgray; form1.Canvas.Ellipse(225,225,275,275); end;

Ko'proq vazifalar

1 2 3

Fan: Informatika fanidan imtixon savollariga javoblar 10 sinf
Bilet: ¹23

"sor-soch.com" © 2024 - Maktab o'quvchilari, abituriyentlar, talabalar va o'qituvchilar uchun ma'lumot portali

Sayt haqida | Maxfiylik siyosati | Kontaktlar