"tote" Instanzen finden und beenden?

[himitsu]

Wäre ein until h = 0; nicht besser?

Und statt dem Exit auch noch ein

Delphi-Quellcode:

if ProcessId = 0 then
  Continue;

bzw. bessen auch ein

Delphi-Quellcode:

if ProcessId <> 0 then
begin
  ...
end;

[HeikoAdams]

Zitat von himitsu:

Wäre ein until h = 0; nicht besser?

Nein, weil der Code ja normalerweise mindestens die Instanz, die den Code ausführt, finden sollte

Zitat von himitsu:

Und statt dem Exit auch noch ein

Delphi-Quellcode:

if ProcessId = 0 then
  Continue;

bzw. bessen auch ein

Delphi-Quellcode:

if ProcessId <> 0 then
begin
  ...
end;

Habs ergänzt

[himitsu]

until h = 0; = solange, bis keine Instanz h mehr gefunden wurde

until h <> 0; = springe nach der 1. Instanz raus und wenn garnichts gefunden wurde, dann bleib in einer Endlosschleife hängen.

[HeikoAdams]

Zitat von himitsu:

until h = 0; = solange, bis keine Instanz h mehr gefunden wurde

Aber eine Instanz ist ja immer da - nämlich die, die nach den "toten" Instanzen sucht

Edit:
Hast Recht: until h = 0; ist besser

[shmia]

Wie schaut den jetzt der endgültige Code aus?

[HeikoAdams]

Guckst Du da: http://www.delphipraxis.net/1086701-post7.html

Eventuell schlag ich den Code heute Nachmittag oder Abend für die CodeLib vor