Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Media";
Текущий архив: 2003.07.28;
Скачать: [xml.tar.bz2];

Вниз

Трехмерная система координат.   Найти похожие ветки 

 
БРУТЪ   (2003-04-02 16:43) [0]

Как вывести (очень желательно пример) ряд точек на канве
TIMAGE с координатами x, y, z.
Мастера, подскажите, есть ли примеры риалтаймового
маштабирования вышеописанного на канве.


 
AlexT1000   (2003-04-02 17:56) [1]

x экрана = x / z
y экрана = y / z
вроде так было


 
com2003   (2003-04-05 18:56) [2]

Проэцировать на экран можно разными способами, в зависимости от функциональности твоей проги(будет ли перемещаться точка зрения и если да, то как).
Вот на счёт масштабирования, то тут надо поработать с матрицами(с их помощью можно сделать любое пребразование: масштабирование, вращение, перемещение ... и всё это вместе).

Для простенького проэцирования подойдёт и вышеописаный способ(хотя я им не пользовался).Для эффекта перемещения точки зрения можешь добавить парочку коэффициентов и потом их изменять, хотя перемещение будет неестественное.
Примерчик:

Procedure DrawPix(x,y,z:integer; k:real);
var col:TColor;
x1,y1:integer;
begin
col:=clGreen;
x1:=x;
y1:=round(y*(1-k)-z*k);
Image1.Canvas.Pixels[x1,y1]:=col;
end;

0<=k<=1, изменяя этот коэффициент можно регулировать высоту точки зрения.



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

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

Наверх





Память: 0.45 MB
Время: 0.005 c
14-91859
petr_v_a
2003-07-11 12:33
2003.07.28
«Общество аплодирует» наезду на Ходорковского


3-91644
Карелин Артем
2003-07-04 08:55
2003.07.28
Цикл в ХП.


1-91759
Alec_
2003-07-14 15:31
2003.07.28
RichEdit


14-91811
Ihor Osov'yak
2003-07-13 01:18
2003.07.28
Ну и как там


3-91686
xmrz
2003-07-06 15:36
2003.07.28
Соединение с IB





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский