Prozedur weiterleiten

[Luckie]

@Uwe: Also du schickst von dem Updater ein WM_ENDSESSION. da man diese Nachricht nicht gezielt an ein Fenster verschicken kann, bekommen alle Fenster diese Nachricht. Also auch mein Wordfenster in, dem ich gerade einen Brief schreibe. Dieses reagiert auch auf die Nachricht und beendet sich. Prima. Und was ist jetzt mit meinem Brief an dem ich gerade arbeite? Bestenfalls kommt noch ein Dialog, der mich zum Speichern auffordert. Aber nichts desto trotz, darf ich Woprd neu startet und alle andern Anwendungen, die ich auf hatte eventuell auch. Und das findest du in Ordnung? Kann ich mir nicht vorstellen.

[Bummi]

@Luckie

Wenn Uwe das Handle der jeweiligen Application hat funktioniert es genau so wie es gewünscht ist. Ich weiß nur noch nicht wie er an das Handle kommt.

[Luckie]

Mit FindWindow?

[Bummi]

Ich habe versucht mich durchzuhangeln...
Findwindow findet mein Mainform, wenn ich
Sendmessage(fHandle,WM_Endsession,0,0) mit den Handle des Mainforms abschicke passiert nichts, ich müsste bei Delphi zumindest an das Application.handle kommen, dort wird die Message richtig verarbeitet.
Ein Aufruf an das Fensterhandle von Notepad funktioniert ebenfalls nicht, ich habe versucht über die ProcessId ein gültiges Handle zu ergattern, bis jetzt Fehlanzeige.

[Sir Rufo]

Um mal wieder auf die Ausgangsfrage zurückzukommen

Wozu überhaupt mit WM_QUIT oder sonstigen Nachrichten arbeiten?
Die Klasse ist doch direkt im Programm eingebunden ...

Baue in jedes deiner Programme eine Funktion ein, mit der die Anwendung beendet werden kann.

Diese Funktion übergibst du dann der Klasse und die Klasse ruft einfach diese Funktion auf, fertig.

Delphi-Quellcode:

Unit UpdateKlasse;

interface

type
  TQuitFunc = function : boolean;

  TUpdateKlasse = class
  ...
    Property QuitFunc : TQuitFunc Read FQuitFunc Write FQuitFunc;
 ...
  end;

...

procedure TUpdateClass.UpdateExecute;
begin
  if Assigned( FQuitFunc ) then
    if FQuitFunc then
      RunUpdateProg;
end;

[Bummi]

Zitat:

Die Klasse ist doch direkt im Programm eingebunden ...

bitte alles vergessen was ich geschrieben habe...

[Sir Rufo]

Noch geschickter wäre es ja auch, das Beenden der Anwendung immer noch in die Hände des Users zu legen.

Das Update-Programm wird dann gestartet, wenn die Anwendung wirklich beendet wird:

Delphi-Quellcode:

program MeinProg;

uses
 ...
  UpdateKlasse;

begin
  ...
  if UpdateKlasse.UpdatesPending then
    UpdateKlasse.RunUpdateProg;
end.

Ob das Programm nun über die CallBack-Funktion wirklich beendet wird, oder der User zunächst noch etwas arbeiten möchte ist dabei dann egal. Beim Beenden (und vorhandenem Update) wird das UpdateProgramm gestartet.

Wichtig wäre es natürlich noch zu prüfen, ob die Anwendung mehrfach gestartet wurde.

[Hobby-Programmierer]

Zitat von Sir Rufo:

Noch geschickter wäre es ja auch, das Beenden der Anwendung immer noch in die Hände des Users zu legen.

Könnte man ja auch so wie Windows selbst bei Updates machen. User wird aufgefordert Windows neu gestartet - User entscheidet wann er dies tut und wird nur gelegentlich an das Vorhaben des Updates erinnert. Finde ich pers. als den besten Weg.

[generic]

Warum lässt du nicht den Benutzer die Programme beenden?

Wenn der Updater das Update durchführen will, dann zeigst du den User einen Dialog mit den noch geöffneten Programmen, welche geschlossen werden müssen.
Wenn er die nicht schließen will, startest du einfach das Update nach einen Reboot.

Mal abgesehen davon, wann und wie holst du die Adminrechte für die Installation der Updates?
Kann überhaupt jeder User updaten (hat jeder Adminrechte)?