Einzelnen Beitrag anzeigen

Shubit

Registriert seit: 17. Mai 2009
64 Beiträge
 
#9

Re: Programm ohne Umwege beenden

  Alt 17. Nov 2009, 16:09
Ich versuch mal mein Problem genauer zu erklären:
Also ich habe ein kleines einfaches Programm und hab da jetzt just for fun eine Update Funktion eingebaut.
Die Updatefunktion funktioniert wie folgt:
1. falls vorhanden neue exe Datei downloaden
2. eine bat-Datei schreiben/starten und das Programm beenden
3. bat-Datei überschreibt exe Datei mit neuer exe Datei und startet dieses
-> funktioniert so weit

Nun würd ich gern beim Programmstart diese Funktion aufrufen, falls der Bool AutoUpdate in der ini Datei auf falls steht.
Für den Fall den Fall das AutoUpdate auf false steht, soll er normal starten.
Steht AutoUpdate auf true, wird wie gesagt die Update Funktion aufgerufen. Falls sie keine Updates findet, kann das Programm ebenfalls normal starten. Sind Updates vorhanden, sollen die Update Funktion diese wie oben genannt runterladen, das Programm beenden bzw. garnicht erst starten.

Nun die Frage wie macht man das ordentlich?

Kann ich das alles einfach in den Quelltext vom Projekt hauen?

Delphi-Quellcode:
var ini: TIniFile;
begin
  ini := TIniFile.Create(Path + '\settings.ini');
  if ini.ReadBool('Settings','AutoUpdate',false) then
    if FindUpdates then
      if DownloadUpdates then
        Exit;
  ini.free;
  Application.Initialize;
  Application.CreateForm(TFRMMain, FRMMain);
  Application.Run;
end.
function FindUpdates: Boolean
=> gibt true zurück wenn es eine aktuellere Version gibt

function DownloadUpdates: Boolean
=> gibt true zurück wenn Download erfolgreich war

Und wo müsste ich jetzt die Funktion FindUpdates und DownloadUpdates deklarieren?
  Mit Zitat antworten Zitat