![]() |
|
![]() |
| LogAlpha | LogBytes | LogFloat |
| LogHexBytes | LogNumeric | STRLogAlpha |
type
LogSettingsType = packed record
LogName : array [0 .. 255] of char;
ShowDate : boolean;
ShowTime : boolean;
LogActive : boolean;
end;
const
EmptyLogSettings : LogSettingsType = (LogName : '';
ShowDate : True;
ShowTime : True;
LogActive : True);
procedure LogAlpha
(const LogSettings : LogSettingsType;
const Value : array of char;
const NewLineAfter : boolean); overload; stdcall;
exports LogAlpha (const LogSettings : LogSettingsType;
const Value : array of char;
const NewLineAfter : boolean) name 'ErrorLog_LogAlpha';
procedure LogAlpha
(const LogSettings : LogSettingsType;
const Value : string;
const NewLineAfter : boolean); overload; stdcall;
exports LogAlpha (const LogSettings : LogSettingsType;
const Value : string;
const NewLineAfter : boolean) name 'ErrorLog_STRLogAlpha';
procedure LogNumeric
(const LogSettings : LogSettingsType;
const Value : integer;
const NewLineAfter : boolean); stdcall;
exports LogNumeric name 'ErrorLog_LogNumeric';
procedure LogFloat
(const LogSettings : LogSettingsType;
const Value : ModSys.FLOAT64;
const NewLineAfter : boolean); stdcall;
exports LogFloat name 'ErrorLog_LogFloat';
procedure LogBytes
(const LogSettings : LogSettingsType;
const bValue : pointer;
const numBytes : cardinal;
const NewLineAfter : boolean); stdcall;
exports LogBytes name 'ErrorLog_LogBytes';
procedure LogHexBytes
(const LogSettings : LogSettingsType;
const ValueAdr : pointer;
const numBytes : cardinal); stdcall;
exports LogHexBytes name 'ErrorLog_LogHexBytes';
Send mail to
warren.merrill@inl.gov
with questions or comments about this web site.
Copyright © 1989-2006 Battelle Energy Alliance