Omega Engine, не работает Pr2D_Circle()

[_-Re@l-_]

Т.е. вот

unit Unit1;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, OMEGA;

type
  TForm1 = class(TForm)
    procedure FormCreate(Sender: TObject);
    procedure FormClick(Sender: TObject);
    procedure FormClose(Sender: TObject; var Action: TCloseAction);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;
  cam : TCamera2D;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
  LoadOMEGA('omega.dll');
end;

procedure TForm1.FormClick(Sender: TObject);
begin
  OE_INIT2(Form1.Handle);
  Pr2D_LineWidth(2);
  Pr2D_Circle(100.0,100.0, 50.0,128,255,32,PR_FILL);
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  OE_QUIT();
end;

end.

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


Update
Ах, вашу ж. Оказывается, надо было зарегать свою процедуру отрисовки через OE_RegProcedure()... Ну кто так строит, кто так строит...

[_-Re@l-_]

Нет желания плодить подобные темы, поэтому спрошу здесь.
Почему OE_GetFPS() постоянно возвращает 0?

[Вадим Буренков]

Юзай ZenGL.

[_-Re@l-_]

Ну хорошо вот только скачал его, и не понял, где там собственно движок.

[Вадим Буренков]

Идешь на www.zengl.org -> download -> ссылка под эмблемой windows. Распаковываешь архив. Там в папке demos рабочие проекты для различных сред. Все должно компилироваться. А сам движок состоит из модулей что в папке src.