Bilet ¹26, savol ¹3
Bitta button o‟rnatib, uning prosedurasiga quyidagini yozamiz:
procedure TForm1.Button1Click(Sender: TObject);
begin
form1.Canvas.Brush.Color:=clred; form1.Canvas.rectangle(50,50,250,250);
form1.Canvas.Brush.Color:=clgreen; form1.Canvas.ellipse(260,50,460,250);
form1.Canvas.Brush.Color:=clblue; form1.Canvas.pie(50,300,250,500,150,0,0,400); end;
Fan:
Informatika fanidan imtixon savollariga javoblar 10 sinf
Bilet: ¹26
"sor-soch.com" © 2024 - Maktab o'quvchilari, abituriyentlar, talabalar va o'qituvchilar uchun ma'lumot portali