如何把我的程序的一些提示信息写在WINDOWS2000的事件日志中去?

我想把程序的一些提示信息写到windows2000的事件日志中去?大家有什么好的办法没有,我见过一家做VOD系统的软件公司,就把软件到期事件写在日志中去了,大家有这方面的经念没有,拿出来分享分享!  
  问题点数：50、回复次数：3Top

1 楼1FCSOFT（程序员）回复于 2003-12-03 21:07:41 得分 0

为什么要写到windows的日值里，自己定义日值不是更好，更自由，我看没有必要这么做Top

2 楼outer2000（天外流星）回复于 2003-12-04 09:20:47 得分 50

The   ReportEvent   function   writes   an   entry   at   the   end   of   the   specified   event   log.    
   
  BOOL   ReportEvent(  
   
          HANDLE   hEventLog, //   handle   returned   by   RegisterEventSource    
          WORD   wType, //   event   type   to   log    
          WORD   wCategory, //   event   category    
          DWORD   dwEventID, //   event   identifier    
          PSID   lpUserSid, //   user   security   identifier   (optional)    
          WORD   wNumStrings, //   number   of   strings   to   merge   with   message      
          DWORD   dwDataSize, //   size   of   binary   data,   in   bytes  
          LPCTSTR   *lpStrings, //   array   of   strings   to   merge   with   message    
          LPVOID   lpRawData   //   address   of   binary   data    
        );  
     
   
  Parameters  
   
  hEventLog  
   
  Identifies   the   event   log.   This   handle   is   returned   by   the   RegisterEventSource   function.    
   
  wType  
   
  Specifies   the   type   of   event   being   logged.   This   parameter   can   be   one   of   the   following   values:    
   
  Value Meaning  
  EVENTLOG_ERROR_TYPE Error   event  
  EVENTLOG_WARNING_TYPE Warning   event  
  EVENTLOG_INFORMATION_TYPE Information   event  
  EVENTLOG_AUDIT_SUCCESS Success   Audit   event  
  EVENTLOG_AUDIT_FAILURE Failure   Audit   event  
     
   
  For   more   information   about   event   types,   see   Event   Logging.    
   
  wCategory  
   
  Specifies   the   event   category.   This   is   source-specific   information;   the   category   can   have   any   value.    
   
  dwEventID  
   
  Specifies   the   event   identifier.   The   event   identifier   specifies   the   message   that   goes   with   this   event   as   an   entry   in   the   message   file   associated   with   the   event   source.    
   
  lpUserSid  
   
  Points   to   the   current   user's   security   identifier.   This   parameter   can   be   NULL   if   the   security   identifier   is   not   required.    
   
  wNumStrings  
   
  Specifies   the   number   of   strings   in   the   array   pointed   to   by   the   lpStrings   parameter.   A   value   of   zero   indicates   that   no   strings   are   present.    
   
  dwDataSize  
   
  Specifies   the   number   of   bytes   of   event-specific   raw   (binary)   data   to   write   to   the   log.   If   this   parameter   is   zero,   no   event-specific   data   is   present.    
   
  lpStrings  
   
  Points   to   a   buffer   containing   an   array   of   null-terminated   strings   that   are   merged   into   the   message   before   Event   Viewer   displays   the   string   to   the   user.   This   parameter   must   be   a   valid   pointer   (or   NULL),   even   if   wNumStrings   is   zero.    
   
  lpRawData  
   
  Points   to   the   buffer   containing   the   binary   data.   This   parameter   must   be   a   valid   pointer   (or   NULL),   even   if   the   dwDataSize  
    parameter   is   zero.    
   
     
   
  Return   Values  
   
  If   the   function   succeeds,   the   return   value   is   nonzero,   indicating   that   the   entry   was   written   to   the   log.  
  If   the   function   fails,   the   return   value   is   zero.   To   get   extended   error   information,   call   GetLastError.    
   
  Remarks  
   
  This   function   is   used   to   log   an   event.   The   entry   is   written   to   the   end   of   the   configured   logfile   for   the   source   identified   by   the    
  hEventLog   parameter.   The   ReportEvent   function   adds   the   time,   the   user   name,   the   entry's   length,   and   the   offsets   before   storing   the   entry   in   the   log.    
   
  See   Also  
   
  ClearEventLog,   CloseEventLog,   OpenEventLog,   ReadEventLog,   RegisterEventSourceTop

3 楼outer2000（天外流星）回复于 2003-12-04 09:23:20 得分 0

http://www.delphibyte.com/download/softview.php?softid=198  
  这里有封装好的VCL；Top

相关问题

• windows2000
• word
• 事件
• 日志中去
• event
• handle
• log

• 帖主：photo2000
• outer2000

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载