Also, ich habs mal probiert und was rausgekriegt. Das neueste eventlog ist lässt sich rauskriegen mit GetNumberOfEventLogs() aus der advapi32.dll. Mit den Funktionen OpenEventLog und ReadEventLog kann man dann die Daten des Logs rauskriegen. Ist aber sehr kompliziert wenn man noch nich so die Übersicht hat.
Das Problem ist, das das System 3 Eventlogs hat (Application, System, Security), die unabhängig voneinander sind. Man muss die alle drei durchsuchen, um den neuesten Eintrag rauszufinden.
Wenn du eine etwas ältere Version von Delphi hast, kann es auch sein, dass dort die Parameter und Flags der o.g. Funktionen noch gar nicht definiert sind. Die stehen aber im PSDK. Da steht auch ein Beispiel in C++ dazu drin.
Wenn du das hast, einfach die Funktion in eventmontray an der richtigen Stelle aufrufen. Fertig.