ShellExecute ( 0 ,'open', pchar(path+'updater.exe'),nil, nil, SW_hide);
Close;

program updater;
uses
  windows,shellapi,sysutils;
{$R *.res}
begin
 --- //Ждем пока программа точно закроется, если это не требуется этот кусок можно убрать
 
     repeat
       sleep( 20 );
     until findwindow('TApplication','MySuperPuperSoftina')= 0 ;
 --- 
 
     ShellExecute ( 0 ,'OPEN',pchar(getcurrentdir+'\MySuperPuperSoftina.exe'),nil,nil,sw_show);
end.