Как создать контекст рендеринга OpenGL на устройстве Android при разработке приложения с помощью Delphi XE5?
В принципе, я не знаю с чего начать. Пока еще нет примеров OpenGL.
Что я ожидаю существовать:
-
Некоторое событие (Panel.OnRender), которое предоставило бы существующий контекст, в котором я мог бы называть вызовы OpenGL.
-
Общий контроль над тегами, который можно поместить в конструктор форм
-
Способ создания контекста в основной форме во время выполнения.
Из моих исследований до сих пор я, что TWindowManager.Render
имеет доступ к вызовам OpenGL и использует их для отображения всплывающих окон.
EDIT: Добавление таймера в форму и вызов этой процедуры заполняет экран зеленым цветом, поэтому контекст GL уже существует:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
glClearColor(0, 1, 0, 0);
glClear(GL_DEPTH_BUFFER_BIT or GL_STENCIL_BUFFER_BIT or GL_COLOR_BUFFER_BIT);
eglSwapBuffers(TCustomAndroidContext.SharedDisplay, TCustomAndroidContext.SharedSurface);
end;
Вопрос в том, как правильно обрабатывать его, поскольку рендеринг на Timer в контролируемой среде определенно плохая идея.