Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Вниз

Как управлять цветами в Паскале ?   Найти похожие ветки 

← →
Ilya   (2002-04-04 21:49) [2]

Что бы рисовать в ТР нужно сначало иныциализировать графику, Например:

Uses Graph;
Var gd,Gm:Integer;
Begin
InitGraph(Gd,Gm,"Путь, где лежит графический драйвер, например EgaVga.bgi");

Что бы нарисовать прямоугольник можно использовать Rectangle(x1,y1,x2,y2:Integer);

Закрасить: FloodFill(x,y:Integer,Bordel:Word);

Устанавливает цвет линий: SetColor(c:Word);

Стиль закраски: SetFillStyle(pattern:Word,color:Word);

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.04.18;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.43 MB
Время: 0.005 c