uwin32const.pas

楠楠写的DBiocp例子都是源码

unit uWin32Const;

interface

const
  ErrWin32Error       =  0;
  ErrRequiresWin2k    =  1;

  ExceptionMessages: array [0..1] of string =
  (
    'Win32 system error.',
    'This module requires at least NT4 system with SP6.'
  );

implementation

end.