Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Заполнить фигуру цветом

Автор: Sensitive 26.05.2007 4:35

Вот фигуру построила,а как её заполнить цветом не знаю... посмотрите плиз,может подскажите.

uses graph;
const x1=250; y1=350;
R=10;
begin
init;{процедура инициализации граф.режима}
circle(x1,y1,R);
Arc(x1,y1,90,360,3*R);
Arc(x1+6*R,y1,0,180,3*R);
circle(x1+12*R,y1,R);
Arc(x1+12*R,y1,180,90,3*R);
circle(x1+12*R,y1-12*R,R);
Arc(x1+12*R,y1-12*R,270,180,3*R);
Arc(x1+12*R,y1-6*R,90,270,3*R);
circle(x1,y1-12*R,R);
Arc(x1,y1-12*R,0,270,3*R);
Arc(x1+6*R,y1-12*R,180,360,3*R);
Arc(x1,y1-6*R,0,90,3*R);
Arc(x1,y1-6*R,270,360,3*R);
circle(x1+6*R,y1-6*R,10);
readln;
end.

Автор: volvo 26.05.2007 4:40

Что именно надо "залить"? Может, так:

setfillstyle(solidfill, red);
floodfill(x1, y1 + R + 5, white);

(добавить перед ReadLn) ?

Автор: Sensitive 26.05.2007 4:53

спасибо.да так.не знала куда вставить setfillstyle.

Автор: Lapp 26.05.2007 4:54

согласен с volvo, не совсем понятно, что заливать.

Фигура довольно странная.. Прикрепленное изображение

Делал в FPC.


Добавлено через 1 мин.
SetFillStyle - в любое место, главное до вызова FloodFill
Можно сразу после инициализации графики.

Автор: Sensitive 26.05.2007 5:03

да,после того как volvo написал,я поняла что перед floodfill...