Opengl. Смена содержания текстуры...

[mildok]

Здравствуйте .
В текущей версии программульки я делал:

Код: Выделить всё

tmpbmp.Handle:=CreateDIBSection(tmpbmp.canvas.handle,BInfo,DIB_RGB_COLORS, bits ,0,0);

tmpbmp - TBitmap
И, в дальнейшем, принимал по сети данные прямо в bits, после чего:

Код: Выделить всё

form1.image1.picture.bitmap:=tmpbmp;

И всё было прекрасно, но получается большая нагрузка на проц, если данные принимаются постоянно...(хотя бы 3 кадра в секунду)
Я думаю, что процесс отображения в TImage нагружает проц.

И поэтому хочу перейти на opengl. Как я понял нужно сформировать текстуру и натянуть на квад - тут всё понятно. Но у меня вопрос появился.
Вопрос: в процессе создания текстуры участвуют функции:

Код: Выделить всё

   gluBuild2DMipmaps(GL_TEXTURE_2D, GL_RGBA, Width, Height, GL_RGBA, GL_UNSIGNED_BYTE, pData);
или
  glTexImage2D(GL_TEXTURE_2D, 0, 3, Width, Height, 0, GL_RGB, GL_UNSIGNED_BYTE, pData);

pData - указатель на область памяти, где лежат данные для текстуры

Так вот - если я данные, которые по сети ко мне приходят, буду загонять в pData будет ли меняться текстура? Или мне нужно будет с каждым новым кадром создавать заново текстуру? Подскажите что-то вроде "динамической текстуры"...
Заранее благодарю ..

[mildok]

Блин, ну опять мне нихто не отвечает... ...Хотя я, конечно, глупый вопрос задал... .
Ну и ладно...буду сам с собою правою рукою, вслух разговаривать .. ..
Способ 1). Действительно, чтобы изменить содержание текстуры нужно всего лишь заюзать функции glTexImage2d, или glTexSubImage2D(предварительно, с помощью glBindTexture, указав текстуру, которую будем менять).

Но - это не совсем то, чего бы хотелось .

Способ 2).Так вот оказывается можно су помощью pData:=glMapBufer, указать волшебную переменную pData, в которой и будут валяться данные текстурки...В дальнейшем, как я понимаю можно просто пихать "данные-по_сети-приходящие" в pData и я буду счастлив..
Конечно, перед glMapBufer надо подготовиться, а именно:

Код: Выделить всё

glGenBuffersARB := wglGetProcAddress('glGenBuffersARB');
glBindBufferARB := wglGetProcAddress('glBindBufferARB');
glMapBufferARB := wglGetProcAddress('glMapBufferARB');
glUnmapBufferARB := wglGetProcAddress('glUnmapBufferARB');
  glBufferDataARB := wglGetProcAddress('glBufferDataARB');

glGenBuffersARB(1,@NameBuf);
glBindBufferARB(GL_PIXEL_UNPACK_BUFFER,NameBuf);
glBufferDataARB(GL_PIXEL_UNPACK_BUFFER,bi.bmWidth*(bi.bmBitsPixel div 8)*bi.bmHeight,0,GL_STREAM_DRAW);
p2:=glMapBufferARB(GL_PIXEL_UNPACK_BUFFER,GL_WRITE_ONLY); //Вызываем glMapBufferARB...Приём-приём...Аллё!
copymemory(p2, p, bi.bmWidth*(bi.bmBitsPixel div 8)*bi.bmHeight);
  glUnmapBufferARB(GL_PIXEL_UNPACK_BUFFER);

...
glFlush;
SwapBuffers(DcPanel); //И ничё на экране не происходит =(


В программе участвовали:
NameBuf:GLuint;
p2,p:Pointer;
DcPanel:HDC;

DcPanle:=getdc(Panel1.handle);

Первый способ у меня получается - второй нет...
В p точно есть данные из Bmp-картинки.

Кстати, в интернете нашёл тысячу и один способ загрузки в Opengl Bitmap'а. Но они какие-то сложные все для проца. Я вот так вот сделал:

Код: Выделить всё

var
    b: TBitmap;   
    bi:BITMAP; 

Begin
b := TBitmap.Create;
b.LoadFromFile('images\Oblogka2.bmp');

//Получаем данные о картинке(нас интересует bi.bmBits - указатель на область памяти, где картинка и находится)
GetObject(b.handle,Sizeof(BITMAP),@bi);
//Дальше - рисуем на текстуре. glBindTexture у меня уже вызвана была, так что тут не надо.
//Говорим Opengl, что строка изображения в памяти должна быть длиной в bi.bmWidth
glPixelStorei(GL_UNPACK_ROW_LENGTH, bi.bmWidth );
//Обновляем текстуру
glTexImage2d(GL_TEXTURE_2D, 0, 3, bi.bmWidth, bi.bmHeight, 0, GL_BGR_EXT, GL_UNSIGNED_BYTE, bi.bmBits);
//Убираем выравнивание
glPixelStorei(GL_UNPACK_ROW_LENGTH, 0 );     

//Прощай - bitmap :'( !
b.free;
End;


Коротенький - красивый способ...
Вопрос : этот способ чреват для меня чем-нибудь, кроме картинки "вверх ногами"? Я потом в opengl переворачиваю картинку, довольно просто:

Код: Выделить всё

glBindTexture(GL_TEXTURE_2D, tex1);
glBegin(GL_QUADS);
   glTexCoord2f(0, 0); glVertex2f(-3, 3);
   glTexCoord2f(0, 1); glVertex2f(-3, -3);
   glTexCoord2f(1, 1); glVertex2f(3, -3);
   glTexCoord2f(1, 0); glVertex2f(3, 3);
glEnd();       


И ещё - glPixelStorei(GL_UNPACK_ROW_LENGTH, bi.bmWidth ); - единственное выравнивание, которое у меня сработало..
Главный вопрос: пичму может не работать 2 способ (ошибок мне никаких не кажет)...