-
Mamed (09.06.14 16:01) [0]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 -
brother © (09.06.14 16:38) [1]причем тут Ваш код, смотрите работу с ресурсами...
возможно поможет: http://www.cyberforum.ru/delphi-beginners/thread578700-page2.html