chartfx3.pas

石油行业油井损害软件,有详细的油井损害模型,对石油建模有重要帮助

unit chartfx3;

{ This file contains pascal declarations imported from a type library.
  This file will be written during each import or refresh of the type
  library editor.  Changes to this file will be discarded during the
  refresh process. }

{ ChartFX 2.0 OLE Custom Control }
{ Version 2.0 }

{ Conversion log:
  Warning: 'Type' is a reserved word. _DChartfx.Type changed to Type_
  Warning: 'Const' is a reserved word. _DChartfx.Const changed to Const_
 }

interface

uses Windows, ActiveX, Classes, Graphics, OleCtrls, StdVCL;

const
  LIBID_ChartfxLib: TGUID = '{8996B0A4-D7BE-101B-8650-00AA003A5593}';

const

{ PointType Property settings }

{ PointTypeConstants }

  CHART_NONEMK = 0;
  CHART_RECTMK = 1;
  CHART_CIRCLEMK = 2;
  CHART_TRIANGLEMK = 3;
  CHART_MARBLEMK = 4;
  CHART_CUBEMK = 5;
  CHART_MANYMK = 6;

{ Scheme Property settings }

{ SchemeConstants }

  CHART_CSSOLID = 0;
  CHART_CSBWPATTERN = 1;
  CHART_CSPATTERN = 2;

{ Stacked Property settings }

{ StackedConstants }

  CHART_NOSTACKED = 0;
  CHART_STACKED = 1;
  CHART_STACKED100 = 2;

{ Grid Property settings }

{ GridConstants }

  CHART_NOGRID = 0;
  CHART_HORZGRID = 1;
  CHART_VERTGRID = 2;
  CHART_BOTHGRID = 3;
  CHART_GRIDY2 = 4;

{ ChartType and Type Properties settings }

{ GalleryConstants }

  LINES = 1;
  BAR = 2;
  SPLINE = 3;
  MARK = 4;
  PIE = 5;
  AREA = 6;
  PARETO = 7;
  SCATTER = 8;
  HILOW = 9;

{ ConstType Property settings }

{ ConstTypeConstants }

  CC_HIDETEXT = 1;
  CC_HIDE = 2;

{ LegendStyle Property settings }

{ LegendStyleConstants }

  CL_NOTCLIPPED = 1;
  CL_NOTCHANGECOLOR = 2;
  CL_HIDE = 4;
  CL_HIDEXLEG = 4;
  CL_FORCESERLEG = 8;
  CL_GETLEGEND = 16;
  CL_HIDEYLEG = 32;

{ Flags for OpenData,OpenDataEx and CloseData Methods }

{ OpenDataConstants }

  COD_VALUES = 1;
  COD_CONSTANTS = 2;
  COD_COLORS = 3;
  COD_STRIPES = 4;
  COD_INIVALUES = 5;
  COD_XVALUES = 6;
  COD_STATUSITEMS = 7;
  COD_UNKNOWN = -1;
  COD_UNCHANGE = 0;

{ Values for DblClk and RigClk Methods }

{ ClickConstants }

  CHART_BALLOONCLK = 0;
  CHART_DIALOGCLK = 1;
  CHART_NONECLK = 2;
  CHART_MENUCLK = 3;

{ Values for ShowDialog Method }

{ DialogConstants }

  CDIALOG_EXPORTFILE = 14;
  CDIALOG_IMPORTFILE = 15;
  CDIALOG_WRITETEMPLATE = 8;
  CDIALOG_READTEMPLATE = 9;
  CDIALOG_PAGESETUP = 4;
  CDIALOG_ABOUT = 11;
  CDIALOG_OPTIONS = 12;
  CDIALOG_EDITTITLES = 35;
  CDIALOG_FONTS = 39;
  CDIALOG_ROTATE = 52;

{ Values for Adm Property }

{ AdmConstants }

  CSA_MIN = 0;
  CSA_MAX = 1;
  CSA_GAP = 2;
  CSA_SCALE = 3;
  CSA_YLEGGAP = 4;
  CSA_PIXXVALUE = 5;
  CSA_XMIN = 6;
  CSA_XMAX = 7;
  CSA_XGAP = 8;
  CSA_LOGBASE = 9;

{ Values for Title Property }

{ TitleConstants }

  CHART_LEFTTIT = 0;
  CHART_RIGHTTIT = 1;
  CHART_TOPTIT = 2;
  CHART_BOTTOMTIT = 3;

{ Values for Fonts Property }

{ FontConstants }

  CHART_LEFTFT = 0;
  CHART_RIGHTFT = 1;
  CHART_TOPFT = 2;
  CHART_BOTTOMFT = 3;
  CHART_XLEGFT = 4;
  CHART_YLEGFT = 5;
  CHART_FIXEDFT = 6;
  CHART_LEGENDFT = 7;

{ ItemStyle,ItemWidth,ItemColor Property indexes }

{ ItemConstants }

  CI_HORZGRID = 0;
  CI_VERTGRID = 1;

{ DecimalsNum Property indexes }

{ DecimalConstants }

  CD_ALL = 0;
  CD_VALUES = 1;
  CD_YLEG = 2;
  CD_XLEG = 3;

const

{ Component class GUIDs }
  Class_Chartfx: TGUID = '{8996B0A1-D7BE-101B-8650-00AA003A5593}';

type

{ Forward declarations }
{ Forward declarations: Interfaces }
  _DChartfx = dispinterface;
  _DChartfxEvents = dispinterface;

{ Forward declarations: CoClasses }
  Chartfx = _DChartfx;

{ Forward declarations: Enums }
  PointTypeConstants = TOleEnum;
  SchemeConstants = TOleEnum;
  StackedConstants = TOleEnum;
  GridConstants = TOleEnum;
  GalleryConstants = TOleEnum;
  ConstTypeConstants = TOleEnum;
  LegendStyleConstants = TOleEnum;
  OpenDataConstants = TOleEnum;
  ClickConstants = TOleEnum;
  DialogConstants = TOleEnum;
  AdmConstants = TOleEnum;
  TitleConstants = TOleEnum;
  FontConstants = TOleEnum;
  ItemConstants = TOleEnum;
  DecimalConstants = TOleEnum;

{ Dispatch interface for ChartFX Control }

  _DChartfx = dispinterface
    ['{2DC488B0-D891-101B-8652-00AA003A5593}']
    property DesignDraw: Smallint dispid 4;
    property ThisSerie: Smallint dispid 1;
    property ThisPoint: Smallint dispid 2;
    property AutoInvalidate: WordBool dispid 3;
    property Type_: Integer dispid 5;
    property Style: Integer dispid 6;
    property NSeries: Smallint dispid 7;
    property NValues: Smallint dispid 8;
    property ThisColor: TColor dispid 9;
    property ThisBkColor: TColor dispid 10;
    property LeftGap: Smallint dispid 11;
    property RightGap: Smallint dispid 12;
    property TopGap: Smallint dispid 13;
    property BottomGap: Smallint dispid 14;
    property Decimals: Smallint dispid 15;
    property PointType: Smallint dispid 16;
    property Scheme: Smallint dispid 17;
    property Stacked: Smallint dispid 18;
    property Grid: Smallint dispid 19;
    property WallWidth: Smallint dispid 20;
    property BarHorzGap: Smallint dispid 21;
    property View3D: WordBool dispid 22;
    property Angles3D: Integer dispid 23;
    property PixFactor: Smallint dispid 24;
    property LineWidth: Smallint dispid 25;
    property LineStyle: Smallint dispid 26;
    property LineColor: TColor dispid 27;
    property LineBkColor: TColor dispid 28;
    property FixedWidth: Smallint dispid 29;
    property FixedStyle: Smallint dispid 30;
    property FixedColor: TColor dispid 31;
    property FixedBkColor: TColor dispid 32;
    property FixedGap: Smallint dispid 33;
    property RGBBarHorz: TColor dispid 34;
    property RGBBk: TColor dispid 35;
    property RGB2DBk: TColor dispid 36;
    property RGB3DBk: TColor dispid 37;
    property ShowStatus: WordBool dispid 38;
    property HText: WideString dispid 39;
    property ChartStatus: Smallint dispid 40;
    property Edit: Smallint dispid 41;
    property ChartType: Smallint dispid 42;
    property Chart3D: WordBool dispid 43;
    property ToolBar: WordBool dispid 44;
    property PaletteBar: WordBool dispid 45;
    property PatternBar: WordBool dispid 46;
    property CustTool: Integer dispid 47;
    property ReturnValue: Integer dispid 48;
    property AutoIncrement: WordBool dispid 49;
    property ThisValue: Double dispid 50;
    property VertGridGap: Smallint dispid 51;
    property XLegType: Smallint dispid 52;
    property ConstType: Smallint dispid 53;
    property LeftFont: IFontDisp dispid 54;
    property RightFont: IFontDisp dispid 55;
    property TopFont: IFontDisp dispid 56;
    property BottomFont: IFontDisp dispid 57;
    property XLegFont: IFontDisp dispid 58;
    property YLegFont: IFontDisp dispid 59;
    property FixedFont: IFontDisp dispid 60;
    property LegendFont: IFontDisp dispid 61;
    property LegendWidth: Smallint dispid 62;
    property Enabled: WordBool dispid -514;
    property hWnd: OLE_HANDLE dispid -515;
    property BorderStyle: Smallint dispid -504;
    property hCtlWnd: Integer dispid 63;
    property Value[index: Smallint]: Double dispid 82;
    property XValue[index: Smallint]: Double dispid 83;
    property IniValue[index: Smallint]: Double dispid 84;
    property Const_[index: Smallint]: Double dispid 85;
    property Color[index: Smallint]: TColor dispid 86;
    property BkColor[index: Smallint]: TColor dispid 87;
    property Adm[index: Smallint]: Double dispid 88;
    property Pattern[index: Smallint]: Smallint dispid 89;
    property Fonts[index: Smallint]: Integer dispid 90;
    property Title[index: Smallint]: WideString dispid 91;
    property Legend[index: Smallint]: WideString dispid 92;
    property SerLeg[index: Smallint]: WideString dispid 93;
    property KeyLeg[index: Smallint]: WideString dispid 94;
    property FixLeg[index: Smallint]: WideString dispid 95;
    property YLeg[index: Smallint]: WideString dispid 96;
    property KeySer[index: Smallint]: WideString dispid 97;
    property StatusText[index: Smallint]: WideString dispid 98;
    property RGBFont[index: Smallint]: TColor dispid 99;
    property HFont[index: Smallint]: Smallint dispid 100;
    property ItemWidth[index: Smallint]: Smallint dispid 101;
    property ItemStyle[index: Smallint]: Smallint dispid 102;
    property ItemColor[index: Smallint]: TColor dispid 103;
    property DecimalsNum[index: Smallint]: Smallint dispid 104;
    function OpenDataEx(nType: Smallint; n1, n2: Integer): Integer; dispid 64;
    function CloseData(nType: Smallint): WordBool; dispid 65;
    function DblClk(nType: Smallint; lExtra: Integer): Integer; dispid 66;
    function RigClk(nType: Smallint; lExtra: Integer): Integer; dispid 67;
    function Status(nItems: Smallint; lpStatus: Integer): Integer; dispid 68;
    function ShowDialog(nDialog: Smallint; lExtra: Integer): Integer; dispid 69;
    function PrintIt: Integer; dispid 70;
    function Scroll(wParam, lParam: Integer): Integer; dispid 71;
    function SetStatusItem(index: Smallint; bText: WordBool; nID: Smallint; bFrame: WordBool; nWidth, nMin, nDesp: Smallint; dwStyle: Integer): Integer; dispid 72;
    function Paint(hDC: Integer; nLeft, nTop, nRight, nBottom, wAction: Smallint; lps: Integer): Integer; dispid 73;
    function SetStripe(index: Smallint; dMin, dMax: Double; rgb: TColor): Integer; dispid 74;
    function Language(const sResource: WideString): Integer; dispid 75;
    function ExportFile(const lpszNewValue: WideString): Integer; dispid 76;
    function ImportFile(const lpszNewValue: WideString): Integer; dispid 77;
    function WriteTemplate(const lpszNewValue: WideString): Integer; dispid 78;