Как получить контекст GM8

[FireRun]

Заменил функции таким способом, но все ровно ничего не отображается

Код:

[== Неизвестный ==]
function ViewerGetHandle(viewer: real): real; stdcall;
begin
  result:=Integer(TGLSceneViewer(trunc64(viewer)).ParentWindow);
end;

function ViewerGetRC(): real; stdcall;
begin
  result:=Integer(wglGetCurrentContext());
end;

function ViewerGetDC(viewer: real): real; stdcall;
begin
  result:=Integer(GetDC( TGLSceneViewer(trunc64(viewer)).ParentWindow ));
end;