| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Линия
Palarm © (2006-11-20 06:46:00)Как нарисовать линию в форме? В смысле на вкладке Standard есть GroupBox - прямоугольник, а вот линии нет.
StriderMan (2006-11-20 09:09:00) [1]
TBevel
ASoft (2006-11-20 09:00:00) [2]
> Palarm (20.11.06 08:59) [15]
млин... :(
Palarm (2006-11-20 08:59:00) [3]Ура! Свершилось! При высоте=7 ГруппаБоксеров превращается в линию!
ASoft (2006-11-20 08:59:00) [4]ну, вот... проснулись... я, вроде, шепотом, чтоб не разбудить... :))
ASoft (2006-11-20 08:55:00) [5]
> Вроде работает, а как нарисовать горизонтальную линию?
а посмотреть параметры LineTo(), MoveTo() слабо? Ведь там же черным по английскому написано X и Y
попробуй
Form1.Canvas.MoveTo(200,100);// перемещаем
Form1.Canvas.LineTo(100,100); // рисуем
и так до бесконечности :)
> И чтобы она была вдавленной.
можно проще, используй Bevel, поиграйся его свойством Shape
> чтоб чиркнуть черточку, мне надо ее программно заводить
и не только черточку :)
ЮЮ (2006-11-20 08:53:00) [6]Чего то тут Борька не доработал..
Для батонокидателей есть TBevel (Shape = bs[Top|Bottom]Line) :)
Anatoly Podgoretsky (2006-11-20 08:50:00) [7]> Palarm (20.11.2006 08:42:09) [9]
> И чтобы она была вдавленной.
И после этого ты ее называешь линией - это уже прямоугольник.
Anatoly Podgoretsky (2006-11-20 08:49:00) [8]> Palarm (20.11.2006 07:58:04) [4]
А ты можешь представить очень узкий прямоугольник?
Palarm (2006-11-20 08:42:00) [9]Вроде работает, а как нарисовать горизонтальную линию? И чтобы она была вдавленной. И потом, это что же выходит, чтоб чиркнуть черточку, мне надо ее программно заводить? Это типа как в старых графопостроителях чертили. Неужели нет просто контрола линия - взял и кинул его на форму и задал атрибуты. Чего то тут Борька не доработал...
ASoft (2006-11-20 08:24:00) [10]
> Palarm (20.11.06 08:16) [7]
осторожней с подобными заявлениями, а то мастера проснутся и отдохнут на этой ветке :)
убери это из TForm1.FormCreate(Sender: TObject) и перенеси в TForm1.FormPaint(Sender: TObject).
Palarm (2006-11-20 08:16:00) [11]Может я и тупой, но почему тогда:
procedure TForm1.FormCreate(Sender: TObject);
begin
Form1.Canvas.LineTo(100,100);
Form1.Canvas.MoveTo(200,200);
end;
жму F9 - нет ничего на форме!
Идиотский вопрос: МНЕ НАДО, ЧТОБЫ НА ФОРМЕ БЫЛА ГОРИЗОНТАЛЬНАЯ ЛИНИЯ.
ASoft (2006-11-20 08:03:00) [12]сорри, ...знак вопроса не добавил к [5]
ASoft (2006-11-20 08:02:00) [13]
> Palarm (20.11.06 07:58) [4]
а на [1] внимание даже не обращаемс...
Palarm (2006-11-20 07:58:00) [14]В Ассеss по крайней мере таких проблем нет. Есть на вкладке прямоугольник и есть линия. Другое дело, что друго там почти ничего и нет. Но это другой вопрос.
ASoft (2006-11-20 07:49:00) [15]*LinTo() -> LineTo()
ASoft (2006-11-20 07:48:00) [16]
> Palarm (20.11.06 06:46)
используя Canvas: LinTo(), MoveTo() или Polygon().. может еще что забыл.
PS: GroupBox по моему, для других целей предназначен. F1 тебе в помощь :)
Думкин (2006-11-20 06:49:00) [17]Оригинально. Рисовать прямоугольник так.
TShape?
| |
