Afslutte program og køre andet

måske du kan bruge det her
http://www.swissdelphicenter.ch/en/showcode.php?id=978

Hvis man læser overskriften '...start a program and wait for its termination' så er lige det modsatte jeg har brug for.

Program1 skal kalde program2, men program1 skal afslutte sig selv først - det lyder meget tricky.

Måske skal jeg lave det på en helt anden måde.....

Jeg vil foreslå dig at du laver en "loader" til dine prg. som checker om du har en opd. hvis laver rename osv. og kører din main-exe og lukker sig selv... det kan du jo godt i den række følge, hvis ingen opdatering skal den gøre det samme bare uden rename exe delen :-)

Når program 1 opdager at der er en ny fil version så skal den terminate program 1 og starte program 2.

Er det så meningen at program 1's *exe opdate skal omdøbes af program 2 og overskrive program 1 *.exe fil.?

du skal jo bare smide det skript i din loader

stone-> det er kort fortalt grundideen jeg har arbejdet med. Men det kan nok ikke lade sige gøre.

HEJ,

Jeg forestiller mig følgende :

1: Umiddelbart før du Terminerer Version (tidligere) starter du et NYT program, som

2: Kører i en lang tidssløjfe (repeat UNTIL ..) mens prgm1 afsluttes. (Kan det checkes via TASK SCHEDULER ?? )

3: Sletter PRGM1:

3AAAAA: Downloader program(VERSION-NY) som en TXT // EKE // Whatever_fil.

(hvis allerede downloaded kan step 3 ignoreres - som du næver )

4: Omdøber VERSION-NY.___  til PROGRAM-NY.EXE


ad 1:  At starte en ny EXE - i Delphi er (relativt) nemt.
(hvis du starter det som "start exe - vent på svar" får du problemer ..... !)
ad 2:  Mener at på swissdelphicenter at have set at det kan lade sig gøre at checke om et prgm er kørende (mange år siden- husker ikke præcist hvor-  er derfor ikke 100% sikker)
ad 3:  At slette en EXE fil forudsætter dog at den er frigivet fra TASK MANAGER. (se 2)
ad 4:  omdøbning - piece of (lady- ) CAKE.. (hvem råber Citronmåne ??? )

KR

Hvad med at downloade en batch fil sammen med det nye program? Denne fil kan saa startes fra det foerste (gamle) program, saa snart download er faerdig.
Batch filen kan f.eks. se saadan ud:

Afslut program 1
Vent paa at program 1 afsluttes
Slet program 1's exe fil
Omdoeb program 2's exe fil
Start program 2
End batch

Start batch filen med f.eks.:
ShellExecute(Handle, 'open', Pointer(ExtractFilepath(Application.Exename) + 'BatchFil.bat'), nil, nil, SW_SHOWNORMAL);

Føreløbigt resultat:
1 - jeg checker om der findes en nyere fil på updateplaceringen(filversion)
2 - jeg starter mit updaterprogram fra applikationen med nogle paramtre
3 - updateren checker om den fil den har fået med som parametre findes på updatesitet og henter den så ned til et temp navn
4 - hvis alt dette er gået godt, så terminerer jeg det kaldende program fra updateren.
5 - jeg renamer temp filene til navnet på det kaldende program
6 - jeg starter det kaldende program igen
7 - jeg afslutter updateren.

Det ser ud til at virke nogenlunde allerede. Der er dog et par detaljer jeg lige skal have styr på. Bl.a. så vises updaterprogrammets form ikke før alt ser ud til at være udført - det er lidt træls.

js_delphi-> hvordan vil du på ShellExecute til at virke i et batch script? Det er da en Delphi ting.

Jeg mente, at du kunne bruge ShellExecute til at udfoerer batch filen fra dit Delphi program.

Efter mange forsøg og roden rundt på nettet, er jeg kommet frem til at jeg laver en ini fil som ligger på min hjemmeside
I mit setup hedder den fileversions.txt, men det kan man selv bestemme i min kode.
Denne fil henter jeg ned og checker om der findes oplysninger om aktuelle program (jeg bruger Application.Tittle) og hvis der gør det får brugeren mulighed for at downloade nyeste version.
Jeg mangler dog stadig at betemme om jeg skal rode videre med at afslutte og starte opdateringen fra programmet.

[CurrentVersions]
VersionControl=2.0.1.1
[DownloadURL]
VersionControl=http://www.hugopedersen.dk/UpdateTest.zip

Class unit findes i http://www.hugopedersen.dk/content/files/U_VersionControl.pas

Jeg vil meget gerne have input til hvad jeg kan gøre bedre.

Kunne jeg få nogle svar fra de implicerede parter så jeg kan del point mellem jer.

HEJ HP,

Hvis du regner mig som en "impliceret" part, ved du, at jeg ikke samler på point, så stryg mig fra din point-liste.

Held og lykke ..

Kristian

Da der åbenbart ikke er andre der ønsker points heller, så lukker jeg her. Så har jeg ryddet op i mine åbne ting.