home *** CD-ROM | disk | FTP | other *** search
/ DP Tool Club 26 / CD_ASCQ_26_1295.iso / vrac / mcbundle.zip / TIME2WIN.ZIP / TIME2WIN.BAS < prev    next >
BASIC Source File  |  1995-08-01  |  76KB  |  1,040 lines

  1. Option Explicit
  2.  
  3. ' definition for win.ini section
  4. Global Const GET_TIME_SEPARATOR = 1
  5. Global Const GET_DATE_SEPARATOR = 2
  6. Global Const GET_TIME_FORMAT = 3
  7. Global Const GET_DATE_FORMAT = 4
  8. Global Const GET_CURRENCY = 5
  9. Global Const GET_LANGUAGE = 6
  10. Global Const GET_COUNTRY = 7
  11. Global Const GET_COUNTRY_CODE = 8
  12. Global Const GET_LIST_SEPARATOR = 9
  13. Global Const GET_DEFAULT_PRINTER = 10
  14.  
  15. ' definition for drive type
  16. Global Const DRIVE_UNKNOW = 0
  17. Global Const DRIVE_REMOVABLE = 2
  18. Global Const DRIVE_FIXED = 3
  19. Global Const DRIVE_REMOTE = 4
  20. Global Const DRIVE_CDROM = 20
  21.  
  22. ' definition for file attributes
  23. Global Const A_NORMAL = &H0             'Normal file - No read/write restrictions
  24. Global Const A_RDONLY = &H1             'Read only file
  25. Global Const A_HIDDEN = &H2             'Hidden file
  26. Global Const A_SYSTEM = &H4             'System file
  27. Global Const A_VOLID = &H8              'Volume ID file
  28. Global Const A_SUBDIR = &H10            'Subdirectory
  29. Global Const A_ARCH = &H20              'Archive file
  30.  
  31. ' definition for encrypt/decrypt
  32. Global Const ENCRYPT_LEVEL_0 = 0
  33. Global Const ENCRYPT_LEVEL_1 = 1
  34. Global Const ENCRYPT_LEVEL_2 = 2
  35. Global Const ENCRYPT_LEVEL_3 = 3
  36. Global Const ENCRYPT_LEVEL_4 = 4
  37.  
  38. ' definition for FILECRC32
  39. Global Const OPEN_MODE_BINARY = 0
  40. Global Const OPEN_MODE_TEXT = 1
  41.  
  42. ' definition for ARRAYONDISK
  43. Global Const PUT_ARRAY_ON_DISK = 0
  44. Global Const GET_ARRAY_ON_DISK = 1
  45.  
  46. ' definition for big numbers
  47. Global Const BIG_ADD = 0
  48. Global Const BIG_SUB = 1
  49. Global Const BIG_MUL = 2
  50.  
  51. ' definition for file version information
  52. Global Const VER_VERSION_PRODUCT = -1
  53. Global Const VER_VERSION_FILE = 0
  54. Global Const VER_COMPANY_NAME = 1
  55. Global Const VER_FILE_DESCRIPTION = 2
  56. Global Const VER_FILE_VERSION = 3
  57. Global Const VER_INTERNAL_NAME = 4
  58. Global Const VER_LEGAL_COPYRIGHT = 5
  59. Global Const VER_LEGAL_TRADEMARKS = 6
  60. Global Const VER_PRODUCT_NAME = 7
  61. Global Const VER_PRODUCT_VERSION = 8
  62.  
  63. ' definition for language in multi-language management
  64. Global Const LNG_FRENCH = 1
  65. Global Const LNG_DUTCH = 2
  66. Global Const LNG_GERMAN = 3
  67. Global Const LNG_ENGLISH = 4
  68. Global Const LNG_ITALIAN = 5
  69. Global Const LNG_SPANISH = 6
  70.  
  71. ' definition for message position in multi-language message box
  72. Global Const MB_MESSAGE_LEFT = 0
  73. Global Const MB_MESSAGE_CENTER = 8192
  74. Global Const MB_MESSAGE_RIGHT = 16384
  75.  
  76. ' definition for timeout management in multi-language message box
  77. Global Const MB_TIMEOUT_2 = 32768
  78. Global Const MB_TIMEOUT_4 = 2 * MB_TIMEOUT_2
  79. Global Const MB_TIMEOUT_8 = 2 * MB_TIMEOUT_4
  80. Global Const MB_TIMEOUT_16 = 2 * MB_TIMEOUT_8
  81.  
  82. Global Const MB_TIMEOUT_6 = MB_TIMEOUT_2 Or MB_TIMEOUT_4
  83. Global Const MB_TIMEOUT_10 = MB_TIMEOUT_2 Or MB_TIMEOUT_8
  84. Global Const MB_TIMEOUT_12 = MB_TIMEOUT_4 Or MB_TIMEOUT_8
  85. Global Const MB_TIMEOUT_14 = MB_TIMEOUT_2 Or MB_TIMEOUT_4 Or MB_TIMEOUT_8
  86. Global Const MB_TIMEOUT_18 = MB_TIMEOUT_2 Or MB_TIMEOUT_16
  87. Global Const MB_TIMEOUT_20 = MB_TIMEOUT_4 Or MB_TIMEOUT_16
  88. Global Const MB_TIMEOUT_22 = MB_TIMEOUT_2 Or MB_TIMEOUT_4 Or MB_TIMEOUT_16
  89. Global Const MB_TIMEOUT_24 = MB_TIMEOUT_8 Or MB_TIMEOUT_16
  90. Global Const MB_TIMEOUT_26 = MB_TIMEOUT_2 Or MB_TIMEOUT_8 Or MB_TIMEOUT_16
  91. Global Const MB_TIMEOUT_28 = MB_TIMEOUT_4 Or MB_TIMEOUT_8 Or MB_TIMEOUT_16
  92. Global Const MB_TIMEOUT_30 = MB_TIMEOUT_2 Or MB_TIMEOUT_4 Or MB_TIMEOUT_8 Or MB_TIMEOUT_16
  93.  
  94. Global Const MB_DISPLAY_TIMEOUT = 524288
  95.  
  96. ' definition for properties for language management
  97. Global Const RS_CAPTION = 1
  98. Global Const RS_TEXT = 2
  99. Global Const RS_DATAFIELD = 4
  100. Global Const RS_DATASOURCE = 8
  101. Global Const RS_TAG = 16
  102.  
  103. ' definition for error type for PATTERNMATCHEXT
  104. Global Const MATCH_HEXA = 17
  105. Global Const MATCH_INTERNAL_ERROR = 16
  106. Global Const MATCH_PATTERN = 15
  107. Global Const MATCH_LITERAL = 14
  108. Global Const MATCH_RANGE = 13
  109. Global Const MATCH_ABORT = 12
  110. Global Const MATCH_END = 11
  111. Global Const MATCH_VALID = -1
  112.  
  113. Global Const PATTERN_VALID = 0
  114. Global Const PATTERN_INVALID = 1
  115. Global Const PATTERN_ESC = 2
  116. Global Const PATTERN_RANGE = 3
  117. Global Const PATTERN_CLOSE = 4
  118. Global Const PATTERN_EMPTY = 5
  119. Global Const PATTERN_INTERNAL_ERROR = 6
  120. Global Const PATTERN_HEXA = 7
  121.  
  122. ' definition for error type for ISFILENAMEVALID
  123. Global Const IFV_ERROR = 0
  124. Global Const IFV_NAME_TOO_LONG = 1
  125. Global Const IFV_EXT_TOO_LONG = 2
  126. Global Const IFV_TOO_MANY_BACKSLASH = 3
  127. Global Const IFV_BAD_DRIVE_LETTER = 4
  128. Global Const IFV_BAD_COLON_POS = 5
  129. Global Const IFV_EXT_WITHOUT_NAME = 6
  130.  
  131. ' definition for variable type in DISK ARRAY
  132. Global Const DA_BYTE = 1
  133. Global Const DA_TYPE = 0
  134. Global Const DA_INTEGER = -2
  135. Global Const DA_LONG = -3
  136. Global Const DA_SINGLE = -4
  137. Global Const DA_DOUBLE = -5
  138. Global Const DA_CURRENCY = -6
  139.  
  140. ' definition for error type in DISK ARRAY
  141. Global Const DA_NO_ERROR = True
  142. Global Const DA_EMPTY_FILENAME = 1
  143. Global Const DA_BAD_FILENAME = 2
  144. Global Const DA_CAN_KILL_FILE = 3
  145. Global Const DA_CAN_NOT_OPEN_FILE = 4
  146. Global Const DA_FILE_NOT_FOUND = 5
  147. Global Const DA_BAD_TYPE = 6
  148. Global Const DA_BAD_ROWS = 7
  149. Global Const DA_BAD_COLS = 8
  150. Global Const DA_BAD_SHEETS = 9
  151. Global Const DA_CAN_NOT_WRITE_HEADER = 10
  152. Global Const DA_CAN_NOT_WRITE_PART = 11
  153. Global Const DA_CAN_NOT_WRITE_REMAIN = 12
  154. Global Const DA_CAN_NOT_READ_HEADER = 13
  155. Global Const DA_HEADER_SIZE = 14
  156. Global Const DA_BAD_SIGNATURE = 15
  157. Global Const DA_FILE_SIZE_MISMATCH = 16
  158. Global Const DA_CAN_NOT_SEEK = 17
  159. Global Const DA_INVALID_HANDLE = 18
  160. Global Const DA_CAN_NOT_READ_PART = 19
  161. Global Const DA_CAN_NOT_READ_REMAIN = 20
  162.  
  163. ' definition for error type in HUGE MEMORY ARRAY
  164. Global Const HMA_NO_ERROR = True
  165. Global Const HMA_NO_MEMORY = 1
  166. Global Const HMA_BAD_TYPE = 2
  167. Global Const HMA_BAD_ROWS = 3
  168. Global Const HMA_BAD_COLS = 4
  169. Global Const HMA_BAD_SHEETS = 5
  170. Global Const HMA_INVALID_HANDLE = 6
  171.  
  172. ' definition for error type in SERIAL DATA
  173. Global Const SD_FILE_NOT_FOUND = 1
  174. Global Const SD_CAN_NOT_OPEN_FILE = 2
  175. Global Const SD_SERIAL_NOT_FOUND = 3
  176.  
  177. ' definition for File I/O
  178. Global Const EOFILE = -1
  179. Global Const SEEK_CUR = 1
  180. Global Const SEEK_END = 2
  181. Global Const SEEK_SET = 0
  182.  
  183. ' definition for file sort
  184. Global Const SORT_ASCENDING = 1
  185. Global Const SORT_DESCENDING = 2
  186. Global Const SORT_CASE_SENSITIVE = 4
  187. Global Const SORT_CASE_INSENSITIVE = 8
  188.  
  189. ' definition for compress/expand
  190. Global Const LZH_ENCODE = True
  191. Global Const LZH_DECODE = False
  192.  
  193. ' definition for PROPERNAME2
  194. Global Const PN_UPPERCASE = 1
  195. Global Const PN_PUNCTUATION = 2
  196. Global Const PN_KEEP_ORIGINAL = 4
  197. Global Const PN_ONLY_LEADER_SPACE = 8
  198.  
  199. ' definition for matrix fill
  200. Global Const MATRIX_ZERO = 0
  201. Global Const MATRIX_UNIT = 1
  202.  
  203. ' definition for FX picture
  204. Global Const FX_HORIZONTAL = 1
  205. Global Const FX_VERTICAL = 2
  206. Global Const FX_DIAGONAL_SQUARE = 3
  207. Global Const FX_RECTANGLE = 4
  208.  
  209. ' structure for splittin path
  210. Type tagSPLITPATH
  211.    nDrive            As String
  212.    nDir              As String
  213.    nName             As String
  214.    nExt              As String
  215. End Type
  216.  
  217. ' structure for file version information
  218. Type tagFILEVERSIONINFO
  219.    VersionProduct    As String
  220.    VersionFile       As String
  221.    CompanyName       As String
  222.    FileDescription   As String
  223.    FileVersion       As String
  224.    InternalName      As String
  225.    LegalCopyright    As String
  226.    LegalTrademarks   As String
  227.    Comments          As String
  228.    ProductName       As String
  229.    ProductVersion    As String
  230. End Type
  231.  
  232. ' structure for file attributes
  233. Type FileAttributeType
  234.    ErrNo             As Integer
  235.    Archive           As Integer
  236.    Hidden            As Integer
  237.    Normal            As Integer
  238.    ReadOnly          As Integer
  239.    SubDir            As Integer
  240.    System            As Integer
  241.    VolId             As Integer
  242. End Type
  243.  
  244. ' structure for VB array
  245. Type ArrayType
  246.    Bounds            As Long
  247.    LBound            As Integer
  248.    UBound            As Integer
  249.    ElemSize          As Integer
  250.    IndexCount        As Integer
  251.    TotalElem         As Integer
  252. End Type
  253.  
  254. ' structure for modules
  255. Type tagMODULEENTRY
  256.    dwSize            As Long
  257.    szModule          As String * 10
  258.    hModule           As Integer
  259.    wcUsage           As Integer
  260.    szExePath         As String * 256
  261.    wNext             As Integer
  262. End Type
  263.  
  264. ' structure for tasks
  265. Type tagTASKENTRY
  266.    dwSize            As Long
  267.    hTask             As Integer
  268.    hTaskParent       As Integer
  269.    hInst             As Integer
  270.    hModule           As Integer
  271.    wSS               As Integer
  272.    wSP               As Integer
  273.    wStackTop         As Integer
  274.    wStackMinimum     As Integer
  275.    wStackBottom      As Integer
  276.    wcEvents          As Integer
  277.    hQueue            As Integer
  278.    szModule          As String * 10
  279.    wPSPOffset        As Integer
  280.    hNext             As Integer
  281. End Type
  282.  
  283. ' structure for disk array
  284. Type tagDISKARRAY
  285.    daSize            As Integer           'size of the type'd
  286.    signature         As String * 7        'signature
  287.    nFilename         As String * 64       'name of the file
  288.    nType             As Integer           'variable type
  289.    nRows             As Long              'number of rows
  290.    nCols             As Long              'number of cols
  291.    nSheets           As Long              'number of sheets
  292.    rHandle           As Integer           'returned handle for use with other functions
  293.    rElementSize      As Integer           'returned size of a element
  294.    rFileSize         As Long              'returned size of the file
  295.    rParts            As Long              'returned total part
  296.    rRemain           As Long              'returned size of the remain part
  297.    rSheetSize        As Long              'size of a sheet
  298.    rOffset1          As Long              'returned offset 1
  299.    rOffset2          As Long              'returned offset 2
  300.    rTime             As Long              'time for the last correct transaction
  301.    nIsTyped          As Integer           'is nType a type'd variable
  302.    Dummy             As String * 7        'reserved for future use
  303. End Type
  304.  
  305. ' structure for multiple disk array
  306. Type tagMULTIPLEDISKARRAY
  307.    daSize               As Integer        'size of the structure
  308.    signature            As String * 7     'signature
  309.    nFilename            As String * 64    'name of the file
  310.    nType(1 To 20)       As Integer        'standard variable type (for 20 arrays)
  311.    nIsTyped(1 To 20)    As Integer        'is a type'd (for 20 arrays)
  312.    nRows(1 To 20)       As Long           'number of rows (for 20 arrays)
  313.    nCols(1 To 20)       As Long           'number of cols (for 20 arrays)
  314.    nSheets(1 To 20)     As Long           'number of sheets (for 20 arrays)
  315.    rHandle              As Integer        'returned handle for use with other functions
  316.    rFileSize            As Long           'returned size of the file
  317.    rElementSz(1 To 20)  As Integer        'returned size of a element (for 20 arrays)
  318.    rSheetSz(1 To 20)    As Long           'size of a sheet (for 20 arrays)
  319.    rOffsetPos(1 To 20)  As Long           'position of each array in the file (for 20 arrays)
  320.    rOffset1             As Long           'returned offset 1
  321.    rOffset2             As Long           'returned offset 2
  322.    rTime                As Long           'time for the last correct transaction
  323.    Dummy                As String * 29    'reserved for future use
  324. End Type
  325.  
  326. ' structure for huge memory array
  327. Type tagHMA
  328.    daSize            As Integer           'size of the type'd
  329.    nType             As Integer           'variable type
  330.    nRows             As Long              'number of rows
  331.    nCols             As Long              'number of cols
  332.    nSheets           As Long              'number of sheets
  333.    rHandle           As Integer           'returned handle for use with other functions
  334.    rElementSize      As Long              'returned size of a element
  335.    rMemorySize       As Long              'returned size of the memory used
  336.    rParts            As Long              'returned total part
  337.    rRemain           As Long              'returned size of the remain part
  338.    rSheetSize        As Long              'size of a sheet
  339.    rOffset           As Long              'returned offset
  340.    nIsTyped          As Integer           'is nType a type'd variable
  341.    Dummy             As String * 20       'reserved for future use
  342. End Type
  343.  
  344. ' structure for serialization
  345. Type tagSERIALDATA
  346.    Description1      As String * 50       'serialization description 1
  347.    Description2      As String * 50       'serialization description 2
  348.    number            As Long              'serialization number
  349.    Dummy             As String * 50       'reserved for future use
  350. End Type
  351.  
  352. ' structure for ARRAYSTRINGONDISK
  353. Type tagVARSTRING
  354.    Contents          As String
  355. End Type
  356.  
  357. ' structure for 2-D geometry types
  358. Type tagVECTOR2
  359.    x                 As Double
  360.    y                 As Double
  361. End Type
  362.  
  363. ' structure for 3-D geometry types
  364. Type tagVECTOR3
  365.    x                 As Double
  366.    y                 As Double
  367.    z                 As Double
  368. End Type
  369.  
  370. ' structure for get/set Media ID
  371. Type tagMEDIAID
  372.    InfoLevel         As Integer
  373.    SerialNumber      As Long
  374.    VolLabel          As String * 11
  375.    FileSysType       As String * 8
  376. End Type
  377.  
  378. ' structure for Get Control Rectangle
  379. Type tagRECT
  380.    Left              As Integer
  381.    Top               As Integer
  382.    Right             As Integer
  383.    Bottom            As Integer
  384. End Type
  385.  
  386. ' structure for 3D-Meter
  387. Type tag3DMeter
  388.    CrtValue          As Long              'current value
  389.    MaxValue          As Long              'maximum value
  390.    BackColor         As Long
  391.    ForeColor         As Long
  392.    Polygon           As Integer           '0  : rectangle, 1 : triangle, 2 : trapezium, 3 : ellipse , 4 : bars
  393.    BarSize           As Integer           'size of a bar (polygon = 4) (in pixel : min=1,max=20,default=10)
  394.    SpaceBars         As Integer           'space between bars (polygon = 4) (in pixel : min=1,max=4,default=2)
  395.    Direction         As Integer           '0  : horizontal, other : vertical
  396.    ThreeD            As Integer           '-1 : indented, 1 : raised
  397.    Thickness         As Integer
  398.    Percent           As Integer           'internal use, do not change
  399.    OldPolygon        As Integer           'internal use, do not change
  400.    OldDirection      As Integer           'internal use, do not change
  401.    OldThreeD         As Integer           'internal use, do not change
  402.    HatchBrush        As Integer           '-1 : solid brush, 0 : hor., 1 : ver., 2 : downward diag., 3 : upward diag., 4 : cross, 5 : diag.cross
  403. End Type
  404.  
  405. Rem Don't Remove It
  406. Declare Sub c3D Lib "time2win.dll" (Ctl As Control, ByVal Method As Integer, ByVal Thickness As Integer)
  407. Declare Sub c3DMeter Lib "time2win.dll" (hCtl As Control, Meter As tag3DMeter)
  408. Declare Function cAddD Lib "time2win.dll" (array() As Double, ByVal nValue As Double) As Integer
  409. Declare Function cAddDigit Lib "time2win.dll" (Txt As String) As Integer
  410. Declare Function cAddI Lib "time2win.dll" (array() As Integer, ByVal nValue As Integer) As Integer
  411. Declare Function cAddL Lib "time2win.dll" (array() As Long, ByVal nValue As Long) As Integer
  412. Declare Function cAddS Lib "time2win.dll" (array() As Single, ByVal nValue As Single) As Integer
  413. Declare Function cAddTime Lib "time2win.dll" (ByVal Hr As Integer) As Integer
  414. Declare Function cAddTwoTimes Lib "time2win.dll" (ByVal Time1 As String, ByVal Time2 As String) As String
  415. Declare Function cAlign Lib "time2win.dll" (Txt As String, ByVal TypeAlign As Integer, ByVal NewLength As Integer) As String
  416. Declare Function cAllSubDirectories Lib "time2win.dll" (ByVal lpBaseDirectory As String, nDir As Integer) As String
  417. Declare Function cAndToken Lib "time2win.dll" (ByVal Txt As String, ByVal Token As String) As Integer
  418. Declare Function cAndTokenIn Lib "time2win.dll" (ByVal Txt As String, ByVal Token As String, ByVal Separator As String) As Integer
  419. Declare Function cArabicToRoman Lib "time2win.dll" (Var As Variant) As String
  420. Declare Sub cArrangeDesktopIcons Lib "time2win.dll" ()
  421. Declare Function cArrayOnDisk Lib "time2win.dll" (ByVal file As String, array() As Any, ByVal GetPut As Integer) As Long
  422. Declare Function cArrayPrm Lib "time2win.dll" (array() As Any, nArray As Any) As Integer
  423. Declare Function cArrayStringOnDisk Lib "time2win.dll" (ByVal file As String, array() As Any, ByVal GetPut As Integer, rRecords As Long) As Long
  424. Declare Function cArrayToComboBox Lib "time2win.dll" (ByVal hWnd As Integer, array() As Any) As Integer
  425. Declare Function cArrayToListBox Lib "time2win.dll" (ByVal hWnd As Integer, array() As Any) As Integer
  426. Declare Function cBaseConversion Lib "time2win.dll" (ByVal Num As String, ByVal RadixIn As Integer, ByVal RadixOut As Integer) As String
  427. Declare Function cBetween Lib "time2win.dll" (Var As Variant, Var1 As Variant, Var2 As Variant) As Integer
  428. Declare Function cBigAdd Lib "time2win.dll" (Num1 As String, Num2 As String) As String
  429. Declare Function cBigDiv Lib "time2win.dll" (Num1 As String, Num2 As String) As String
  430. Declare Function cBigMul Lib "time2win.dll" (Num1 As String, Num2 As String) As String
  431. Declare Function cBigNum Lib "time2win.dll" (ByVal n1 As String, ByVal op As Integer, ByVal n2 As String) As String
  432. Declare Function cBigSub Lib "time2win.dll" (Num1 As String, Num2 As String) As String
  433. Declare Function cBigFmt Lib "time2win.dll" (Num As String, ByVal Length As Integer) As String
  434. Declare Function cBlockCharFromLeft Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  435. Declare Function cBlockCharFromRight Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  436. Declare Sub cCenterWindow Lib "time2win.dll" (ByVal hWnd As Integer)
  437. Declare Sub cChangeChars Lib "time2win.dll" (Txt As String, CharSet As String, NewCharSet As String)
  438. Declare Sub cChangeCharsUntil Lib "time2win.dll" (Txt As String, CharSet As String, NewCharSet As String, nUntil As String)
  439. Declare Sub cChangeTaskName Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String)
  440. Declare Function cChDir Lib "time2win.dll" (ByVal lpDir As String) As Integer
  441. Declare Function cChDrive Lib "time2win.dll" (ByVal lpDrive As String) As Integer
  442. Declare Function cCheckChars Lib "time2win.dll" (Txt As String, CharSet As String) As Integer
  443. Declare Function cCheckLocking Lib "time2win.dll" () As Integer
  444. Declare Function cCheckMinuteChange Lib "time2win.dll" () As Integer
  445. Declare Function cCheckNumericity Lib "time2win.dll" (Txt As String) As Integer
  446. Declare Function cCheckSecondChange Lib "time2win.dll" () As Integer
  447. Declare Function cCheckStatus Lib "time2win.dll" (Ctl As Control) As Integer
  448. Declare Function cCheckTime Lib "time2win.dll" (ByVal Hr As Integer, ByVal Hr1 As Integer, ByVal Hr2 As Integer) As Integer
  449. Declare Function cCheckWait Lib "time2win.dll" (ByVal nTimer As Integer) As Integer
  450. Declare Function cCloseAllEditForm Lib "time2win.dll" () As Integer
  451. Declare Function cHashMD5 Lib "time2win.dll" (Text As String) As String
  452. Declare Function cCmpFileAttribute Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Integer
  453. Declare Function cCmpFileContents Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, ByVal sensitivity As Integer) As Integer
  454. Declare Function cCmpFileSize Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Integer
  455. Declare Function cCmpFileTime Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Integer
  456. Declare Sub cCnvASCIItoEBCDIC Lib "time2win.dll" (Txt As String)
  457. Declare Sub cCnvEBCDICtoASCII Lib "time2win.dll" (Txt As String)
  458. Declare Function cCombination Lib "time2win.dll" (ByVal nItems As Integer, ByVal mTimes As Integer) As Double
  459. Declare Function cCompact Lib "time2win.dll" (Txt As String) As String
  460. Declare Function cCompareTypeString Lib "time2win.dll" Alias "cTypesCompare" (TypeSrc As Any, ByVal Dst As String, ByVal lenTypeSrc As Integer) As Integer
  461. Declare Function cCompareStringType Lib "time2win.dll" Alias "cTypesCompare" (ByVal Src As String, TypeDst As Any, ByVal lenTypeSrc As Integer) As Integer
  462. Declare Function cCompress Lib "time2win.dll" (Txt As String) As String
  463. Declare Function cCompressTab Lib "time2win.dll" (Txt As String, ByVal nTab As Integer) As String
  464. Declare Sub cCtl3D Lib "time2win.dll" (Ctl As Control, ByVal LeftTopColor As Long, ByVal RightBottomColor As Long, ByVal Thickness As Integer)
  465. Declare Function cConvert Lib "time2win.dll" (Value As String, ByVal MaskFrom As String, ByVal MaskTo As String, ByVal size As Integer) As String
  466. Declare Function cCount Lib "time2win.dll" (Txt As String, Separator As String) As Integer
  467. Declare Function cCountDirectories Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  468. Declare Function cCountFiles Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  469. Declare Function cCplAlpha Lib "time2win.dll" (Txt As String) As String
  470. Declare Function cCplDigit Lib "time2win.dll" (Txt As String) As String
  471. Declare Function cCreateAndFill Lib "time2win.dll" (ByVal Length As Integer, Txt As String) As String
  472. Declare Function cCreateBits Lib "time2win.dll" (ByVal nBits As Integer) As String
  473. Declare Function cCurrentTime Lib "time2win.dll" () As Integer
  474. Declare Function cCVB Lib "time2win.dll" (Value As String) As Integer
  475. Declare Function cCVC Lib "time2win.dll" (Value As String) As Currency
  476. Declare Function cCVD Lib "time2win.dll" (Value As String) As Double
  477. Declare Function cCVI Lib "time2win.dll" (Value As String) As Integer
  478. Declare Function cCVL Lib "time2win.dll" (Value As String) As Long
  479. Declare Function cCVS Lib "time2win.dll" (Value As String) As Single
  480. Declare Function cDAClear Lib "time2win.dll" (DISKARRAY As tagDISKARRAY) As Integer
  481. Declare Function cDAClearCol Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long, ByVal sheet As Long) As Integer
  482. Declare Function cDAClearRow Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal sheet As Long) As Integer
  483. Declare Function cDAClearSheet Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal sheet As Long) As Integer
  484. Declare Sub cDAClose Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal DeleteFile As Integer)
  485. Declare Function cDACreate Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal CreateOrUse As Integer) As Integer
  486. Declare Function cDAGet Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long) As Variant
  487. Declare Sub cDAGetType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  488. Declare Sub cDAPut Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, Var As Variant)
  489. Declare Sub cDAPutType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  490. Declare Sub cDArGet Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long, Var As Variant)
  491. Declare Sub cDArGetType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long, nType As Any)
  492. Declare Sub cDArPut Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long, Var As Variant)
  493. Declare Sub cDArPutType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long, nType As Any)
  494. Declare Function cDAsClearCol Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Col As Long) As Integer
  495. Declare Function cDAsClearRow Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long) As Integer
  496. Declare Sub cDAsGet Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  497. Declare Sub cDAsGetType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, nType As Any)
  498. Declare Sub cDAsPut Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  499. Declare Sub cDAsPutType Lib "time2win.dll" (DISKARRAY As tagDISKARRAY, ByVal Row As Long, ByVal Col As Long, nType As Any)
  500. Declare Function cDateToScalar Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer, ByVal nDay As Integer) As Long
  501. Declare Function cDayOfWeek Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer, ByVal nDay As Integer, ByVal nISO As Integer) As Integer
  502. Declare Function cDayOfYear Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer, ByVal nDay As Integer) As Integer
  503. Declare Function cDaysInMonth Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer) As Integer
  504. Declare Sub cDecrI Lib "time2win.dll" (Value As Integer)
  505. Declare Sub cDecrL Lib "time2win.dll" (Value As Long)
  506. Declare Function cDecrypt Lib "time2win.dll" (Txt As String, password As String, ByVal level As Integer) As String
  507. Declare Function cDeviationD Lib "time2win.dll" (array() As Double) As Double
  508. Declare Function cDeviationI Lib "time2win.dll" (array() As Integer) As Double
  509. Declare Function cDeviationL Lib "time2win.dll" (array() As Long) As Double
  510. Declare Function cDeviationS Lib "time2win.dll" (array() As Single) As Double
  511. Declare Sub cDisableCtlRedraw Lib "time2win.dll" (Ctl As Control)
  512. Declare Sub cDisableFI Lib "time2win.dll" (Ctl As Control)
  513. Declare Sub cDisableForm Lib "time2win.dll" (ByVal hWnd As Integer)
  514. Declare Sub cDisableRedraw Lib "time2win.dll" (ByVal hWnd As Integer)
  515. Declare Function cDOSGetMediaID Lib "time2win.dll" (ByVal nDrive As String, MEDIAID As tagMEDIAID) As Integer
  516. Declare Function cDOSGetVolumeLabel Lib "time2win.dll" (ByVal nDrive As String) As String
  517. Declare Function cDOSSetMediaID Lib "time2win.dll" (ByVal nDrive As String, MEDIAID As tagMEDIAID) As Integer
  518. Declare Function cDOSSetVolumeLabel Lib "time2win.dll" (ByVal nDrive As String, ByVal nVolumeLabel As String) As Integer
  519. Declare Sub cEnableCtlRedraw Lib "time2win.dll" (Ctl As Control)
  520. Declare Sub cEnableFI Lib "time2win.dll" (Ctl As Control)
  521. Declare Sub cEnableForm Lib "time2win.dll" (ByVal hWnd As Integer)
  522. Declare Sub cEnableRedraw Lib "time2win.dll" (ByVal hWnd As Integer)
  523. Declare Function cEncrypt Lib "time2win.dll" (Txt As String, password As String, ByVal level As Integer) As String
  524. Declare Function cEXEnameActiveWindow Lib "time2win.dll" () As String
  525. Declare Function cEXEnameWindow Lib "time2win.dll" (ByVal hModule As Integer) As String
  526. Declare Function cEXEnameTask Lib "time2win.dll" (ByVal nFilename As String) As String
  527. Declare Function cExitWindowsAndExecute Lib "time2win.dll" (ByVal lpszExe As String, ByVal lpszParams As String) As Integer
  528. Declare Function cExpandTab Lib "time2win.dll" (Txt As String, ByVal nTab As Integer) As String
  529. Declare Function cFileChangeChars Lib "time2win.dll" (ByVal nFilename As String, CharSet As String, NewCharSet As String, ByVal nFileTemp As String) As Long
  530. Declare Function cFileCompress Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Long
  531. Declare Function cFileCompressTab Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, ByVal nTab As Integer) As Long
  532. Declare Function cFileCopy Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Long
  533. Declare Function cFileCRC32 Lib "time2win.dll" (ByVal lpFilename As String, ByVal Mode As Integer) As Long
  534. Declare Function cFileDateCreated Lib "time2win.dll" (ByVal lpFilename As String) As String
  535. Declare Function cFileDecrypt Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, password As String, ByVal level As Integer) As Long
  536. Declare Function cFileDrive Lib "time2win.dll" (ByVal lpFilename As String) As String
  537. Declare Function cFileEncrypt Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, password As String, ByVal level As Integer) As Long
  538. Declare Function cFileExpand Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Long
  539. Declare Function cFileExpandTab Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, ByVal nTab As Integer) As Long
  540. Declare Function cFileFilter Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, Filter As String) As Long
  541. Declare Function cFileFilterNot Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, Filter As String) As Long
  542. Declare Function cFileGetAttrib Lib "time2win.dll" (ByVal nFilename As String, nFileAttribute As Any) As Integer
  543. Declare Function cFileLastDateAccess Lib "time2win.dll" (ByVal lpFilename As String) As String
  544. Declare Function cFileLastDateModified Lib "time2win.dll" (ByVal lpFilename As String) As String
  545. Declare Function cFileLastTimeAccess Lib "time2win.dll" (ByVal lpFilename As String) As String
  546. Declare Function cFileLastTimeModified Lib "time2win.dll" (ByVal lpFilename As String) As String
  547. Declare Function cFileLineCount Lib "time2win.dll" (ByVal lpFilename As String) As Long
  548. Declare Function cFileMerge Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String, ByVal fileTo As String) As Long
  549. Declare Function cFilePathExists Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  550. Declare Function cFileResetAllAttrib Lib "time2win.dll" (ByVal nFilename As String) As Integer
  551. Declare Function cFileResetArchive Lib "time2win.dll" (ByVal nFilename As String) As Integer
  552. Declare Function cFileResetFlag Lib "time2win.dll" (ByVal nFilename As String, ByVal nStatus As Integer) As Integer
  553. Declare Function cFileResetHidden Lib "time2win.dll" (ByVal nFilename As String) As Integer
  554. Declare Function cFileResetReadOnly Lib "time2win.dll" (ByVal nFilename As String) As Integer
  555. Declare Function cFileResetSystem Lib "time2win.dll" (ByVal nFilename As String) As Integer
  556. Declare Function cFileSearch Lib "time2win.dll" (ByVal nFilename As String, ByVal Search As String, ByVal sensitivity As Integer) As Long
  557. Declare Function cFileSearchAndReplace Lib "time2win.dll" (ByVal nFilename As String, ByVal Search As String, ByVal Replace As String, ByVal nFileTemp As String, ByVal sensitivity As Integer) As Long
  558. Declare Function cFileSearchCount Lib "time2win.dll" (ByVal nFilename As String, ByVal Search As String, ByVal sensitivity As Integer) As Long
  559. Declare Function cFileSetAllAttrib Lib "time2win.dll" (ByVal nFilename As String) As Integer
  560. Declare Function cFileSetArchive Lib "time2win.dll" (ByVal nFilename As String) As Integer
  561. Declare Function cFileSetAttrib Lib "time2win.dll" (ByVal nFilename As String, nFileAttribute As Any) As Integer
  562. Declare Function cFileSetFlag Lib "time2win.dll" (ByVal nFilename As String, ByVal nStatus As Integer) As Integer
  563. Declare Function cFileSetHidden Lib "time2win.dll" (ByVal nFilename As String) As Integer
  564. Declare Function cFileSetReadOnly Lib "time2win.dll" (ByVal nFilename As String) As Integer
  565. Declare Function cFileSetSystem Lib "time2win.dll" (ByVal nFilename As String) As Integer
  566. Declare Function cFilesInDirectory Lib "time2win.dll" (ByVal nFilename As String, ByVal FirstNext As Integer) As String
  567. Declare Function cFileSize Lib "time2win.dll" (ByVal lpFilename As String) As Long
  568. Declare Function cFileSort Lib "time2win.dll" (ByVal FileIn As String, ByVal FileOut As String, ByVal SortMethod As Integer, ByVal RecordLength As Long, ByVal KeyOffset As Long, ByVal KeyLength As Long, rRecords As Integer) As Long
  569. Declare Function cFilesSize Lib "time2win.dll" (ByVal nFilename As String) As Long
  570. Declare Function cFilesSizeOnDisk Lib "time2win.dll" (ByVal nFilename As String) As Long
  571. Declare Function cFilesSlack Lib "time2win.dll" (ByVal nFilename As String, Size1 As Long, Size2 As Long) As Integer
  572. Declare Function cFileStatistics Lib "time2win.dll" (ByVal nFilename As String, nLines As Long, nWords As Long, nChars As Long) As Long
  573. Declare Function cFileTimeCreated Lib "time2win.dll" (ByVal lpFilename As String) As String
  574. Declare Function cFileToComboBox Lib "time2win.dll" (ByVal hWnd As Integer, ByVal nFile As String) As Integer
  575. Declare Function cFileToListBox Lib "time2win.dll" (ByVal hWnd As Integer, ByVal nFile As String) As Integer
  576. Declare Function cFileToUpper Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Long
  577. Declare Function cFileToLower Lib "time2win.dll" (ByVal file1 As String, ByVal file2 As String) As Long
  578. Declare Sub cFill Lib "time2win.dll" (Txt As String, Fill As String)
  579. Declare Function cFillD Lib "time2win.dll" (array() As Double, ByVal nValue As Double) As Integer
  580. Declare Function cFillI Lib "time2win.dll" (array() As Integer, ByVal nValue As Integer) As Integer
  581. Declare Function cFillL Lib "time2win.dll" (array() As Long, ByVal nValue As Long) As Integer
  582. Declare Function cFillS Lib "time2win.dll" (array() As Single, ByVal nValue As Single) As Integer
  583. Declare Function cFillIncrD Lib "time2win.dll" (array() As Double, ByVal nValue As Double, ByVal Increment As Double) As Integer
  584. Declare Function cFillIncrI Lib "time2win.dll" (array() As Integer, ByVal nValue As Integer, ByVal Increment As Integer) As Integer
  585. Declare Function cFillIncrL Lib "time2win.dll" (array() As Long, ByVal nValue As Long, ByVal Increment As Long) As Integer
  586. Declare Function cFillIncrS Lib "time2win.dll" (array() As Single, ByVal nValue As Single, ByVal Increment As Single) As Integer
  587. Declare Function cFilterBlocks Lib "time2win.dll" (Txt As String, Delimitor As String) As String
  588. Declare Function cFilterChars Lib "time2win.dll" (Txt As String, CharSet As String) As String
  589. Declare Function cFilterFirstChars Lib "time2win.dll" (Txt As String, CharSet As String) As String
  590. Declare Function cFilterNotChars Lib "time2win.dll" (Txt As String, CharSet As String) As String
  591. Declare Function cFindBitReset Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As Integer
  592. Declare Function cFindBitSet Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As Integer
  593. Declare Function cFindFileInEnv Lib "time2win.dll" (ByVal lpFilename As String, ByVal lpEnv As String) As Integer
  594. Declare Function cFindFileInPath Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  595. Declare Function cFloppyInfo Lib "time2win.dll" (ByVal nDrive As String, nHeads As Integer, nCylinders As Integer, nSectors As Integer) As Integer
  596. Declare Function cFromBinary Lib "time2win.dll" (Text As String) As String
  597. Declare Function cFromBinary2 Lib "time2win.dll" (Text As String, Bin As String) As String
  598. Declare Function cFromHexa Lib "time2win.dll" (Text As String) As String
  599. Declare Function cFullPath Lib "time2win.dll" (ByVal nFilename As String) As String
  600. Declare Function cFXpicture Lib "time2win.dll" (ByVal Method As Integer, ByVal hdc1 As Integer, ByVal hbitmap As Integer, ByVal parameter As Integer, ByVal delay As Integer) As Integer
  601. Declare Function cGet Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  602. Declare Function cGetAscTime Lib "time2win.dll" (ByVal nLanguage As Integer) As String
  603. Declare Function cGetBit Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As Integer
  604. Declare Function cGetBlock Lib "time2win.dll" (Txt As String, ByVal Position As Integer, ByVal Length As Integer) As String
  605. Declare Function cGetCaption Lib "time2win.dll" (ByVal hWnd As Integer) As String
  606. Declare Function cGetChangeTaskName Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String) As String
  607. Declare Function cGetClass Lib "time2win.dll" (ByVal hWnd As Integer) As String
  608. Declare Function cGetClassName Lib "time2win.dll" (ByVal hWnd As Integer) As String
  609. Declare Function cGetContainer Lib "time2win.dll" (ByVal hWnd As Integer) As String
  610. Declare Function cGetCountry Lib "time2win.dll" () As String
  611. Declare Function cGetCountryCode Lib "time2win.dll" () As String
  612. Declare Function cGetCtlCaption Lib "time2win.dll" (Ctl As Control) As String
  613. Declare Function cGetCtlClass Lib "time2win.dll" (Ctl As Control) As String
  614. Declare Function cGetCtlContainer Lib "time2win.dll" (Ctl As Control) As String
  615. Declare Function cGetCtlDataField Lib "time2win.dll" (Ctl As Control) As String
  616. Declare Function cGetCtlForm Lib "time2win.dll" (Ctl As Control) As String
  617. Declare Function cGetCtlIndex Lib "time2win.dll" (Ctl As Control) As Integer
  618. Declare Function cGetCtlName Lib "time2win.dll" (Ctl As Control) As String
  619. Declare Function cGetCtlNameIndex Lib "time2win.dll" (Ctl As Control) As String
  620. Declare Function cGetCtlPropCaption Lib "time2win.dll" (Ctl As Control) As Integer
  621. Declare Function cGetCtlPropDataField Lib "time2win.dll" (Ctl As Control) As Integer
  622. Declare Function cGetCtlPropText Lib "time2win.dll" (Ctl As Control) As Integer
  623. Declare Sub cGetCtlRect Lib "time2win.dll" (Ctl As Control, RECT As Any)
  624. Declare Sub cGetCtlRectTwips Lib "time2win.dll" (Ctl As Control, RECT As Any)
  625. Declare Function cGetCtlTag Lib "time2win.dll" (Ctl As Control) As String
  626. Declare Function cGetCtlTagSized Lib "time2win.dll" (Ctl As Control) As String
  627. Declare Function cGetCtlText Lib "time2win.dll" (Ctl As Control) As String
  628. Declare Function cGetCurrency Lib "time2win.dll" () As String
  629. Declare Function cGetCurrentDrive Lib "time2win.dll" () As String
  630. Declare Function cGetDataField Lib "time2win.dll" (ByVal hWnd As Integer) As String
  631. Declare Function cGetDateFormat Lib "time2win.dll" () As String
  632. Declare Function cGetDateSeparator Lib "time2win.dll" () As String
  633. Declare Function cGetDefaultCurrentDir Lib "time2win.dll" () As String
  634. Declare Function cGetDefaultPrinter Lib "time2win.dll" () As String
  635. Declare Function cGetDevices Lib "time2win.dll" () As String
  636. Declare Function cGetDiskClusterSize Lib "time2win.dll" (ByVal lpDrive As String) As Long
  637. Declare Function cGetDiskFree Lib "time2win.dll" (ByVal lpDrive As String) As Long
  638. Declare Function cGetDiskSpace Lib "time2win.dll" (ByVal lpDrive As String) As Long
  639. Declare Function cGetDiskUsed Lib "time2win.dll" (ByVal lpDrive As String) As Long
  640. Declare Function cGetDriveCurrentDir Lib "time2win.dll" (ByVal lpDrive As String) As String
  641. Declare Function cGetDriveType Lib "time2win.dll" (ByVal lpDrive As String) As Integer
  642. Declare Function cGetFileVersion Lib "time2win.dll" (ByVal FileName As String, ByVal nFonction As Integer) As String
  643. Declare Function cGetFileVersionInfo Lib "time2win.dll" (ByVal FileName As String, FILEVERSIONINFO As Any) As Integer
  644. Declare Function cGetForm Lib "time2win.dll" (ByVal hWnd As Integer) As String
  645. Declare Function cGetFullNameInEnv Lib "time2win.dll" (ByVal lpFilename As String, ByVal lpEnv As String) As String
  646. Declare Function cGetFullNameInPath Lib "time2win.dll" (ByVal lpFilename As String) As String
  647. Declare Function cGetHourFormat Lib "time2win.dll" () As String
  648. Declare Function cGetHwnd Lib "time2win.dll" (Ctl As Control) As Integer
  649. Declare Function cGetIn Lib "time2win.dll" (Txt As String, Separator As String, ByVal Position As Integer) As String
  650. Declare Function cGetIndex Lib "time2win.dll" (ByVal hWnd As Integer) As Integer
  651. Declare Function cGetIni Lib "time2win.dll" (ByVal AppName As String, ByVal szItem As String, ByVal szDefault As String, ByVal InitFile As String) As String
  652. Declare Function cGetInPart Lib "time2win.dll" (Txt As String, Separator As String, ByVal Position As Integer) As String
  653. Declare Function cGetInPartR Lib "time2win.dll" (Txt As String, Separator As String, ByVal Position As Integer) As String
  654. Declare Function cGetInR Lib "time2win.dll" (Txt As String, Separator As String, ByVal Position As Integer) As String
  655. Declare Function cGetLanguage Lib "time2win.dll" () As String
  656. Declare Function cGetListSeparator Lib "time2win.dll" () As String
  657. Declare Function cGetLongDay Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nDay As Integer) As String
  658. Declare Function cGetLongMonth Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nMonth As Integer) As String
  659. Declare Function cGetName Lib "time2win.dll" (ByVal hWnd As Integer) As String
  660. Declare Function cGetNameIndex Lib "time2win.dll" (ByVal hWnd As Integer) As String
  661. Declare Function cGetNetConnection Lib "time2win.dll" (ByVal lpDrive As String, ErrCode As Integer) As String
  662. Declare Function cGetPid Lib "time2win.dll" () As Integer
  663. Declare Function cGetPrinterPorts Lib "time2win.dll" () As String
  664. Declare Function cGetSectionItems Lib "time2win.dll" (ByVal Section As String, ByVal InitFile As String, nItems As Integer) As String
  665. Declare Function cGetShortDay Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nDay As Integer) As String
  666. Declare Function cGetShortMonth Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nMonth As Integer) As String
  667. Declare Function cGetSmallDay Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nDay As Integer) As String
  668. Declare Function cGetSystemDirectory Lib "time2win.dll" () As String
  669. Declare Function cGetTag Lib "time2win.dll" (ByVal hWnd As Integer) As String
  670. Declare Function cGetTagSized Lib "time2win.dll" (ByVal hWnd As Integer, ByVal nSize As Integer) As String
  671. Declare Function cGetTaskName Lib "time2win.dll" (ByVal hWnd As Integer) As String
  672. Declare Function cGetText Lib "time2win.dll" (ByVal hWnd As Integer) As String
  673. Declare Function cGetTimeSeparator Lib "time2win.dll" () As String
  674. Declare Function cGetTinyDay Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nDay As Integer) As String
  675. Declare Function cGetTinyMonth Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal nMonth As Integer) As String
  676. Declare Function cGetVersion Lib "time2win.dll" () As Single
  677. Declare Function cGetWindowsDirectory Lib "time2win.dll" () As String
  678. Declare Function cGetWinINI Lib "time2win.dll" (ByVal Info As Integer) As String
  679. Declare Function cGetWinSection Lib "time2win.dll" (ByVal Section As String) As String
  680. Declare Function cGiveBitPalindrome Lib "time2win.dll" () As String
  681. Declare Function cHideAllEditForm Lib "time2win.dll" () As Integer
  682. Declare Function cHideDebugForm Lib "time2win.dll" () As Integer
  683. Declare Function cHourTo Lib "time2win.dll" (Txt As String) As Variant
  684. Declare Function cIfInStr Lib "time2win.dll" (Txt As String, Operator As String) As String
  685. Declare Sub cIncrI Lib "time2win.dll" (Value As Integer)
  686. Declare Sub cIncrL Lib "time2win.dll" (Value As Long)
  687. Declare Function cInsertBlocks Lib "time2win.dll" (Txt As String, Insert As String) As String
  688. Declare Function cInsertBlocksBy Lib "time2win.dll" (Txt As String, Insert As String, Delimitor As String) As String
  689. Declare Function cInsertByMask Lib "time2win.dll" (Txt As String, Mask As String, Insert As String) As String
  690. Declare Function cInsertChars Lib "time2win.dll" (Txt As String, ByVal Position As Integer, Insert As String) As String
  691. Declare Function cIntoBalance Lib "time2win.dll" (Var As Variant) As String
  692. Declare Function cIntoBalanceFill Lib "time2win.dll" (Var As Variant) As String
  693. Declare Function cIntoDate Lib "time2win.dll" (ByVal nDate As Long) As String
  694. Declare Function cIntoDateFill Lib "time2win.dll" (ByVal nDate As Long) As String
  695. Declare Function cIntoDateNull Lib "time2win.dll" (ByVal nDate As Long) As String
  696. Declare Function cIntoFixHour Lib "time2win.dll" (Var As Variant, ByVal Length As Integer, ByVal fillZero As Integer, ByVal CentiΦme As Integer) As String
  697. Declare Function cIntoHour Lib "time2win.dll" (Var As Variant) As String
  698. Declare Function cIntoVarHour Lib "time2win.dll" (Var As Variant) As String
  699. Declare Function cIsAlnum Lib "time2win.dll" (Txt As String) As Integer
  700. Declare Function cIsAlpha Lib "time2win.dll" (Txt As String) As Integer
  701. Declare Function cIsAscii Lib "time2win.dll" (Txt As String) As Integer
  702. Declare Function cIsBalance Lib "time2win.dll" (ByVal nHour As Long, ByVal nMinute As Integer, ByVal nSecond As Integer) As Integer
  703. Declare Function cIsBitPalindrome Lib "time2win.dll" (Txt As String) As Integer
  704. Declare Function cIsCsym Lib "time2win.dll" (Txt As String) As Integer
  705. Declare Function cIsCsymf Lib "time2win.dll" (Txt As String) As Integer
  706. Declare Function cIsDate Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer, ByVal nDay As Integer) As Integer
  707. Declare Function cIsDigit Lib "time2win.dll" (Txt As String) As Integer
  708. Declare Function cIsFileArchive Lib "time2win.dll" (ByVal nFilename As String) As Integer
  709. Declare Function cIsFileEmpty Lib "time2win.dll" (ByVal nFilename As String) As Integer
  710. Declare Function cIsFileFlag Lib "time2win.dll" (ByVal nFilename As String, ByVal nStatus As Integer) As Integer
  711. Declare Function cIsFileHidden Lib "time2win.dll" (ByVal nFilename As String) As Integer
  712. Declare Function cIsFileNormal Lib "time2win.dll" (ByVal nFilename As String) As Integer
  713. Declare Function cIsFilenameValid Lib "time2win.dll" (ByVal nFilename As String) As Integer
  714. Declare Function cIsFileReadOnly Lib "time2win.dll" (ByVal nFilename As String) As Integer
  715. Declare Function cIsFileSubDir Lib "time2win.dll" (ByVal nFilename As String) As Integer
  716. Declare Function cIsFileSystem Lib "time2win.dll" (ByVal nFilename As String) As Integer
  717. Declare Function cIsFileVolId Lib "time2win.dll" (ByVal nFilename As String) As Integer
  718. Declare Function cIsFormEnabled Lib "time2win.dll" (ByVal hWnd As Integer) As Integer
  719. Declare Function cIsHour Lib "time2win.dll" (ByVal nHour As Integer, ByVal nMinute As Integer, ByVal nSecond As Integer) As Integer
  720. Declare Function cIsISBN Lib "time2win.dll" (Txt As String) As Integer
  721. Declare Function cIsLeapYear Lib "time2win.dll" (ByVal nYear As Integer) As Integer
  722. Declare Function cIsLower Lib "time2win.dll" (Txt As String) As Integer
  723. Declare Function cIsPalindrome Lib "time2win.dll" (Txt As String) As Integer
  724. Declare Function cIsPunct Lib "time2win.dll" (Txt As String) As Integer
  725. Declare Function cIsSerial Lib "time2win.dll" (ByVal file1 As String) As Integer
  726. Declare Function cIsSpace Lib "time2win.dll" (Txt As String) As Integer
  727. Declare Function cIsUpper Lib "time2win.dll" (Txt As String) As Integer
  728. Declare Function cIsXdigit Lib "time2win.dll" (Txt As String) As Integer
  729. Declare Function cKillDir Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  730. Declare Function cKillDirFilesAll Lib "time2win.dll" (ByVal lpDir As String, ByVal lpMask As String) As Integer
  731. Declare Function cKillDirs Lib "time2win.dll" (ByVal lpDir As String, ByVal HeaderDirectory As Integer) As Integer
  732. Declare Function cKillFile Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  733. Declare Function cKillFileAll Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  734. Declare Function cKillFiles Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  735. Declare Function cKillFilesAll Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  736. Declare Sub cKillFocus Lib "time2win.dll" (ByVal hWnd As Integer)
  737. Declare Function cLngMsgBox Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal Message As String, ByVal Button As Long, ByVal Title As String) As Integer
  738. Declare Sub cLngBoxMsg Lib "time2win.dll" Alias "cLngMsgBox" (ByVal nLanguage As Integer, ByVal Message As String, ByVal Button As Long, ByVal Title As String)
  739. Declare Function cLngInpBox Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal Message As String, ByVal Title As String, ByVal Default As String) As String
  740. Declare Sub cLngSysMenu Lib "time2win.dll" (ByVal nLanguage As Integer, ByVal hWnd As Integer)
  741. Declare Function cLockEventI Lib "time2win.dll" (Ctl As Control) As Integer
  742. Declare Function cLrc Lib "time2win.dll" (Txt As String) As String
  743. Declare Function cMakeDir Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  744. Declare Function cMakeMultipleDir Lib "time2win.dll" (ByVal lpFilename As String) As Integer
  745. Declare Function cMakePath Lib "time2win.dll" (ByVal nDrive As String, ByVal nDir As String, ByVal nFilename As String, ByVal Ext As String) As String
  746. Declare Sub cMatrixAdd Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayB() As Double, ArrayC() As Double)
  747. Declare Function cMatrixCoFactor Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ByVal Row As Integer, ByVal Col As Integer) As Double
  748. Declare Function cMatrixCompare Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayC() As Double) As Integer
  749. Declare Sub cMatrixCopy Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayC() As Double)
  750. Declare Function cMatrixDet Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double) As Double
  751. Declare Function cMatrixFill Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ByVal nInit As Integer) As Integer
  752. Declare Function cMatrixInv Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayC() As Double) As Integer
  753. Declare Function cMatrixMinor Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ByVal Row As Integer, ByVal Col As Integer) As Double
  754. Declare Sub cMatrixMul Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayB() As Double, ArrayC() As Double)
  755. Declare Sub cMatrixSub Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayB() As Double, ArrayC() As Double)
  756. Declare Function cMatrixSymToeplitz Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayC() As Double) As Integer
  757. Declare Sub cMatrixTranspose Lib "time2win.dll" (ByVal size As Integer, ArrayA() As Double, ArrayC() As Double)
  758. Declare Function cMax Lib "time2win.dll" (Var1 As Variant, Var2 As Variant) As Variant
  759. Declare Function cMaxD Lib "time2win.dll" (array() As Double) As Double
  760. Declare Function cMaxI Lib "time2win.dll" (array() As Integer) As Integer
  761. Declare Function cMaxL Lib "time2win.dll" (array() As Long) As Long
  762. Declare Function cMaxS Lib "time2win.dll" (array() As Single) As Single
  763. Declare Function cMDAClear Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY) As Integer
  764. Declare Function cMDAClearCol Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long, ByVal sheet As Long) As Integer
  765. Declare Function cMDAClearRow Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal sheet As Long) As Integer
  766. Declare Function cMDAClearSheet Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal sheet As Long) As Integer
  767. Declare Sub cMDAClose Lib "time2win.dll" (MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal DeleteFile As Integer)
  768. Declare Function cMDACreate Lib "time2win.dll" (MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal CreateOrUse As Integer) As Integer
  769. Declare Function cMDAGet Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long) As Variant
  770. Declare Sub cMDAGetType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  771. Declare Sub cMDAPut Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, Var As Variant)
  772. Declare Sub cMDAPutType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  773. Declare Sub cMDArGet Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long, Var As Variant)
  774. Declare Sub cMDArGetType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long, nType As Any)
  775. Declare Sub cMDArPut Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long, Var As Variant)
  776. Declare Sub cMDArPutType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long, nType As Any)
  777. Declare Function cMDAsClearCol Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Col As Long) As Integer
  778. Declare Function cMDAsClearRow Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long) As Integer
  779. Declare Sub cMDAsGet Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  780. Declare Sub cMDAsGetType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, nType As Any)
  781. Declare Sub cMDAsPut Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  782. Declare Sub cMDAsPutType Lib "time2win.dll" (ByVal array As Integer, MULTIPLEDISKARRAY As tagMULTIPLEDISKARRAY, ByVal Row As Long, ByVal Col As Long, nType As Any)
  783. Declare Function cMeanD Lib "time2win.dll" (array() As Double) As Double
  784. Declare Function cMeanI Lib "time2win.dll" (array() As Integer) As Double
  785. Declare Function cMeanL Lib "time2win.dll" (array() As Long) As Double
  786. Declare Function cMeanS Lib "time2win.dll" (array() As Single) As Double
  787. Declare Function cMin Lib "time2win.dll" (Var1 As Variant, Var2 As Variant) As Variant
  788. Declare Function cMinD Lib "time2win.dll" (array() As Double) As Double
  789. Declare Function cMinI Lib "time2win.dll" (array() As Integer) As Integer
  790. Declare Function cMinL Lib "time2win.dll" (array() As Long) As Long
  791. Declare Function cMinS Lib "time2win.dll" (array() As Single) As Single
  792. Declare Function cMixChars Lib "time2win.dll" (Txt As String) As String
  793. Declare Function cMKB Lib "time2win.dll" (ByVal Value As Integer) As String
  794. Declare Function cMKC Lib "time2win.dll" (ByVal Value As Currency) As String
  795. Declare Function cMKD Lib "time2win.dll" (ByVal Value As Double) As String
  796. Declare Function cMKI Lib "time2win.dll" (ByVal Value As Integer) As String
  797. Declare Function cMKL Lib "time2win.dll" (ByVal Value As Long) As String
  798. Declare Function cMKN Lib "time2win.dll" (ByVal Value As String) As String
  799. Declare Function cMKS Lib "time2win.dll" (ByVal Value As Single) As String
  800. Declare Function cModuleFind Lib "time2win.dll" (MODULEENTRY As Any, ByVal ModuleName As String) As Integer
  801. Declare Function cModules Lib "time2win.dll" (MODULEENTRY As Any, ByVal FirstNext As Integer) As Integer
  802. Declare Function cMorse Lib "time2win.dll" (ByVal morse As String) As String
  803. Declare Function cNexthWnd Lib "time2win.dll" (ByVal hWnd As Integer) As Integer
  804. Declare Function cNumDigit Lib "time2win.dll" (Txt As String) As Integer
  805. Declare Function cOneCharFromLeft Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  806. Declare Function cOneCharFromRight Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  807. Declare Function cOrToken Lib "time2win.dll" (ByVal Txt As String, ByVal Token As String) As Integer
  808. Declare Function cOrTokenIn Lib "time2win.dll" (ByVal Txt As String, ByVal Token As String, ByVal Separator As String) As Integer
  809. Declare Function cPatternMatch Lib "time2win.dll" (ByVal Txt As String, ByVal pattern As String) As Integer
  810. Declare Function cPatternExtMatch Lib "time2win.dll" (ByVal Txt As String, ByVal pattern As String) As Integer
  811. Declare Function cProperName Lib "time2win.dll" (Txt As String) As String
  812. Declare Function cProperName2 Lib "time2win.dll" (Txt As String, ByVal TokenToUse As String, ByVal Options As Integer) As String
  813. Declare Sub cPutIni Lib "time2win.dll" (ByVal AppName As String, ByVal szItem As String, ByVal szDefault As String, ByVal InitFile As String)
  814. Declare Function cReadBasisTimer Lib "time2win.dll" () As Long
  815. Declare Function cReadCtlLanguage Lib "time2win.dll" (Ctl As Control, ByVal Property As Integer, ByVal FileLanguage As String) As Integer
  816. Declare Function cReadTimer Lib "time2win.dll" (ByVal nTimer As Integer) As Long
  817. Declare Function cRebootSystem Lib "time2win.dll" () As Integer
  818. Declare Function cRegistrationKey Lib "time2win.dll" (ByVal RegString As String, ByVal RegCode As Long) As Long
  819. Declare Function cRemoveBlockChar Lib "time2win.dll" (Txt As String, ByVal Position As Integer, ByVal Length As Integer) As String
  820. Declare Function cRemoveOneChar Lib "time2win.dll" (Txt As String, ByVal Position As Integer) As String
  821. Declare Function cRenameFile Lib "time2win.dll" (ByVal lpFilename1 As String, ByVal lpFilename2 As String) As Integer
  822. Declare Sub cResetCapture Lib "time2win.dll" ()
  823. Declare Sub cResetFocus Lib "time2win.dll" (ByVal hWnd1 As Integer, ByVal hWnd2 As Integer)
  824. Declare Function cResizeString Lib "time2win.dll" (Txt As String, ByVal NewLength As Integer) As String
  825. Declare Function cResizeStringAndFill Lib "time2win.dll" (Txt As String, ByVal NewLength As Integer, Fill As String) As String
  826. Declare Function cRestartWindows Lib "time2win.dll" () As Integer
  827. Declare Function cReverse Lib "time2win.dll" (Txt As String) As String
  828. Declare Sub cReverseAllBits Lib "time2win.dll" (Txt As String)
  829. Declare Sub cReverseAllBitsByChar Lib "time2win.dll" (Txt As String)
  830. Declare Function cReverseSortD Lib "time2win.dll" (array() As Double) As Integer
  831. Declare Function cReverseSortI Lib "time2win.dll" (array() As Integer) As Integer
  832. Declare Function cReverseSortL Lib "time2win.dll" (array() As Long) As Integer
  833. Declare Function cReverseSortS Lib "time2win.dll" (array() As Single) As Integer
  834. Declare Function cReverseSortStr Lib "time2win.dll" (Txt As String, ByVal nItem As Integer, ByVal ItemLength As Integer) As Integer
  835. Declare Function cRomanToArabic Lib "time2win.dll" (Txt As String) As Variant
  836. Declare Function cSaveCtlLanguage Lib "time2win.dll" (Ctl As Control, ByVal Property As Integer, ByVal FileLanguage As String) As Integer
  837. Declare Sub cScalarToDate Lib "time2win.dll" (ByVal Scalar As Long, nYear As Integer, nMonth As Integer, nDay As Integer)
  838. Declare Sub cScalarToTime Lib "time2win.dll" (ByVal Scalar As Long, nHour As Integer, nMin As Integer, nSec As Integer)
  839. Declare Function cScrollL Lib "time2win.dll" (Txt As String) As String
  840. Declare Function cScrollR Lib "time2win.dll" (Txt As String) As String
  841. Declare Sub cSetAllBits Lib "time2win.dll" (Txt As String, ByVal Value As Integer)
  842. Declare Sub cSetBit Lib "time2win.dll" (Txt As String, ByVal Position As Integer, ByVal Value As Integer)
  843. Declare Sub cSetBitToFalse Lib "time2win.dll" (Txt As String, ByVal Position As Integer)
  844. Declare Sub cSetBitToTrue Lib "time2win.dll" (Txt As String, ByVal Position As Integer)
  845. Declare Sub cSetCaption Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String)
  846. Declare Sub cSetCapture Lib "time2win.dll" (ByVal hWnd As Integer)
  847. Declare Sub cSetCtlCaption Lib "time2win.dll" (Ctl As Control, ByVal Text As String)
  848. Declare Sub cSetCtlDataField Lib "time2win.dll" (Ctl As Control, ByVal Text As String)
  849. Declare Sub cSetCtlFocus Lib "time2win.dll" (Ctl As Control)
  850. Declare Sub cSetCtlPropString Lib "time2win.dll" (Ctl As Control, ByVal PropIndex As Integer, ByVal Text As String)
  851. Declare Sub cSetCtlTag Lib "time2win.dll" (Ctl As Control, ByVal Text As String)
  852. Declare Sub cSetCtlText Lib "time2win.dll" (Ctl As Control, ByVal Text As String)
  853. Declare Function cSetD Lib "time2win.dll" (array() As Double, ByVal nValue As Double) As Integer
  854. Declare Sub cSetDataField Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String)
  855. Declare Sub cSetDefaultSeparator Lib "time2win.dll" (Separator As String)
  856. Declare Sub cSetFocus Lib "time2win.dll" (ByVal hWnd As Integer)
  857. Declare Function cSetHandleCount Lib "time2win.dll" (ByVal nHandle As Integer) As Integer
  858. Declare Function cSetI Lib "time2win.dll" (array() As Integer, ByVal nValue As Integer) As Integer
  859. Declare Function cSetL Lib "time2win.dll" (array() As Long, ByVal nValue As Long) As Integer
  860. Declare Sub cSetLocking Lib "time2win.dll" (ByVal nValue As Integer)
  861. Declare Function cSerialGet Lib "time2win.dll" (ByVal file As String, SERIALDATA As tagSERIALDATA) As Integer
  862. Declare Function cSerialInc Lib "time2win.dll" (ByVal file As String, ByVal Increment As Long) As Integer
  863. Declare Function cSerialPut Lib "time2win.dll" (ByVal file As String, SERIALDATA As tagSERIALDATA) As Integer
  864. Declare Function cSetS Lib "time2win.dll" (array() As Single, ByVal nValue As Single) As Integer
  865. Declare Sub cSetTag Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String)
  866. Declare Sub cSetText Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Text As String)
  867. Declare Sub cSetWait Lib "time2win.dll" (ByVal nTimer As Integer, ByVal nValue As Long)
  868. Declare Function cSgn Lib "time2win.dll" (ByVal Value As Integer) As Integer
  869. Declare Sub cShowWindow Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Method As Integer, ByVal interval As Integer)
  870. Declare Function cSleep Lib "time2win.dll" (ByVal delay As Long) As Integer
  871. Declare Function cSortD Lib "time2win.dll" (array() As Double) As Integer
  872. Declare Function cSortI Lib "time2win.dll" (array() As Integer) As Integer
  873. Declare Function cSortL Lib "time2win.dll" (array() As Long) As Integer
  874. Declare Function cSortS Lib "time2win.dll" (array() As Single) As Integer
  875. Declare Function cSortStr Lib "time2win.dll" (Txt As String, ByVal nItem As Integer, ByVal ItemLength As Integer) As Integer
  876. Declare Function cSplitPath Lib "time2win.dll" (ByVal nFilename As String, SPLITPATH As Any) As Integer
  877. Declare Sub cStartBasisTimer Lib "time2win.dll" ()
  878. Declare Sub cStartTimer Lib "time2win.dll" (ByVal nTimer As Integer)
  879. Declare Sub cStartWait Lib "time2win.dll" (ByVal nTimer As Integer)
  880. Declare Sub cStopBasisTimer Lib "time2win.dll" ()
  881. Declare Function cStopTimer Lib "time2win.dll" (ByVal nTimer As Integer) As Long
  882. Declare Function cStringCompress Lib "time2win.dll" (Txt As String) As String
  883. Declare Function cStringCRC32 Lib "time2win.dll" (Txt As String) As Long
  884. Declare Function cStringExpand Lib "time2win.dll" (Txt As String) As String
  885. Declare Sub cStringToType Lib "time2win.dll" Alias "cTypesCopy" (ByVal Src As String, TypeDst As Any, ByVal lenTypeSrc As Integer)
  886. Declare Function cSubDirectory Lib "time2win.dll" (ByVal nFilename As String, ByVal FirstNext As Integer) As String
  887. Declare Function cSumD Lib "time2win.dll" (array() As Double) As Double
  888. Declare Function cSumI Lib "time2win.dll" (array() As Integer) As Double
  889. Declare Function cSumL Lib "time2win.dll" (array() As Long) As Double
  890. Declare Function cSumS Lib "time2win.dll" (array() As Single) As Double
  891. Declare Sub cSysMenuChange Lib "time2win.dll" (ByVal hWnd As Integer, ByVal Position As Integer, ByVal NewMessage As String)
  892. Declare Sub cSwapD Lib "time2win.dll" (swap1 As Double, swap2 As Double)
  893. Declare Sub cSwapI Lib "time2win.dll" (swap1 As Integer, swap2 As Integer)
  894. Declare Sub cSwapL Lib "time2win.dll" (swap1 As Long, swap2 As Long)
  895. Declare Sub cSwapS Lib "time2win.dll" (swap1 As Single, swap2 As Single)
  896. Declare Sub cSwapStr Lib "time2win.dll" (swap1 As String, swap2 As String)
  897. Declare Function cTaskFind Lib "time2win.dll" (TASKENTRY As Any, ByVal hTask As Integer) As Integer
  898. Declare Function cTasks Lib "time2win.dll" (TASKENTRY As Any, ByVal FirstNext As Integer) As Integer
  899. Declare Function cTimeBetween Lib "time2win.dll" (ByVal Hr1 As Integer, ByVal Hr2 As Integer) As Integer
  900. Declare Function cTimerClose Lib "time2win.dll" (ByVal TimerHandle As Integer) As Integer
  901. Declare Function cTimerOpen Lib "time2win.dll" () As Integer
  902. Declare Function cTimerRead Lib "time2win.dll" (ByVal TimerHandle As Integer) As Long
  903. Declare Function cTimerStart Lib "time2win.dll" (ByVal TimerHandle As Integer) As Integer
  904. Declare Function cTimeToScalar Lib "time2win.dll" (ByVal nHour As Integer, ByVal nMin As Integer, ByVal nSec As Integer) As Long
  905. Declare Function cToBinary Lib "time2win.dll" (Text As String) As String
  906. Declare Function cToBinary2 Lib "time2win.dll" (Text As String, Bin As String) As String
  907. Declare Sub cToggleAllBits Lib "time2win.dll" (Txt As String)
  908. Declare Sub cToggleBit Lib "time2win.dll" (Txt As String, ByVal Position As Integer)
  909. Declare Function cToHexa Lib "time2win.dll" (Text As String) As String
  910. Declare Function cTokenIn Lib "time2win.dll" (Txt As String, Separator As String, ByVal Position As Integer) As String
  911. Declare Function cTrueBetween Lib "time2win.dll" (Var As Variant, Var1 As Variant, Var2 As Variant) As Integer
  912. Declare Sub cTypeClear Lib "time2win.dll" (TypeSrc As Any, ByVal lenTypeSrc As Integer)
  913. Declare Function cTypeMid Lib "time2win.dll" (TypeSrc As Any, ByVal offset As Integer, ByVal Length As Integer) As String
  914. Declare Function cTypesCompare Lib "time2win.dll" (Type1 As Any, Type2 As Any, ByVal lenType1 As Integer) As Integer
  915. Declare Sub cTypesCopy Lib "time2win.dll" (TypeSrc As Any, TypeDst As Any, ByVal lenTypeSrc As Integer)
  916. Declare Function cTypeTransfert Lib "time2win.dll" (TypeSrc As Any, ByVal lenTypeSrc As Integer) As String
  917. Declare Sub cTypeToString Lib "time2win.dll" Alias "cTypesCopy" (TypeSrc As Any, ByVal Dst As String, ByVal lenTypeSrc As Integer)
  918. Declare Function cUncompact Lib "time2win.dll" (Txt As String) As String
  919. Declare Function cUnHideAllEditForm Lib "time2win.dll" () As Integer
  920. Declare Function cUnHideDebugForm Lib "time2win.dll" () As Integer
  921. Declare Function cUniqueFileName Lib "time2win.dll" (Txt As String) As String
  922. Declare Sub cUnloadDLL Lib "time2win.dll" (ByVal hMod As Integer)
  923. Declare Sub cUnlockEventI Lib "time2win.dll" (Ctl As Control)
  924. Declare Function cWalkThruWindow Lib "time2win.dll" (Class As String, Caption As String, OwnerHwnd As Integer, OwnerClass As String, OwnerCaption As String, ByVal FirstNext As Integer) As Integer
  925. Declare Function cWeekOfYear Lib "time2win.dll" (ByVal nYear As Integer, ByVal nMonth As Integer, ByVal nDay As Integer, ByVal nISO As Integer) As Integer
  926.  
  927. Declare Sub cPushID Lib "time2win.dll" (IDArray As Integer, ByVal nID As Integer)
  928. Declare Sub cPopID Lib "time2win.dll" (IDArray As Integer, ByVal nID As Integer)
  929. Declare Sub cPopLastID Lib "time2win.dll" (IDArray As Integer)
  930. Declare Function cGetID Lib "time2win.dll" (IDArray As Integer, ByVal nPosition As Integer) As Integer
  931. Declare Sub cClearID Lib "time2win.dll" (IDArray As Integer)
  932.  
  933. ' File I/O, direct routines issued from C functionnalities
  934. Declare Function cFopen Lib "time2win.dll" (ByVal file As String, ByVal Mode As String) As Long
  935. Declare Function cFclose Lib "time2win.dll" (ByVal IOstream As Long) As Integer
  936. Declare Function cFgetc Lib "time2win.dll" (ByVal IOstream As Long) As Integer
  937. Declare Function cFputc Lib "time2win.dll" (ByVal char As Integer, ByVal IOstream As Long) As Integer
  938. Declare Function cFputs Lib "time2win.dll" (ByVal Txt As String, ByVal IOstream As Long) As Integer
  939. Declare Function cFgets Lib "time2win.dll" (Txt As String, ByVal Length As Integer, ByVal IOstream As Long) As Integer
  940. Declare Function cFwrite Lib "time2win.dll" (Txt As String, ByVal IOstream As Long) As Integer
  941. Declare Function cFread Lib "time2win.dll" (Txt As String, ByVal Length As Integer, ByVal IOstream As Long) As Integer
  942. Declare Function cFcloseall Lib "time2win.dll" () As Integer
  943. Declare Function cFflush Lib "time2win.dll" (ByVal IOstream As Long) As Integer
  944. Declare Function cFflushall Lib "time2win.dll" () As Integer
  945. Declare Function cFeof Lib "time2win.dll" (ByVal IOstream As Long) As Integer
  946. Declare Function cFerror Lib "time2win.dll" (ByVal IOstream As Long) As Integer
  947. Declare Sub cFclearerr Lib "time2win.dll" (ByVal IOstream As Long)
  948. Declare Function cFseek Lib "time2win.dll" (ByVal IOstream As Long, ByVal offset As Long, ByVal origin As Integer) As Integer
  949. Declare Function cFtell Lib "time2win.dll" (ByVal IOstream As Long) As Long
  950. Declare Sub cFrewind Lib "time2win.dll" (ByVal IOstream As Long)
  951.  
  952. ' Functions for calculating interest rate
  953. Declare Function cAtoF Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  954. Declare Function cAtoFC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  955. Declare Function cAtoP Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  956. Declare Function cAtoPC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  957. Declare Function cFtoA Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  958. Declare Function cFtoAC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  959. Declare Function cFtoP Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  960. Declare Function cFtoPC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  961. Declare Function cPtoA Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  962. Declare Function cPtoAC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  963. Declare Function cPtoF Lib "time2win.dll" (ByVal Interest As Double, ByVal N As Integer) As Double
  964. Declare Function cPtoFC Lib "time2win.dll" (ByVal Rates As Double, ByVal N As Integer) As Double
  965.  
  966. ' Functions for calculating 2-D geometry
  967. Declare Sub cV2Add Lib "time2win.dll" (u As tagVECTOR2, v As tagVECTOR2, w As tagVECTOR2)
  968. Declare Sub cV2Sub Lib "time2win.dll" (u As tagVECTOR2, v As tagVECTOR2, w As tagVECTOR2)
  969. Declare Sub cV2Combine Lib "time2win.dll" (u As tagVECTOR2, ByVal c1 As Double, v As tagVECTOR2, ByVal c2 As Double, w As tagVECTOR2)
  970. Declare Sub cV2Copy Lib "time2win.dll" (u As tagVECTOR2, w As tagVECTOR2)
  971. Declare Function cV2Dot Lib "time2win.dll" (u As tagVECTOR2, v As tagVECTOR2) As Double
  972. Declare Function cV2Length Lib "time2win.dll" (u As tagVECTOR2) As Double
  973. Declare Function cV2LengthSquared Lib "time2win.dll" (u As tagVECTOR2) As Double
  974. Declare Sub cV2LinearIp Lib "time2win.dll" (lo As tagVECTOR2, hi As tagVECTOR2, ByVal alpha As Double, w As tagVECTOR2)
  975. Declare Sub cV2Mul Lib "time2win.dll" (u As tagVECTOR2, v As tagVECTOR2, w As tagVECTOR2)
  976. Declare Sub cV2Neg Lib "time2win.dll" (u As tagVECTOR2)
  977. Declare Sub cV2Normalized Lib "time2win.dll" (u As tagVECTOR2)
  978. Declare Sub cV2Ortho Lib "time2win.dll" (u As tagVECTOR2, w As tagVECTOR2)
  979. Declare Sub cV2ScaledNewLength Lib "time2win.dll" (u As tagVECTOR2, ByVal newlen As Double)
  980. Declare Function cV2SegmentLength Lib "time2win.dll" (p As tagVECTOR2, q As tagVECTOR2) As Double
  981.  
  982. ' Functions for calculating 3-D geometry
  983. Declare Sub cV3Add Lib "time2win.dll" (u As tagVECTOR3, v As tagVECTOR3, w As tagVECTOR3)
  984. Declare Sub cV3Sub Lib "time2win.dll" (u As tagVECTOR3, v As tagVECTOR3, w As tagVECTOR3)
  985. Declare Sub cV3Combine Lib "time2win.dll" (u As tagVECTOR3, ByVal c1 As Double, v As tagVECTOR3, ByVal c2 As Double, w As tagVECTOR3)
  986. Declare Sub cV3Copy Lib "time2win.dll" (u As tagVECTOR3, w As tagVECTOR3)
  987. Declare Sub cV3Cross Lib "time2win.dll" (u As tagVECTOR3, v As tagVECTOR3, w As tagVECTOR3)
  988. Declare Function cV3Dot Lib "time2win.dll" (u As tagVECTOR3, v As tagVECTOR3) As Double
  989. Declare Function cV3Length Lib "time2win.dll" (u As tagVECTOR3) As Double
  990. Declare Function cV3LengthSquared Lib "time2win.dll" (u As tagVECTOR3) As Double
  991. Declare Sub cV3LinearIp Lib "time2win.dll" (lo As tagVECTOR3, hi As tagVECTOR3, ByVal alpha As Double, w As tagVECTOR3)
  992. Declare Sub cV3Mul Lib "time2win.dll" (u As tagVECTOR3, v As tagVECTOR3, w As tagVECTOR3)
  993. Declare Sub cV3Neg Lib "time2win.dll" (u As tagVECTOR3)
  994. Declare Sub cV3Normalized Lib "time2win.dll" (u As tagVECTOR3)
  995. Declare Sub cV3ScaledNewLength Lib "time2win.dll" (u As tagVECTOR3, ByVal newlen As Double)
  996. Declare Function cV3SegmentLength Lib "time2win.dll" (p As tagVECTOR3, q As tagVECTOR3) As Double
  997.  
  998. ' Functions for Huge String management
  999. Declare Function cHugeStrAdd Lib "time2win.dll" (ByVal hsHandle As Integer, hsText As String) As Integer
  1000. Declare Function cHugeStrAddress Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1001. Declare Function cHugeStrAppend Lib "time2win.dll" (ByVal hsHandle As Integer, hsText As String) As Integer
  1002. Declare Function cHugeStrBlocks Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1003. Declare Function cHugeStrClear Lib "time2win.dll" (ByVal hsHandle As Integer) As Integer
  1004. Declare Function cHugeStrCreate Lib "time2win.dll" (ByVal hsSize As Long) As Integer
  1005. Declare Function cHugeStrFree Lib "time2win.dll" (ByVal hsHandle As Integer) As Integer
  1006. Declare Function cHugeStrGetNP Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1007. Declare Function cHugeStrGetWP Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1008. Declare Function cHugeStrLength Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1009. Declare Function cHugeStrMid Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsStart As Long, ByVal hsLength As Long) As String
  1010. Declare Function cHugeStrNext Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsNext As Long) As String
  1011. Declare Function cHugeStrOnDisk Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsFile As String, ByVal hsGetPut As Integer) As Long
  1012. Declare Function cHugeStrRead Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsBlock As Long) As String
  1013. Declare Function cHugeStrSetNP Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsPtr As Long) As Integer
  1014. Declare Function cHugeStrSetWP Lib "time2win.dll" (ByVal hsHandle As Integer, ByVal hsPtr As Long) As Integer
  1015. Declare Function cHugeStrSize Lib "time2win.dll" (ByVal hsHandle As Integer) As Long
  1016.  
  1017. ' Functions for Huge Memory Array management
  1018. Declare Function cHMAClear Lib "time2win.dll" (HMA As tagHMA) As Integer
  1019. Declare Function cHMAClearCol Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long, ByVal sheet As Long) As Integer
  1020. Declare Function cHMAClearRow Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal sheet As Long) As Integer
  1021. Declare Function cHMAClearSheet Lib "time2win.dll" (HMA As tagHMA, ByVal sheet As Long) As Integer
  1022. Declare Function cHMACreate Lib "time2win.dll" (HMA As tagHMA) As Integer
  1023. Declare Function cHMAFree Lib "time2win.dll" (HMA As tagHMA) As Integer
  1024. Declare Function cHMAGet Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long) As Variant
  1025. Declare Sub cHMAGetType Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  1026. Declare Sub cHMAPut Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, Var As Variant)
  1027. Declare Sub cHMAPutType Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, ByVal sheet As Long, nType As Any)
  1028. Declare Sub cHMArGet Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long, Var As Variant)
  1029. Declare Sub cHMArGetType Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long, nType As Any)
  1030. Declare Sub cHMArPut Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long, Var As Variant)
  1031. Declare Sub cHMArPutType Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long, nType As Any)
  1032. Declare Sub cHMAsGet Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  1033. Declare Sub cHMAsGetType Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, nType As Any)
  1034. Declare Sub cHMAsPut Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, Var As Variant)
  1035. Declare Sub cHMAsPutType Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long, ByVal Col As Long, nType As Any)
  1036. Declare Function cHMAsClearCol Lib "time2win.dll" (HMA As tagHMA, ByVal Col As Long) As Integer
  1037. Declare Function cHMAsClearRow Lib "time2win.dll" (HMA As tagHMA, ByVal Row As Long) As Integer
  1038. Declare Function cHMAOnDisk Lib "time2win.dll" (HMA As tagHMA, ByVal hsFile As String, ByVal hsGetPut As Integer) As Long
  1039.  
  1040.