Отрисовка полигонов OpenGL

[mnj]

Народ, помогите, плз!
Рисую карту полигонами OpenGL, полигоны в массе своей невыпуклые, тесселирую, часть островов рисуется, часть нет, не понимаю - почему. порядок отрисовки выполняется железно: они предварительно отсортированы - сначала море, потом острова.
Вот тесселяция, на входе номер полигона для генерации списка и список вершин:

procedure TGLForm.Tesselation(MapObjectKey: integer; Points: TList);
var TessObj: GLUTesselator;
    I: integer;
    A: ArrayOfVector; //array of TVector, a TVector = array[0..2] of GLDouble;
    P: TMyPoint;
begin
     TessObj := gluNewTess;
     gluTessCallback(TessObj, GLU_TESS_VERTEX, @glVertex3dv);
     gluTessCallback(TessObj, GLU_TESS_BEGIN, @glBegin);
     gluTessCallback(TessObj, GLU_TESS_END, @glEnd);
     gluTessCallback(TessObj, GLU_TESS_ERROR, @errorCallback);
     gluTessCallback(TessObj, GLU_TESS_COMBINE, @combineCallback);
     gluTessNormal(TessObj,0,0,1);
     gluTessProperty(TessObj, GLU_TESS_WINDING_RULE, GLU_TESS_WINDING_ODD);
    //
     SetLength(A, Points.Count);
     for I := 0 to Points.Count-1 do
     begin
         P:= Points.Items[I];
         A[I,0]:= (P.Lon-StartLon)/Un;
         A[I,1]:= (P.Lat-StartLat)/Un;
         A[I,2]:= 0;
     end;
    glGenLists(1);
     glNewList(MapObjectKey, GL_COMPILE);
     glShadeModel(GL_FLAT);
      gluTessBeginPolygon (TessObj, nil);
       gluTessBeginContour(TessObj);   //начали контур
        for I := 0 to Length(A)-1 do
         gluTessVertex(TessObj, @A[I], @A[I]);
       gluTessEndContour(TessObj);     //закончили контур
      gluTessEndPolygon(TessObj);
     glEndList;
     gluDeleteTess(TessObj);
end;

вот проверка на пересечения:
//  TData = Array [0..4, 0..5] of GLdouble;
//PTVector = ^TVector
// TArray4F = Array [0..3] of GLfloat;
//TVector2 = array[0..6] of GLDouble

procedure combineCallback(coords : PTVector; data : TData;
          weight : TArray4F; var dataout : Pointer); stdcall;
var
   vertex : ^TVector2;  
   i : 3..6;                  
begin
   GetMem (vertex, SizeOf (TVector2));
   vertex^[0] := coords[0];
   vertex^[1] := coords[1];
   vertex^[2] := coords[2];
   For i := 3 to 6 do
      vertex[i] := weight[0] * data[0][i]
                  + weight[1] * data[1][i]
                  + weight[2] * data[2][i]
                  + weight[3] * data[3][i];
   dataOut := vertex;
end;

а включаешь - работает, но не все...

[kutani]

...в OpenGL отрисовка возможна только выпуклыми полигонами. Если конечная фигура образует контур с вогнутыми плоскостями, то вам придется ее разбить на несколько выпуклых полигонов и состыковать геометрически в один объект, как вы уже и делаете, вызывая его через GlCallList() при отрисовке.

[mnj]

...в OpenGL отрисовка возможна только выпуклыми полигонами. Если конечная фигура образует контур с вогнутыми плоскостями, то вам придется ее разбить на несколько выпуклых полигонов и состыковать геометрически в один объект, как вы уже и делаете, вызывая его через GlCallList() при отрисовке.

Это я знаю, только почему-то одни нормально заливаются, другие никак. Я ведь не дырки вырезаю, где направление обхода вершин имеет значение, просто рисую одни полигоны поверх другого. errorCallback не сообщает ничего, поэтому я и в ауте.

[kutani]

Заливаться будут нормально только - выпуклые замкнутые фигуры. Направление обхода для выпуклых полигонов имеет значение: точка с которой начали обход, полигон должен ею же и заканчиваться, т.е. таких точек будет +1.

[mnj]

Сообщение от kutani

Заливаться будут нормально только - выпуклые замкнутые фигуры. Направление обхода для выпуклых полигонов имеет значение: точка с которой начали обход, полигон должен ею же и заканчиваться, т.е. таких точек будет +1.

Именно так и есть - последняя точка в списке координат всегда совпадает с первой. Так выдает при экспорте ГИС Панорама любые площадные объекты, проверено неоднократно. Но по прежнему не рисует (контур для контроля рисуется отдельно из того же списка координат):

[netpolice]

Сообщение от mnj

Именно так и есть - последняя точка в списке координат всегда совпадает с первой. Так выдает при экспорте ГИС Панорама любые площадные объекты, проверено неоднократно. Но по прежнему не рисует (контур для контроля рисуется отдельно из того же списка координат):

А чем Вас GIS ToolKit не устраивает? Платностью?

[mnj]

Сообщение от netpolice

А чем Вас GIS ToolKit не устраивает? Платностью?

Увы, моя задача не решается в GIS ToolKit, я просто использую халявные карты от Панорамы, поскольку формат открытый.

[mnj]

Нашел ошибку, все работает

[kutani]

В чем смысл данного репорта? )

[mnj]

Сообщение от kutani

В чем смысл данного репорта? )

Вопрос решен, его можно закрыть