[RUS_Hacker]

Вопрос 1:
Как можно поместить объект, нарисованный на OpenGL, в буфер обмена ?
Вопрос 2 (попроще) :
Как нарисовать овал ?
Заранее благодарен

[Decoding]

Как нарисовать овал ?

Если ты имеешь ввиду 2d овал, попробуй так:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

<b>procedure</b> TForm1.FormPaint(Sender: TObject); <b>const</b>   Step = <font color="RoyalBlue">80</font>;   RadiusX = <font color="royalblue">0.8</font>;   RadiusY = <font color="royalblue">0.5</font>; <b>var</b>   i: integer;   x, y, oldx, oldy: GLfloat; <b>begin</b>    glClear( GL_COLOR_BUFFER_BIT );      oldx := RadiusX * cos( <font color="royalblue">360</font>/Step*pi/<font color="royalblue">180</font> );    oldy := RadiusY * sin( <font color="royalblue">360</font>/Step*pi/<font color="royalblue">180</font> );    <b>for</b> i := <font color="royalblue">2</font> <b>to</b> Step+<font color="royalblue">1</font> <b>do</b>    <b>begin</b>       x := RadiusX * cos( <font color="royalblue">360</font>/Step*i*pi/<font color="royalblue">180</font> );       y := RadiusY * sin( <font color="royalblue">360</font>/Step*i*pi/<font color="royalblue">180</font> );       glBegin( GL_LINES );          glVertex2f( oldx, oldy );          glVertex2f( x, y );       glEnd;       oldx := x;       oldy := y;    <b>end</b>;      SwapBuffers( DC ); <b>end</b>;

Как можно поместить объект, нарисованный на OpenGL, в буфер обмена ?

Меня это тоже интересует. Кто знает, напишите...

[RUS_Hacker]

За 2д овал спасибо, но хотелось бы знать как нарисовать 3д овал.

[Decoding]

Где-то у меня были формулы... Вечером посмотрю...

А если ты знаешь как нарисовать сферу, то можешь использовать этот алгоритм, но вместо одного радиуса использовать два, по x и y...

[Decoding]

Вот формулы:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14

<b>function</b> GetX(a, b: double): double; <b>begin</b>    Result := RadiusX * sin( a ) * cos( b ); <b>end</b>;   <b>function</b> GetY(a, b: double): double; <b>begin</b>    Result := RadiusY * sin( a ) * sin( b ); <b>end</b>;   <b>function</b> GetZ(a, b: double): double; <b>begin</b>    Result := RadiusY * cos( a ); <b>end</b>;

a и b - кол-во сторон и граней на стороне соответственно. Сам сможешь нарисовать?

P.S.
Если под 3D овалом ты понимаешь тор, то формулы будут такие:

Код:

1 2 3 4 5 6 7 8 9 10 11 12 13 14

<b>function</b> GetX(a, b: double): double; <b>begin</b>    Result := ( RadiusOuter + RadiusInner * cos( a ) ) * cos( b ); <b>end</b>;   <b>function</b> GetY(a, b: double): double; <b>begin</b>    Result := ( RadiusOuter + RadiusInner * cos( a ) ) * sin( b ); <b>end</b>;   <b>function</b> GetZ(a, b: double): double; <b>begin</b>    Result := RadiusInner * sin( a ); <b>end</b>;

[RUS_Hacker]

Измени меня за мою тупость, но я так и не смог нарисовать 3d овал
Может у тебя есть конкретный пример ?

[Decoding]

Есть и пример.

primer.zip

[RUS_Hacker]

Огромное тебе спасибо !

[Ruba]

По поводу обьекта.
1. Если ты хочешь сделать его простой принтскрин, то это делается через Clipboard. Правда алгоритм выделения самого обьекта получится достаточно сложный... Можно его связать с цветом обьекта или формой, написав что-то типа сканируещей линии, как при заполнении полигонов.
2-й способ. Сохрани координаты обекта и построй его там, где нужно тебе его вставить помощью Opengl или любой другой граф. библиотеки, смотря что юзаешьи смотря куда вставлять надо. Если при этом сделаешь и выделение обьектов с помощью мыши - то ты гений=)
А на счет сферы - бегом иди учить аналитку=)

[Exai1e]

http://forum.mirgames.ru/index.php?s...=0&#entry37805