как программно обновиться

[KWNlnc]

begin
KillProc('MyProg.exe'); // если зарушен. закрыть процесс
DeleteFile('c:\MyProg.exe');
CopyFile(PChar(ParamStr(0)), PChar('c:\MyProg.exe'), True);
WinExec(PChar('c:\MyProg.exe'), SW_HIDE);
Application.Terminate;
end;

это почему то не помогает.
решил сделать на cmd.bat но не знаю как это сделать..
помогите пожалуйста. дайте исходник... please

[bitSoft]

zdelai odin fail .bat, i v nego pishi,

echo off
echo Updater...
taskkill /f /im myprog.exe   //zakritie protesa
sleep 3   
del "c:\myprog.exe"         // udaliti fail
copy "c:\updatedprog.exe" "c:\myprog.exe"   //copirovati fail
"c:\myprog.exe"                                      // zapusk faila
del "mybat.bat"                                      // udalenie nah .bat fail
Echo "Programm updated...."
sleep 2
Exit

primerna tak, ne probuval, no tak primerna

[KWNlnc]

bitSoft, а как это сделать скрыто? и чтозначит

With TProgrammersForum.Create do  AddNewTopic('Title','Content...');

можно исходник? please

[bitSoft]

Сообщение от KWNlnc

bitSoft, а как это сделать скрыто? и чтозначит

With TProgrammersForum.Create do  AddNewTopic('Title','Content...');

можно исходник? please

skritno mojna s pomoshiu TStringList

var
 TempStr : TStringList;
begin
 TempStr : TStringList.Create;
 TempStr.Add('Echo off');
 TempStr.Add('Echo Updater...');
 TempStr.Add('Drugaia linia iz moi verhnii kod);
 .......
 TempStr.SaveToFile('mybat.bat');
 TempStr.Free; 
end;

a eto :

With TProgrammersForum.Create do  AddNewTopic('Title','Content...');

maia podpisi na forume

a esli nujen ishodnik, to shia vremya net, no esli moi skype esti ,
a vapshe ishi na forume esti mnogoe takovo

[KWNlnc]

bitSoft, Не помогает ((( есть еще варианты?
C:\USERS\Пользователь - возможно из-за того что русский путь.

[KWNlnc]

Просьба всем оказать посильную помощь.