Tilengine 2D Pascal Wrapper!

[Thyandyr]

For Delphi on Windows

1) Change project output directory to ..\..\..\bin\
2) In Benchmark method CreateWindow('A', CWF_NONE); instead of CreateWindow(nil, CWF_NONE);
3) Copy everything from Tilengine-master\lib\win32 to Tilengine-master\bin
4) Compile
5) Open command promt to Tilengine-master\bin
6) Run TileEngine_Benchmark.exe

Now... that makes the benchmark work. I still have no idea what it does, some odd stuff appears on a window and the exe exits gracefully.

C:\Users\Admin\Downloads\Tilengine-master\bin>TileEngine_Benchmark.exe
Tilengine benchmark tool ObjectPascal
http://www.tilengine.org
Normal layer..........
217194570 pixels/s.
Scaling layer..........
331034483 pixels/s.
Affine layer..........
64602961 pixels/s.
Blend layer..........
132780083 pixels/s.
Scaling blend layer...
204255319 pixels/s.
Affine blend layer....
54825814 pixels/s.
Affine blend layer....
423841060 pixels/s.
Colliding sprites......
228571429 pixels/s.

C:\Users\Admin\Downloads\Tilengine-master\bin>

CPU 12.5%

The same project in C outputs:

Tilengine benchmark tool
Written by Megamarc - Jun 1 2017 19:20:44
Library version: 1.13.0
http://www.tilengine.org

Syntax: benchmark format
format : pixel format (16 or 32)

C:\Users\Admin\Downloads\Tilengine-master\bin>

PS. Got to love the authentic look of old CRT pixels