Delphi code for raytracer user interface