3D Renderer

Does anyone have or know of any source code for a 3D renderer in Delphi?