Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Fragen zur OneInst Unit (https://www.delphipraxis.net/131259-fragen-zur-oneinst-unit.html)

Hyperspacer 21. Mär 2009 14:27


Fragen zur OneInst Unit
 
Hallo zusammen,
Ich habe mal zwei Fragen zu Stellen aus der Unit OneInst:

1) Wo genau liegt beim Erstellen eines Mutex' der Unterschied bei den Fehlern INVALID_HANDLE_VALUE und ERROR_ALREADY_EXISTS? Ich habe dafür in der Windows SDK gelesen, aber für mich steht da, das beide Fehler dann auftauchen, wenn mit dem Paramter lpName schonmal ein Mutex erstellt wurde.

2) Warum wird in der Prodeure HandleSecondInstance erst mit PeekMessage überprüft ob eine Nachricht existiert und diese dann in einem zweiten Schritt mit GetMessage ausgelesen? Warum wird nicht sowohl Überprüfung als auch auslesen mit der selben Funktion gemacht?
Noch mal als Quelltext:

Warum dies:
Delphi-Quellcode:
if PeekMessage(Msg, 0, SecondInstMsgId, SecondInstMsgId, PM_NOREMOVE) then
  begin
    GetMessage(Msg, 0, SecondInstMsgId, SecondInstMsgId);
    if Msg.message = SecondInstMsgId then
      begin
        Wnd := Msg.wParam;
        Break;
      end;
  end;
Warum nicht dies:
Delphi-Quellcode:
if PeekMessage(Msg, 0, SecondInstMsgId, SecondInstMsgId, PM_REMOVE) then
  if Msg.message = SecondInstMsgId then
    begin
      Wnd := Msg.wParam;
      Break;
    end;
Oder dies:
Delphi-Quellcode:
if GetMessage(Msg, 0, SecondInstMsgId, SecondInstMsgId) then
  if Msg.message = SecondInstMsgId then
    begin
      Wnd := Msg.wParam;
      Break;
    end;
Viele Grüße
Daniel


Alle Zeitangaben in WEZ +1. Es ist jetzt 14:44 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz