Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  Re: CreateSemaphore

    Delphi
    by Unplugged, 11. Sep 2004
  das Problem mit dem Neustart könnte man eventuell noch mit einem FindWindow koppeln. Denn ist der Wert gesetzt, FindWindow liefert aber nil, könnte man dies auf einem Absturz des Programmes theoretisch zurückführen.
• Forum: Win32/Win64 API (native code)

  Re: CreateSemaphore

    Delphi
    by Unplugged, 10. Sep 2004
  @SirThornberry
  
  danke für den Tipp, ich werd das mal probieren
  
  @Christian
  
  das Global eintragen kann ich zwar ohne das er es kritisiert, jedoch ändert sich leider nichts. Man kann es so trotzdem noch mehrfach starten.
  
  
  Edit:
• Forum: Win32/Win64 API (native code)

  CreateSemaphore

    Delphi
    by Unplugged, 10. Sep 2004
  var
  Semaphore: THandle;
  
  
  begin
  ActivationMessage := RegisterWindowMessage(PChar(MyGUID));
  
  Semaphore := CreateSemaphore(nil, 1, 1, PChar(MyGUID));
  
  if (GetLastError = ERROR_ALREADY_EXISTS) then