![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Глюк! [D7, WinXP]
WondeRu © (2003-11-04 11:23:00)
Код работал нормально около 3 месяцев на 10 компах ежедневно:
procedure TAPolygon.DrawContour;
var i:integer;
begin
glColor3f(0,0,0);
glBegin(GL_LINE_STRIP);
for i:=0 to PolyX.Count-1 do
begin
glVertex2f(x2gl(polyX[i].x),y2gl(polyX[i].y));
end;
glVertex2f(x2gl(polyX[0].x),y2gl(polyX[0].y));
glend;
end;
но в один прекрасный((( день он начал ругаться AV"шниками,
прекращал только если комменитровал строки с glVertex2f.
Помогла только замена на код:
procedure TAPolygon.DrawContour;
var
i : Integer;
begin
glColor3f(0,0,0);
glBegin(GL_LINE_LOOP); <----замена
for i:=0 to PolyX.Count-1 do
glVertex2f(x2gl(polyX[i].x),y2gl(polyX[i].y));
glend;
end;
Не хотелось бы следующий раз попадать в такие вилы)))
Вопрос: Так чем же отличаются параметры GL_LINE_STRIP и GL_LINE_LOOP?
WondeRu (2003-11-06 11:46:00) [1]
>willys © (04.11.03 14:49) [1]
Это я знаю, а чем отличается их реализация?
willys (2003-11-04 14:49:00) [2]
GL_LINE_LOOP соединяет последнюю вершину с первой.