Eintrag in der Ereignisanzeige

[Falcon37]

Hallo Jungs,

wie kann ich einen Eintrag in der Ereignisanzeige von Windows 2000 setzen.
Ich benutze Delphi 4.

[Andreas Kosch]

Hallo,

falls die Client/Server-Suite von Delphi 4 zur Verfügung steht, kann die von Borland bereitgestellte Klasse <b>TEventLogger</b> verwendet werden:
<pre>
uses SvcMgr;
{-----------------------------------------------------------------}
{ Exception in der Ereignisanzeigen von Windows 2000 vermerken }
{-----------------------------------------------------------------}

procedure LogException(E: Exception);
begin
with TEventLogger.Create('OSLogException') do
begin
LogMessage(E.Message);
Free;
end;
end;
</pre&gt

[Falcon37]

Vielen Dank, funktioniert wunderbar.

Mfg

Karl-Heinz Strna