![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
||||
|
||||
![]() Доброго времени суток.У меня к вам такой вопрос:как можно совместить в программе вывод изображения (.jpg) на канву и рисование на opengl?К примеру, в таком варианте:сначала вывод изображения как фон, а на нем уже рисование методами opengl.Желательно в одном обработчике события onPaint.Вот код рисования треугольника( с двойной буфферизацией)
Код:
procedure TForm1.FormPaint(Sender: TObject); var pic:TJpegImage; begin wglMakeCurrent(Canvas.Handle,hrc); glViewPort(0,0,ClientWidth,ClientHeight); glColor3f(0.2,0.5,0.8); glBegin(GL_TRIANGLES); glVertex2f(-1,-1); glVertex2f(-1,1); glVertex2f(1,0); glEnd(); swapbuffers(canvas.Handle); wglMakeCurrent(0,0); end; Вот метод вывода на канву jpeg'а Код:
pic:=TjpegImage.Create; pic.LoadFromFile('excreman.jpg'); Form1.Canvas.Draw(0,0,pic); Как мне их совместить.чтобы opengl рисовал на картинке как на обычном фоне?Если поставить вывод карт инки ДО рисования opengl, картинка промелькнет и исчезнет,появится картинка opengl.Если ПОСЛЕ команды swapbuffers, то картинка перекроет opengl.Как мне быть???Помогите плз! ![]() ![]() ![]() 2 ОСНОВНЫХ ПРАВИЛА ФОРУМА 1)Админ всегда прав 2)Если админ не прав-смотри пункт 1 |