Registry Eintrag optimieren?

[omata]

DoAppToRun('Programm', ParamStr(0));