Скачать: CL | DM;

Линия   Найти похожие ветки 

← →
Palarm   (2006-11-20 06:46) [0]

Как нарисовать линию в форме? В смысле на вкладке Standard есть GroupBox - прямоугольник, а вот линии нет.

---

← →
Думкин ©   (2006-11-20 06:49) [1]

Оригинально. Рисовать прямоугольник так.
TShape?

---

← →
ASoft   (2006-11-20 07:48) [2]

> Palarm   (20.11.06 06:46)

используя Canvas: LinTo(), MoveTo() или Polygon().. может еще что забыл.
PS: GroupBox по моему, для других целей предназначен. F1 тебе в помощь :)

---

← →
ASoft   (2006-11-20 07:49) [3]

*LinTo() -> LineTo()

---

← →
Palarm   (2006-11-20 07:58) [4]

В Ассеss по крайней мере таких проблем нет. Есть на вкладке прямоугольник и есть линия. Другое дело, что друго там почти ничего и нет. Но это другой вопрос.

---

← →
ASoft   (2006-11-20 08:02) [5]

> Palarm   (20.11.06 07:58) [4]

а на [1] внимание даже не обращаемс...

---

← →
ASoft   (2006-11-20 08:03) [6]

сорри, ...знак вопроса не добавил к [5]

---

← →
Palarm   (2006-11-20 08:16) [7]

Может я и тупой, но почему тогда:

procedure TForm1.FormCreate(Sender: TObject);
begin
 Form1.Canvas.LineTo(100,100);
 Form1.Canvas.MoveTo(200,200);

end;

жму F9 - нет ничего на форме!
Идиотский вопрос: МНЕ НАДО, ЧТОБЫ НА ФОРМЕ БЫЛА ГОРИЗОНТАЛЬНАЯ ЛИНИЯ.

---

← →
ASoft   (2006-11-20 08:24) [8]

> Palarm   (20.11.06 08:16) [7]

осторожней с подобными заявлениями, а то мастера проснутся и отдохнут на этой ветке :)
убери это из TForm1.FormCreate(Sender: TObject) и перенеси в TForm1.FormPaint(Sender: TObject).

---

← →
Palarm   (2006-11-20 08:42) [9]

Вроде работает, а как нарисовать горизонтальную линию? И чтобы она была вдавленной. И потом, это что же выходит, чтоб чиркнуть черточку, мне надо ее программно заводить? Это типа как в старых графопостроителях чертили. Неужели нет просто контрола линия - взял и кинул его на форму и задал атрибуты. Чего то тут Борька не доработал...

---

← →
Anatoly Podgoretsky ©   (2006-11-20 08:49) [10]

> Palarm  (20.11.2006 07:58:04)  [4]

А ты можешь представить очень узкий прямоугольник?

---

← →
Anatoly Podgoretsky ©   (2006-11-20 08:50) [11]

> Palarm  (20.11.2006 08:42:09)  [9]

> И чтобы она была вдавленной.

И после этого ты ее называешь линией - это уже прямоугольник.

---

← →
ЮЮ ©   (2006-11-20 08:53) [12]

Чего то тут Борька не доработал..
Для батонокидателей есть TBevel (Shape = bs[Top|Bottom]Line)  :)

---

← →
ASoft   (2006-11-20 08:55) [13]

> Вроде работает, а как нарисовать горизонтальную линию?

а посмотреть параметры LineTo(), MoveTo() слабо? Ведь там же черным по английскому написано X и Y
попробуй

Form1.Canvas.MoveTo(200,100);// перемещаем
Form1.Canvas.LineTo(100,100); // рисуем
и так до бесконечности :)
> И чтобы она была вдавленной.

можно проще, используй Bevel, поиграйся его свойством Shape

> чтоб чиркнуть черточку, мне надо ее программно заводить

и не только черточку :)

---

← →
ASoft   (2006-11-20 08:59) [14]

ну, вот... проснулись... я, вроде, шепотом, чтоб не разбудить... :))

---

← →
Palarm   (2006-11-20 08:59) [15]

Ура! Свершилось! При высоте=7 ГруппаБоксеров превращается в линию!

---

← →
ASoft   (2006-11-20 09:00) [16]

> Palarm   (20.11.06 08:59) [15]

млин... :(

---

← →
StriderMan ©   (2006-11-20 09:09) [17]

TBevel

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.027 c