游戏引擎

开发平台：

Delphi

C2RenderResourceAdd.Inc：源码内容

							  Result := High(Elements);
  while (Result >= 0) and not IsEmpty(Elements[Result]) do Dec(Result);
  if Result < 0 then begin                                             // No free slot
    SetLength(Elements, Length(Elements)+1);
    Result := High(Elements);
  end;

						