Das ist egal.
Ob eine Funktion beim Öffnen des "Selben" jeweils eigene
Handle liefert, oder das gleiche
Handle mit einer Referenzzählung, ist ihr überlassen.
Ein unterschiedliches
Handle besagt nichts darüber, was drin ist.
Delphi-Quellcode:
program Project1;
{$APPTYPE CONSOLE}
{$R *.res}
uses
System.SysUtils,
Winapi.Windows;
var
SourceName:
string;
SystemEventLogHandle,
WinDefendEventLogHandle: THandle;
begin
try
SourceName := '
System';
SystemEventLogHandle := OpenEventLog(
nil, @SourceName);
Writeln(SourceName, '
: ', SystemEventLogHandle.ToHexString);
SourceName :='
System';
WinDefendEventLogHandle := OpenEventLog(
nil, @SourceName);
Writeln(SourceName, '
: ', WinDefendEventLogHandle.ToHexString);
except
on E:
Exception do
Writeln(E.ClassName, '
: ', E.
Message);
end;
Readln;
end.
System: 005C1880
System: 005BF928