VPF::Есть две точки соединённые линией.

AntonN

Дата 16.2.2009, 01:49 (ссылка)

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

Загрузка ...

Опытный

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

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

Код


for i:=1 to k do
begin
 p1.X:=xx[i]+250;
 p1.Y:=250-yy[i];
 p2.X:=xx[i+1]+250;
 p2.Y:=250-yy[i+1];

попробуй позадавать 10 вершин, будет интересно smile

и так же нужно циклить с 1 до k, но при i=(k) для второй вершины p2 брать первый элемент из массива, а не xx[i+1] (чтобы завершить рисование из последней вершины к первой)

Это сообщение отредактировал(а) AntonN - 16.2.2009, 01:50

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

Kaban4eG

Дата 16.2.2009, 01:49 (ссылка)

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

Загрузка ...

Новичок

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

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

Скрин

Kaban4eG

Дата 16.2.2009, 02:13 (ссылка)

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

Загрузка ...

Новичок

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

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

Цитата

попробуй позадавать 10 вершин, будет интересно smile

долго думает но строит, тока опять же последнюю не замыкает.

Добавлено через 10 минут и 49 секунд

Цитата

попробуй позадавать 10 вершин, будет интересно smile

долго думает но строит, тока опять же последнюю не замыкает.

Добавлено через 12 минут и 43 секунды

Цитата

попробуй позадавать 10 вершин, будет интересно smile

долго думает но строит, тока опять же последнюю не замыкает.

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