Текущий архив: 2006.03.12;
Скачать: CL | DM;

Вниз

Квадрат   Найти похожие ветки 

← →
bolbes   (2006-02-21 13:08) [0]

как нарисовать квадрат на форме

---

← →
Stakan ©   (2006-02-21 13:19) [1]

Form1.Canvas.Rectangle(...)

---

← →
Ega23 ©   (2006-02-21 13:19) [2]


var
cl:TColor;

With Form1.Canvas do
begin
 cl:=Brush.Color;
 Brush.Color:=clRed;
 FillRect(100,100,200,200);
 Brush.Color:=cl;
end;


---

← →
McSimm ©   (2006-02-21 13:24) [3]

Посмотрите TShape

---

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

Текущий архив: 2006.03.12;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.039 c