Thema: Delphi Fragen zur OneInst Unit

Einzelnen Beitrag anzeigen

Hyperspacer

Registriert seit: 23. Apr 2006
53 Beiträge
 
Delphi 7 Personal
 
#1

Fragen zur OneInst Unit

  Alt 21. Mär 2009, 14:27
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
  Mit Zitat antworten Zitat