http://www.gnavi.org/Tools/DelphiToAda.zip
Open Source Visual RAD