home *** CD-ROM | disk | FTP | other *** search
/ Visual Basic 4 Unleashed / Visual_Basic_4_Unleashed_SAMS_Publishing_1995.iso / chartfx / cfxocx / chart2fx.bas < prev    next >
Encoding:
BASIC Source File  |  1995-01-26  |  21.2 KB  |  661 lines
  1. ' Function Prototypes
  2. Declare Function chart_Send Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wMsg As Integer, ByVal wParam As Integer, ByVal lParam As Any) As Long
  3. Declare Function chart_OpenData Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wCode As Integer, dwSize As Long) As Long
  4. Declare Function chart_CloseData Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wCode As Integer) As Integer
  5. Declare Function chart_SetValue Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nSerie As Integer, ByVal nPoint As Integer, ByVal dValue As Double) As Long
  6. Declare Function chart_SetIniValue Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nSerie As Integer, ByVal nPoint As Integer, ByVal dValue As Double) As Long
  7. Declare Function chart_SetXvalue Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nSerie As Integer, ByVal nPoint As Integer, ByVal dValue As Double) As Long
  8. Declare Function chart_SetConst Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nIndex As Integer, ByVal dValue As Double) As Long
  9. Declare Function chart_SetColor Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nIndex As Integer, ByVal lColor As Long, ByVal bBack As Integer) As Long
  10. Declare Sub chart_SetAdm Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nIndex As Integer, ByVal dValue As Double)
  11. Declare Function chart_Get Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal lType As Long, ByVal wCode As Integer) As Double
  12. Declare Function chart_SetStripe Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal nIndex As Integer, ByVal dIni As Double, ByVal dEnd As Double, ByVal lColor As Long) As Long
  13. Declare Function chart_SetStatusItem Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal n As Integer, ByVal Text As Integer, ByVal idm As Integer, ByVal Frame As Integer, ByVal w As Integer, ByVal min As Integer, ByVal desp As Integer, ByVal s As Long)
  14. Declare Sub chart_Paint Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal hDC As Integer, ByVal xLeft As Integer, ByVal yTop As Integer, ByVal xRight As Integer, ByVal yBottom As Integer, ByVal bPrintMode As Integer, ByVal l As Long)
  15. Declare Function chart_OpenDataEx Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wCode As Integer, ByVal n1 As Integer, ByVal n2 As Integer) As Long
  16. Declare Function chart_GetAdm Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wType As Integer) As Double
  17. Declare Function chart_GetPaintInfo Lib "CHART2FX.VBX" (ByVal hWnd As Integer, ByVal wParam As Integer, pValue As Any) As Long
  18.  
  19. ' Notification Codes for ChangeColor Event
  20. Global Const CCC_SERIE = 0
  21. Global Const CCC_SERIEBK = 1
  22. Global Const CCC_ONE = 2
  23. Global Const CCC_ONEBK = 3
  24. Global Const CCC_BARHORZ = 4
  25. Global Const CCC_BKGND = 5
  26. Global Const CCC_2DBK = 6
  27. Global Const CCC_3DBK = 7
  28.  
  29. ' Notification Codes for ChangeString Event
  30. Global Const CCS_LEGEND = 0
  31. Global Const CCS_SERLEGEND = 1
  32.  
  33. ' Notification Codes for ChangeString Event
  34. Global Const CCP_SERIE = 0
  35. Global Const CCP_ONE = 1
  36.  
  37. ' Gallery Types
  38. Global Const LINES = 1                                                        ' LINE is already defined in VB
  39. Global Const BAR = 2
  40. Global Const SPLINE = 3
  41. Global Const MARK = 4
  42. Global Const PIE = 5
  43. Global Const AREA = 6
  44. Global Const PARETO = 7
  45. Global Const SCATTER = 8
  46. Global Const HILOW = 9
  47. Global Const SURFACE = 10
  48. Global Const POLAR = 11
  49. Global Const CUBE = 12
  50. Global Const DOUGHNUT = 13
  51.  
  52. ' Chart Types
  53. Global Const CT_3D = &H100&
  54. Global Const CT_HORZ = &H200&
  55. Global Const CT_TOOL = &H400&
  56. Global Const CT_PALETTE = &H800&
  57. Global Const CT_LEGEND = &H1000&
  58. Global Const CT_TOGETHER = &H2000&
  59. Global Const CT_POINTS = &H4000&
  60. Global Const CT_SHOWZERO = &H8000&
  61. Global Const CT_EACHBAR = &H10000
  62. Global Const CT_CLUSTER = &H20000
  63. Global Const CT_SHOWDATA = &H40000
  64. Global Const CT_DLGGRAY = &H80000
  65. Global Const CT_PATTERN = &H100000
  66. Global Const CT_SHOWVALUES = &H200000
  67. Global Const CT_MENU = &H400000
  68. Global Const CT_SHOWLINES = &H800000
  69. Global Const CT_SCATTERLINE = &H800000
  70. Global Const CT_COLORLINE = &H1000000
  71. Global Const CT_NOAREALINE = &H2000000
  72. Global Const CT_HILOWSTD = &H2000000
  73. Global Const CT_NOBORDERS = &H4000000
  74. Global Const CT_PIEVALUES = &H8000000
  75. Global Const CT_TRACKMOUSE = &H10000000
  76. Global Const CT_EVENSPACING = &H20000000
  77. Global Const CT_SERLEGEND = &H40000000
  78. Global Const CT_PAINTMARKER = &H80000000
  79.                   
  80. 'Extended types
  81. Global Const CTE_STEPLINES = &H1
  82. Global Const CTE_SMOOTH = &H2
  83. Global Const CTE_SQUAREPIE = &H4
  84. Global Const CTE_NOLEGINVALIDATE = &H8
  85. Global Const CTE_ACTMINMAX=&H10
  86. Global Const CTE_NOTITLESHADOW=&H20
  87. Global Const CTE_CREATELEGENDS=&H40
  88. Global Const CTE_NOCROSS=&H80
  89. Global Const CTE_LOGBREAK=&H100
  90.  
  91. 'Extended types
  92. Global Const CS_CHLINE = &H1&
  93. Global Const CS_CHBAR = &H2&
  94. Global Const CS_CHSPLINE = &H4&
  95. Global Const CS_CHMARK = &H8&
  96. Global Const CS_CHPIE = &H10&
  97. Global Const CS_CHAREA = &H20&
  98. Global Const CS_CHPARETO = &H40&
  99. Global Const CS_CHSCATTER = &H80&
  100. Global Const CS_CHHILOW = &H100&
  101. Global Const CS_MULTITYPE = &H800&
  102. Global Const CS_CHDEFAULT = &HFFF&
  103. Global Const CS_MINMAX = &H1000&
  104. Global Const CS_3D = &H2000&
  105. Global Const CS_HORZ = &H4000&
  106. Global Const CS_TOGETHER = &H8000&
  107. Global Const CS_SHOWPOINT = &H10000
  108. Global Const CS_SCALE = &H20000
  109. Global Const CS_TITLES = &H40000
  110. Global Const CS_FONTS = &H80000
  111. Global Const CS_EDITABLE = &H100000
  112. Global Const CS_FILEEXPORT = &H200000
  113. Global Const CS_FILEIMPORT = &H400000
  114. Global Const CS_SCROLLABLE = &H800000
  115. Global Const CS_PRINTABLE = &H1000000
  116. Global Const CS_3DVIEW = &H2000000
  117. Global Const CS_GRID = &H4000000
  118. Global Const CS_RESIZEABLE = &H8000000
  119. Global Const CS_TEMPLATE = &H10000000
  120. Global Const CS_COPY = &H20000000
  121. Global Const CS_CLOSEABLE = &H40000000
  122. Global Const CS_LOGSCALE = &H80000000
  123. Global Const CS_ALL = &HFFFFFFFF
  124.  
  125. ' Extended styles
  126. Global Const CSE_NOSEPARATE=&H1
  127. Global Const CSE_NOLASTPAGE=&H2
  128. Global Const CSE_WIN95TOP=&H4
  129.  
  130. ' Constants
  131.  
  132. ' STYLE, TYPE
  133. Global Const CHART_ADD = 0
  134. Global Const CHART_SET = 1
  135. Global Const CHART_REMOVE = 2
  136.  
  137. ' STACKED
  138. Global Const CHART_NOSTACKED = 0
  139. Global Const CHART_STACKED = 1
  140. Global Const CHART_STACKED100 = 2
  141.  
  142. ' GRID
  143. Global Const CHART_NOGRID = 0
  144. Global Const CHART_HORZGRID = 1
  145. Global Const CHART_VERTGRID = 2
  146. Global Const CHART_BOTHGRID = 3
  147. Global Const CHART_GRIDY2 = 4
  148.  
  149. ' POINTTYPE
  150. Global Const CHART_NONEMK = 0
  151. Global Const CHART_RECTMK = 1
  152. Global Const CHART_CIRCLEMK = 2
  153. Global Const CHART_TRIANGLEMK = 3
  154. Global Const CHART_MARBLEMK = 4
  155. Global Const CHART_CUBEMK = 5
  156. Global Const CHART_MANYMK = 6
  157.  
  158. ' TITLES
  159. Global Const CHART_LEFTTIT = 0
  160. Global Const CHART_RIGHTTIT = 1
  161. Global Const CHART_TOPTIT = 2
  162. Global Const CHART_BOTTOMTIT = 3
  163.  
  164. ' FONTS
  165. Global Const CHART_LEFTFT = 0
  166. Global Const CHART_RIGHTFT = 1
  167. Global Const CHART_TOPFT = 2
  168. Global Const CHART_BOTTOMFT = 3
  169. Global Const CHART_XLEGFT = 4
  170. Global Const CHART_YLEGFT = 5
  171. Global Const CHART_FIXEDFT = 6
  172. Global Const CHART_LEGENDFT = 7
  173. Global Const CHART_VALUESFT = 8
  174. Global Const CHART_POINTFT = 9
  175.  
  176. ' DBLCLK and RIGHTCLK
  177. Global Const CHART_BALOONCLK = 0
  178. Global Const CHART_DIALOGCLK = 1
  179. Global Const CHART_NONECLK = 2
  180. Global Const CHART_MENUCLK = 3
  181.  
  182. ' GAP
  183. Global Const CHART_LEFTGAP = 0
  184. Global Const CHART_RIGHGAP = 1
  185. Global Const CHART_TOPGAP = 2
  186. Global Const CHART_BOTTOMGAP = 3
  187. Global Const CHART_ALLGAP = 4
  188.  
  189. ' Colors
  190. Global Const CHART_TRANSPARENT = &H80000000
  191.  
  192. Global Const CHART_WHITE = 1
  193. Global Const CHART_BLACK = 2
  194. Global Const CHART_LTGRAY = 3
  195. Global Const CHART_DKGRAY = 4
  196. Global Const CHART_RED = 5
  197. Global Const CHART_DKRED = 6
  198. Global Const CHART_BLUE = 7
  199. Global Const CHART_DKBLUE = 8
  200. Global Const CHART_GREEN = 9
  201. Global Const CHART_DKGREEN = 10
  202. Global Const CHART_CYAN = 11
  203. Global Const CHART_DKCYAN = 12
  204. Global Const CHART_YELLOW = 13
  205. Global Const CHART_DKYELLOW = 14
  206. Global Const CHART_VIOLET = 15
  207. Global Const CHART_DKVIOLET = 16
  208.  
  209. ' Line Styles
  210. Global Const CHART_SOLID = 0
  211. Global Const CHART_DASH = 1
  212. Global Const CHART_DOT = 2
  213. Global Const CHART_DASHDOT = 3
  214. Global Const CHART_DASHDOTDOT = 4
  215. Global Const CHART_PS_TRANSPARENT = &H4000&
  216.  
  217. ' Color Schemes
  218. Global Const CHART_CSSOLID = 0
  219. Global Const CHART_CSBWPATTERN = 1
  220. Global Const CHART_CSPATTERN = 2
  221.  
  222. ' Color Types
  223. Global Const CHART_FGROUND = 0
  224. Global Const CHART_BGROUND = 1
  225.  
  226. ' chart_Get Constants
  227. Global Const CHART_GVALUES = 0
  228. Global Const CHART_GINIVALUES = 1
  229. Global Const CHART_GXVALUES = 2
  230.  
  231. ' XLegType Constants
  232. Global Const CL_NOTCLIPPED = &H1&
  233. Global Const CL_NOTCHANGECOLOR = &H2&
  234. Global Const CL_HIDE = &H4&                                                                ' Obsolete (use CL_HIDEXLEG)
  235. Global Const CL_HIDEXLEG = &H4&
  236. Global Const CL_FORCESERLEG = &H8&
  237. Global Const CL_GETLEGEND = &H10&
  238. Global Const CL_HIDEYLEG = &H20&
  239. Global Const CL_2LEVELS = &H40&
  240. Global Const CL_VERTXLEG = &H80&
  241. Global Const CL_SHOWZLEG = &H100&
  242. Global Const CL_PIELEGEND =    &H0200
  243. Global Const CL_SINGLELINE = &H0400
  244.  
  245.  
  246. ' ConstType Constants
  247. Global Const CC_HIDETEXT = &H1&
  248. Global Const CC_HIDE = &H2&
  249.  
  250. ' Item Indexes (ItemColor, ItemBkColor, ItemWidth, ItemStyle)
  251. Global Const CI_HORZGRID = 0
  252. Global Const CI_VERTGRID = 1
  253. Global Const CI_2DLINE = 2
  254. Global Const CI_FIXED = 3
  255. Global Const CI_LOOPPOS = 4
  256. Global Const CI_HORZGRID2 = 5
  257.  
  258. ' DecimalsNum Indexes
  259. Global Const CD_ALL = 0
  260. Global Const CD_VALUES = 1
  261. Global Const CD_YLEG = 2
  262. Global Const CD_XLEG = 3
  263. Global Const CD_YLEG2 = 4
  264.  
  265. ' ChartStatus Constants
  266. Global Const CHART_GSVALUES = &H1&
  267. Global Const CHART_GSLEGENDS = &H2&
  268. Global Const CHART_GSCOLORS = &H4&
  269. Global Const CHART_GSPATTERNS = &H8&
  270. Global Const CHART_GSPALETTE = &H10&
  271. Global Const CHART_GSPATTPAL = &H20&
  272. Global Const CHART_GSREADTEMP = &H40&
  273. Global Const CHART_GSREADFILE = &H80&
  274. Global Const CHART_GSGALLERY = &H100&
  275. Global Const CHART_GSOPTIONS = &H200&
  276.  
  277. ' SetTool Constants
  278. Global Const CST_IMPORT = &H1&
  279. Global Const CST_EXPORT = &H2&
  280. Global Const CST_FILE = (CST_IMPORT Or CST_EXPORT)
  281. Global Const CST_COPYBITMAP = &H4&
  282. Global Const CST_COPYDATA = &H8&
  283. Global Const CST_COPY = (CST_COPYBITMAP Or CST_COPYDATA)
  284. Global Const CST_PRINT = &H10&
  285. Global Const CST_FILEEDIT = (CST_FILE Or CST_COPY Or CST_PRINT)
  286. Global Const CST_SPACE1 = &H20&
  287. Global Const CST_GALLERY = &H40&
  288. Global Const CST_SPACECOMBO = &H80&
  289. Global Const CST_COLOR = &H100&
  290. Global Const CST_SPACE2 = &H200&
  291. Global Const CST_3D = &H400&
  292. Global Const CST_ROTATE = &H800&
  293. Global Const CST_CLUSTER = &H1000&
  294. Global Const CST_ZOOM = &H2000&
  295. Global Const CST_VIEW = (CST_3D Or CST_ROTATE Or CST_CLUSTER Or CST_ZOOM)
  296. Global Const CST_SPACE3 = &H4000&
  297. Global Const CST_LEGEND = &H8000&
  298. Global Const CST_SERLEGEND = &H10000
  299. Global Const CST_VGRID = &H20000
  300. Global Const CST_HGRID = &H400007
  301. Global Const CST_LEGGRID = (CST_LEGEND Or CST_SERLEGEND Or CST_VGRID Or CST_HGRID)
  302. Global Const CST_SPACE4 = &H80000
  303. Global Const CST_TITLES = &H100000
  304. Global Const CST_FONTS = &H200000
  305. Global Const CST_TOOLS = &H400000
  306. Global Const CST_OPTIONS = &H800000
  307. Global Const CST_OTHER = (CST_TITLES Or CST_FONTS Or CST_TOOLS Or CST_OPTIONS)
  308.  
  309. ' GalleryTool Constants
  310. Global Const CSG_LINE = &H1&
  311. Global Const CSG_BAR = &H2&
  312. Global Const CSG_SPLINE = &H4&
  313. Global Const CSG_MARK = &H8&
  314. Global Const CSG_PIE = &H10&
  315. Global Const CSG_AREA = &H20&
  316. Global Const CSG_PARETO = &H40&
  317. Global Const CSG_SCATTER = &H80&
  318. Global Const CSG_HILOW = &H100&
  319. Global Const CSG_SURFACE = &H200&
  320. Global Const CSG_POLAR = &H400&
  321. Global Const CSG_CUBE = &H800&
  322. Global Const CSG_DOUGHNUT = &H1000&
  323. Global Const CSG_BARHORZ = &H2000&
  324. Global Const CSG_ALL = &HFFFFFFFF
  325.  
  326. ' Fonts
  327. Global Const CF_BOLD = &H100&
  328. Global Const CF_ITALIC = &H200&
  329. Global Const CF_UNDERLINE = &H400&
  330. Global Const CF_STRIKEOUT = &H800&
  331. Global Const CF_FDONTCARE = &H0&
  332. Global Const CF_FROMAN = &H1000&
  333. Global Const CF_FSWISS = &H2000&
  334. Global Const CF_FMODERN = &H3000&
  335. Global Const CF_FSCRIPT = &H4000&
  336. Global Const CF_FDECORATIVE = &H5000&
  337. Global Const CF_ARIAL = &H0&
  338. Global Const CF_COURIER = &H10000
  339. Global Const CF_COURIERNEW = &H20000
  340. Global Const CF_HELVETICA = &H30000
  341. Global Const CF_MODERN = &H40000
  342. Global Const CF_ROMAN = &H50000
  343. Global Const CF_SCRIPT = &H60000
  344. Global Const CF_SYMBOL = &H70000
  345. Global Const CF_TIMES = &H80000
  346. Global Const CF_TIMESNEWR = &H90000
  347. Global Const CF_WINGDINGS = &HA0000
  348.  
  349. ' chart_OpenData Constants
  350. Global Const COD_VALUES = 1
  351. Global Const COD_CONSTANTS = 2
  352. Global Const COD_COLORS = 3
  353. Global Const COD_STRIPES = 4
  354. Global Const COD_INIVALUES = 5
  355. Global Const COD_XVALUES = 6
  356. Global Const COD_STATUSITEMS = 7
  357.  
  358. ' chart_OpenData Actions
  359. Global Const COD_SMOOTH = &H1000&
  360. Global Const COD_NOINVALIDATE = &H2000&
  361. Global Const COD_SCROLLLEGEND = &H4000&
  362. Global Const COD_REALTIME = &H100&
  363. Global Const COD_REALTIMESCROLL = &H300&
  364. Global Const COD_ADDPOINTS = &H400&
  365. Global Const COD_REMOVE = &H800&
  366. Global Const COD_UNKNOWN = &HFFFF
  367. Global Const COD_UNCHANGE = 0
  368.  
  369. 'Same as FLT_MAX
  370. Global Const CHART_HIDDEN = 3.402823466E+38
  371.  
  372. ' chart_SetAdm,chart_GetAdm Constants
  373. Global Const CSA_MIN = 0
  374. Global Const CSA_MAX = 1
  375. Global Const CSA_GAP = 2
  376. Global Const CSA_SCALE = 3
  377. Global Const CSA_YLEGGAP = 4
  378. Global Const CSA_PIXXVALUE = 5
  379. Global Const CSA_XMIN = 6
  380. Global Const CSA_XMAX = 7
  381. Global Const CSA_XGAP = 8
  382. Global Const CSA_LOGBASE = 9
  383. Global Const CSA_MIN2 = 10
  384. Global Const CSA_MAX2 = 11
  385. Global Const CSA_GAP2 = 12
  386. Global Const CSA_SCALE2 = 13
  387. Global Const CSA_XSCALE = 14
  388. Global Const CSA_LOGBASE2 = 15
  389. Global Const CSA_LOGBASEX = 16
  390.  
  391. Global Const CHART_LOGN = 0
  392.  
  393. ' chart_OpenData - chart_SetValue, ... return values
  394. Global Const CR_OUTRANGE = -1
  395. Global Const CR_NOOPEN = -2
  396. Global Const CR_FAIL = -3
  397. Global Const CR_INVALID = -4
  398. Global Const CR_BADCODE = -5
  399. Global Const CR_SUCCESS = 0
  400. Global Const CR_NEW = 1
  401. Global Const CR_KEEPALL = 2
  402. Global Const CR_LOSTLAST = 3
  403.  
  404. ' StatusBar Item Structure
  405. Type CHART_STITEM
  406.     sText   As String
  407.     wIdm    As Integer
  408.     bFrame  As Integer
  409.     nWidth  As Integer
  410.     nMin    As Integer
  411.     nDesp   As Integer
  412.     dwStyle As Long
  413. End Type
  414.  
  415. Type CHART_P3D
  416.     x   As Integer
  417.     y   As Integer
  418.     z   As Integer
  419. End Type
  420.  
  421. ' HILOW Constants
  422.  
  423. ' Hi-Low-Close
  424. Global Const HLC_LOW = 0
  425. Global Const HLC_CLOSE = 1
  426. Global Const HLC_HIGH = 2
  427.  
  428. ' Open-Hi-Low-Close
  429. Global Const OHLC_LOW = 0
  430. Global Const OHLC_OPEN = 1
  431. Global Const OHLC_CLOSE = 2
  432. Global Const OHLC_HIGH = 3
  433.  
  434. ' ClearLegend Constants
  435. Global Const CHART_LEGEND = 0
  436. Global Const CHART_SERLEG = 1
  437. Global Const CHART_KEYLEG = 2
  438. Global Const CHART_KEYSER = 3
  439. Global Const CHART_FIXLEG = 4
  440. Global Const CHART_YLEG = 5
  441.  
  442. ' RealTimeStyle
  443. Global Const CRT_LOOPPOS = &H1&
  444. Global Const CRT_NOWAITARROW = &H2&
  445.  
  446. ' Export,Import,ExportStr,ImportStr Constants
  447. Global Const CHART_DATA = 0
  448. Global Const CHART_BITMAP = 1
  449. Global Const CHART_METAFILE = 2
  450. Global Const CHART_CFXFILE = 3
  451. Global Const CHART_CFXTEMPLATE = 4
  452. Global Const CHART_INTERNALFILE = 5
  453. Global Const CHART_INTERNALTEMPLATE = 6
  454.  
  455. ' ToolStyle,ToolSize Constants
  456. Global Const CTOOL_LEGEND = 0
  457. Global Const CTOOL_SERLEGEND = 1
  458. Global Const CTOOL_TB = 2
  459.  
  460. Global Const CTOOL_OPTIONS = &H2000
  461. Global Const CTOOL_MOVE = &H4000
  462.  
  463. ' chart_Paint Modes
  464. Global Const CPAINT_BKGND = &H1&
  465. Global Const CPAINT_PRINT = &H4&
  466.  
  467. ' TBButtonStyle
  468. Global Const CTBS_BUTTON = &H1&
  469. Global Const CTBS_SEPARATOR = &H2&
  470. Global Const CTBS_MENU = &H4&
  471. Global Const CTBS_ICONCOMBO = &H8&
  472. Global Const CTBS_HWND = &H88&
  473. Global Const CTBS_DESTROY = &H10&
  474. Global Const CTBS_REPEAT = &H800&
  475. Global Const CTBS_GROUP = &H1000&
  476. Global Const CTBS_2STATE = &H2000&
  477. Global Const CTBS_GROUP2STATE = &H3000&
  478. Global Const CTBS_HEAD = &H4000&
  479.  
  480. ' ToolStyle Constants
  481. Global Const CTS_FLOATING = &H4000&
  482. Global Const CTS_HIDEFOCUS = &H8000&
  483. Global Const CTS_WHITELINE = &H10000
  484. Global Const CTS_DELIMITER = &H20000
  485. Global Const CTS_SIZEABLE = &H40000
  486. Global Const CTS_HORZLAYER = &H80000
  487. Global Const CTS_VERTLAYER = &H100000
  488. Global Const CTS_SIZELAYER = &H200000
  489. Global Const CTS_DBLCLKS = &H400000
  490. Global Const CTS_DOCKABLE = &H800000
  491. Global Const CTS_SPLITTER = &H1000000
  492. Global Const CTS_3DFRAME = &H2000000
  493. Global Const CTS_BORDERLAYER = &H4000000
  494. Global Const CTS_BORDERIFLAYER = &H8000000
  495.  
  496. 'Positions for tools (CM_TOOLPOS)
  497. Global Const CTP_TOP = &H0&
  498. Global Const CTP_LEFT = &H1&
  499. Global Const CTP_BOTTOM = &H2&
  500. Global Const CTP_RIGHT = &H3&
  501. Global Const CTP_FIXED = &H4&
  502. Global Const CTP_FLOAT = &H7FFF&
  503. Global Const CTP_SWITCH = &H7FFE&
  504.  
  505. 'Tools Options
  506. 'Legend Options
  507. Global Const CHART_LWORDBREAK = &H1&
  508. Global Const CHART_LSKIPEMPTY = &H2&
  509. Global Const CHART_LSHOWMENU = &H4&
  510. Global Const CHART_LOPTIONSDLG = &H8&
  511. Global Const CHART_LRIGHTALIGN = &H10
  512. Global Const CHART_LNOCOLOR = &H20
  513.  
  514. ' Toolbar options
  515. Global Const CHART_TBBALLOON = &H1
  516. Global Const CHART_TBSTANDARD =    &H2
  517. Global Const CHART_TBNOTOOLTIPS = &H4
  518.  
  519. ' Menu and Toolbar IDS
  520. Global Const CFX_ID_FIRST = &H7300&
  521. Global Const CFX_ID_CLOSE = &H7301&
  522. Global Const CFX_ID_EXPORTDATA = &H7302&
  523. Global Const CFX_ID_EXPORTBITMAP = &H7303&
  524. Global Const CFX_ID_LEGEND = &H7304&
  525. Global Const CFX_ID_SERIESLEGEND = &H7305&
  526. Global Const CFX_ID_TOOLBAR = &H7306&
  527. Global Const CFX_ID_PALETTE = &H7307&
  528. Global Const CFX_ID_PATTERN = &H7308&
  529. Global Const CFX_ID_STATUS = &H7309&
  530. Global Const CFX_ID_DATAEDITOR = &H730A&
  531. Global Const CFX_ID_3D = &H730B&
  532. Global Const CFX_ID_CLUSTER = &H730C&
  533. Global Const CFX_ID_HORZGRID = &H730D&
  534. Global Const CFX_ID_VERTGRID = &H730E&
  535. Global Const CFX_ID_ZOOM = &H730F&
  536. Global Const CFX_ID_GALLERY = &H7310&
  537. Global Const CFX_ID_COLOR = &H7311&
  538. Global Const CFX_ID_TOOLS = &H7312&
  539. Global Const CFX_ID_PRINT = &H7313&
  540. Global Const CFX_ID_HELPCONTENTS = &H7314&
  541. Global Const CFX_ID_HELPHOWTOUSE = &H7315&
  542. Global Const CFX_ID_EXPORTMETAFILE = &H7316&
  543. Global Const CFX_ID_APPLY = &H7317&
  544.  
  545. ' Gallery types
  546. Global Const CFX_ID_LINE = &H7350&
  547. Global Const CFX_ID_BAR = &H7351&
  548. Global Const CFX_ID_SPLINE = &H7352&
  549. Global Const CFX_ID_MARK = &H7353&
  550. Global Const CFX_ID_PIE = &H7354&
  551. Global Const CFX_ID_AREA = &H7355&
  552. Global Const CFX_ID_PARETO = &H7356&
  553. Global Const CFX_ID_SCATTER = &H7357&
  554. Global Const CFX_ID_HILOW = &H7358&
  555. Global Const CFX_ID_SURFACE = &H7359&
  556. Global Const CFX_ID_POLAR = &H735A&
  557. Global Const CFX_ID_CUBE = &H735B&
  558. Global Const CFX_ID_DOUGHNUT = &H735C&
  559. Global Const CFX_ID_HORZBAR = &H735D&
  560.     
  561. Global Const CFX_ID_DLGFIRST = &H7400&
  562. Global Const CFX_ID_DLGLAST = &H74FF&
  563.     
  564. Global Const CFX_ID_ROTATE = &H7400&
  565. Global Const CFX_ID_OPTIONS = &H7401&
  566. Global Const CFX_ID_EDITTITLES = &H7402&
  567. Global Const CFX_ID_PAGESETUP = &H7403&
  568. Global Const CFX_ID_DLGPRINT = &H7404&
  569. Global Const CFX_ID_EXPORTFILE = &H7405&
  570. Global Const CFX_ID_IMPORTFILE = &H7406&
  571. Global Const CFX_ID_EXPORTTEMPLATE = &H7407&
  572. Global Const CFX_ID_IMPORTTEMPLATE = &H7408&
  573. Global Const CFX_ID_ABOUT = &H7409&
  574. Global Const CFX_ID_GENERAL = &H740A&
  575. Global Const CFX_ID_SERIES = &H740B&
  576. Global Const CFX_ID_SCALE = &H740C&
  577. Global Const CFX_ID_FONTS = &H740D&
  578. Global Const CFX_ID_FONTLT = &H740E&
  579. Global Const CFX_ID_FONTRT = &H740F&
  580. Global Const CFX_ID_FONTTT = &H7410&
  581. Global Const CFX_ID_FONTBT = &H7411&
  582. Global Const CFX_ID_FONTXL = &H7412&
  583. Global Const CFX_ID_FONTYL = &H7413&
  584. Global Const CFX_ID_FONTFX = &H7414&
  585. Global Const CFX_ID_FONTLY = &H7415&
  586. Global Const CFX_ID_FONTVAL = &H7416&
  587.  
  588. Global Const CFX_ID_LAST = &H74FF&
  589.  
  590. ' Reserved IDS
  591. Global Const CFX_ID_RESERVEDFIRST = &H7500&
  592. Global Const CFX_ID_RESERVEDLAST = &H76FF&
  593.  
  594. ' ShowDialog Constants
  595. Global Const CDIALOG_EXPORTFILE = CFX_ID_EXPORTFILE
  596. Global Const CDIALOG_IMPORTFILE = CFX_ID_IMPORTFILE
  597. Global Const CDIALOG_WRITETEMPLATE = CFX_ID_EXPORTTEMPLATE
  598. Global Const CDIALOG_READTEMPLATE = CFX_ID_IMPORTTEMPLATE
  599. Global Const CDIALOG_PAGESETUP = CFX_ID_PAGESETUP
  600. Global Const CDIALOG_ABOUT = CFX_ID_ABOUT
  601. Global Const CDIALOG_OPTIONS = CFX_ID_OPTIONS
  602. Global Const CDIALOG_EDITTITLES = CFX_ID_EDITTITLES
  603. Global Const CDIALOG_FONTS = CFX_ID_FONTS
  604. Global Const CDIALOG_ROTATE = CFX_ID_ROTATE
  605. Global Const CDIALOG_GENERAL = CFX_ID_GENERAL
  606. Global Const CDIALOG_SERIES = CFX_ID_SERIES
  607. Global Const CDIALOG_SCALE = CFX_ID_SCALE
  608.  
  609. ' PaintInfo Constants
  610. Global Const CPI_GETDC = 0
  611. Global Const CPI_RELEASEDC = 1
  612. Global Const CPI_PIXELTOMARKER = 2
  613. Global Const CPI_MARKERTOPIXEL = 3
  614. Global Const CPI_VALUETOPIXEL = 4
  615. Global Const CPI_PIXELTOVALUE = 5
  616. Global Const CPI_POSITION = 6
  617. Global Const CPI_DIMENSION = 7
  618. Global Const CPI_PRINTINFO = 8
  619. Global Const CPI_SCROLLINFO = 9
  620. Global Const CPI_3DINFO = 10
  621. Global Const CPI_3DTO2D = 11
  622.  
  623. Global Const CM_GETPAINTINFO = &H66&
  624.  
  625. ' StatusBar Item Styles
  626. Global Const CHART_STLEFT = &H0&
  627. Global Const CHART_STCENTER = &H1&
  628. Global Const CHART_STRIGHT = &H2&
  629.  
  630. Global Const CHART_STITEM_BYPOS = &H4000&
  631.  
  632. ' Styles for DataStyle
  633. Global Const CHART_DS_SERLEGEND = &H1&
  634. Global Const CHART_DS_USETEXTASLEG = &H2&
  635. Global Const CHART_DS_USEDATEASLEG = &H4&
  636.  
  637. ' DataType Constants
  638. Global Const CDT_STRING = 1
  639. Global Const CDT_NUMBER = 7
  640. Global Const CDT_NOTUSED = -1
  641.  
  642. Global Const CHART_MAXBOUNDFIELDS = 16
  643. Global Const CHART_E = 2.71828182846
  644.  
  645. Function CHART_HIWORD (l As Long)
  646.     CHART_HIWORD = CInt((l And &HFFFF0000) / &H10000)
  647. End Function
  648.  
  649. Function CHART_LOWORD (ByVal l As Long)
  650.     l2& = l And &HFFFF&
  651.     If (l2& > 32767) Then
  652.     l2& = l2& - 65536
  653.     End If
  654.     CHART_LOWORD = CInt(l2&)
  655. End Function
  656.  
  657. Function CHART_ML (wLow As Integer, wHi As Integer)
  658.     CHART_ML = CLng(&H10000 * wHi) + wLow
  659. End Function
  660.  
  661.