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

Вниз

framerect пунктиром   Найти похожие ветки 

← →
Chuck Bass   (2012-04-11 14:57) [0]

как нарисовать framerect пунктиром. делаю так, ничего не получается:

 Canvas.Brush.Color := clRed;
 Canvas.Pen.Style := psDashDot;
 Canvas.FrameRect(Bounds(100, 100, 100, 100));

---

← →
Anatoly Podgoretsky ©   (2012-04-11 15:04) [1]

> Chuck Bass  (11.04.2012 14:57:00)  [0]

А Width какой?

---

← →
Юрий Зотов ©   (2012-04-11 16:03) [2]

DrawFocusRect

---

← →
Ega23 ©   (2012-04-11 16:23) [3]

with Canvas do
begin
  Pen.Style:=psDot;
  Pen.Mode:=pmXOR;

  MoveTo(CutFrame.Left,CutFrame.Top);
  LineTo(CutFrame.Right,CutFrame.Top);
  LineTo(CutFrame.Right,CutFrame.Bottom);
  LineTo(CutFrame.Left,CutFrame.Bottom);
  LineTo(CutFrame.Left,CutFrame.Top);
end;

Ну и Style и Mode взат потом верни.

---

← →
Омлет ©   (2012-04-12 13:51) [4]

 with Canvas do
 begin
   Pen.Color := clRed;
   Pen.Style := psDashDot;
   Pen.Mode := pmNotXor;
   Brush.Style := bsClear;
   Rectangle(Bounds(100, 100, 100, 100));
 end;


---

← →
Ega23 ©   (2012-04-12 14:35) [5]

> Rectangle(Bounds(100, 100, 100, 100));


Ну если это именно Rectangle, то можно и так.

---

← →
Омлет ©   (2012-04-12 15:05) [6]

> Ну если это именно Rectangle, то можно и так.

FrameRect круги не рисует.

---

← →
Jeer ©   (2012-04-12 15:21) [7]

А мне нравится "муравьиный" FrameRect :)

---

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

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

Наверх

Память: 0.45 MB
Время: 0.079 c