VPF::Изменить линию. - Форум программистов

IamDreamer

Дата 27.4.2008, 13:34 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 867
Регистрация: 6.6.2005

Репутация: нет
Всего: 7

Процедурой LineTo() рисуются 2 линии графика в одной системе координат. Как можно изменить толщину и цвет линий?

THandle

Дата 27.4.2008, 13:36 (ссылка)

(нет голосов)

Загрузка ...

Хранитель Клуба
Group Icon

Награды: 1

Профиль
Группа: Админ
Сообщений: 3639
Регистрация: 31.7.2007
Где: Moscow, Dubai

Репутация: 50
Всего: 372

Код


Canvas.Pen.Width
Canvas.Pen.Color

Добавлено через 1 минуту и 56 секунд
Например:

Код


procedure TForm1.FormPaint(Sender: TObject);
begin
  with Canvas do
    begin
      Moveto(100, 100);
      LineTo(200, 200);
      Pen.Width := 10;
      Pen.Color := clRed;
      LineTo(300, 100);
    end;
end;

ivan219

Дата 27.4.2008, 13:39 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 1121
Регистрация: 19.11.2005
Где: Планета земля

Репутация: 5
Всего: 12

Код


 Canvas.Pen.Width := 2;
 Canvas.Pen.Color := clRed;
 Canvas.LineTo(100, 100);

--------------------

Мой первый сайт и моя первая программа!!!!!

IamDreamer

Дата 27.4.2008, 13:45 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 867
Регистрация: 6.6.2005

Репутация: нет
Всего: 7

Ещё раз спасибо.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Для новичков \| Следующая тема »