var 
  obj:DQE2_Object;

function Init:boolean;
begin
  result:=true;
end;

function Step:boolean;
begin
  result:=true;
end;

function OnUse(Item:DQE2_Item):integer;
begin
  result:=0;
end;

procedure OnPostRender;
begin
end;

procedure OnPreRender;
begin
end;