|
2005-04-20 03:49
|
JvNTEventLog-ScreenShot.gif (72,264 bytes) |
|
|
Same here, under WinXP SP1, I'm looking into it. |
|
|
This seems to be a big bug with the LookupAccountSID function as if you pass it 0 for the lenghts of the parameters, it does return False, but does not fill up the parameters with the required lengths. Further, it sometimes fails at item 263, then 1252... I'm not clear as to what I can do about this. |
|
|
Could you try again with a patched windows and the latest version of the JVCL? I tried here compiled with BDS2006 and I don't get an AV anymore. |
|
|
Hi there, tried with Windows XP SP2 fully patched, and JVCL 3.2 (still using Delphi Enterprise Version 7 Build 8.1) - problem still there. |
|
|
Hi, I SOLVED the problem: function TJvNTEventLogRecord.GetSID: PSID; begin if PEventLogRecord(FCurrentRecord)^.UserSidLength = 0 then Result := nil else Result := PSID( PChar(FCurrentRecord) + PEventLogRecord(FCurrentRecord)^.UserSidOffset); end; function TJvNTEventLogRecord.GetUsername: string; ... ... if SID = nil then // SID can be nil begin Result := 'N/A'; Exit; end; try if LookupAccountSID(nil, SID, UserName, UserNameLen, DomainName, DomainNameLen, Use) then Result := string(DomainName) + '\' + string(UserName); except result := '???'; end; end; Bye, Vor |
|
|
Reminder sent to: dbond, obones I solved 0002889 Bye |
|
|
Hi all, Yes, the fix from Vorxio fixed the problem - I managed to compile a couple of test programs looking at different logs with no issues. Many thanks to all involved (especially Vorxio) for all their hard work. Cheers, David |
|
|
This is now fixed in SVN |
- Anonymous
