U menya est takoy programa:

 Reg := TRegistry.Create;
 try
   Reg.RootKey :=  HKEY_CURRENT_USER;
   Key := 'Software\LBS\ERP\1.81';
   if Reg.OpenKey(Key, True) then
   begin
     v_i:=Reg.ReadInteger('Language');
     if v_i=29 then
        Reg.WriteInteger('Language', 1);
     Reg.CloseKey;
     v_k:=0;
     v_k:=v_k+v_i;
   end;
 finally
   Reg.Free
 end;
 WinExec('U.exe',SW_SHOWNORMAL );

mesta etogo komandi ya xochu soedinit U.exe k moye programe. Kak mogu soedinit 2 exe file v odnu

причем тут Ваш код, смотрите работу с ресурсами...
возможно поможет: http://www.cyberforum.ru/delphi-beginners/thread578700-page2.html