EventLog. Daten, Text, Sourcen, Computer auslesen

[Jackie1983]

Servus,

habe es nun geschafft das wenn ein neuer Eintrag ins Ereignisprotokoll geschrieben wurde
ich eine Meldung bekomme.

Daten auslesen.

Delphi-Quellcode:

  if ReadEventLog(log, EVENTLOG_SEEK_READ or EVENTLOG_FORWARDS_READ, index, pelr, needed, bufsize, needed) then
  begin
    RecNumber := pelr^.RecordNumber;
    EventID := pelr^.EventID;
    //...
  end;

Wie bekomme ich aber den Text, Source, Beschreibung / Meldung, Computer etc. ausgelesen?

mfg