[RUS_Hacker]

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

[Decoding]

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

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

Код:

procedure TForm1.FormPaint(Sender: TObject);
const
  Step = 80;
  RadiusX = 0.8;
  RadiusY = 0.5;
var
  i: integer;
  x, y, oldx, oldy: GLfloat;
begin
   glClear( GL_COLOR_BUFFER_BIT );

   oldx := RadiusX * cos( 360/Step*pi/180 );
   oldy := RadiusY * sin( 360/Step*pi/180 );
   for i := 2 to Step+1 do
   begin
      x := RadiusX * cos( 360/Step*i*pi/180 );
      y := RadiusY * sin( 360/Step*i*pi/180 );
      glBegin( GL_LINES );
         glVertex2f( oldx, oldy );
         glVertex2f( x, y );
      glEnd;
      oldx := x;
      oldy := y;
   end;

   SwapBuffers( DC );
end;

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

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

[RUS_Hacker]

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

[Decoding]

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

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

[Decoding]

Вот формулы:

Код:

function GetX(a, b: double): double;
begin
   Result := RadiusX * sin( a ) * cos( b );
end;

function GetY(a, b: double): double;
begin
   Result := RadiusY * sin( a ) * sin( b );
end;

function GetZ(a, b: double): double;
begin
   Result := RadiusY * cos( a );
end;

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

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

Код:

function GetX(a, b: double): double;
begin
   Result := ( RadiusOuter + RadiusInner * cos( a ) ) * cos( b );
end;

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

function GetZ(a, b: double): double;
begin
   Result := RadiusInner * sin( a );
end;

[RUS_Hacker]

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

[Decoding]

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

primer.zip

[RUS_Hacker]

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

[Ruba]

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

[Exai1e]

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