this:

http://www.gtatools.com/secret-place/Box.zip

is delphi equivalent translation of this:

http://uk.geocities.com/olivier_rebellion/box.zip

okay, newton and ode outpreform it, but aniway it is a good example.