⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 superlayoutlib_tlb.pas

📁 GIS开发源代码。 SuperMax5.0＋Delphi,用Delphi编写的控件工具包
💻 PAS
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
  end;

// *********************************************************************//
// DispIntf:  IsoLytArtText
// Flags:     (4096) Dispatchable
// GUID:      {9BC536EE-157C-479D-9C2B-34BDE57456A8}
// *********************************************************************//
  IsoLytArtText = dispinterface
    ['{9BC536EE-157C-479D-9C2B-34BDE57456A8}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Text: WideString dispid 11;
    property Shadow: WordBool dispid 12;
    property GradualOrHollow: WordBool dispid 13;
    property BeginColor: OLE_COLOR dispid 14;
    property EndColor: OLE_COLOR dispid 15;
    property Font: IsoTextStyle dispid 16;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    property ShadowColor: OLE_COLOR dispid 17;
    property ShadowCX: Integer dispid 18;
    property ShadowCY: Integer dispid 19;
    property LightOrientation: Double dispid 21;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure ShowPropertyDlg; dispid 8;
    procedure AlignToGrid; dispid 6;
    property Point[nIndex: Integer]: IsoPoint dispid 20;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    property Style: IsoStyle dispid 3;
  end;

// *********************************************************************//
// DispIntf:  IsoLytLineSect
// Flags:     (4096) Dispatchable
// GUID:      {1DE6ECE1-990A-4FAC-B38D-B369774277F4}
// *********************************************************************//
  IsoLytLineSect = dispinterface
    ['{1DE6ECE1-990A-4FAC-B38D-B369774277F4}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytRoundRect
// Flags:     (4096) Dispatchable
// GUID:      {CA9E18EA-91A6-4AD4-B2BD-AB6974F8BBB9}
// *********************************************************************//
  IsoLytRoundRect = dispinterface
    ['{CA9E18EA-91A6-4AD4-B2BD-AB6974F8BBB9}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Roundness: IsoPoint dispid 11;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytEllipse
// Flags:     (4096) Dispatchable
// GUID:      {21426049-CDCE-4A01-B119-586CB14DBA18}
// *********************************************************************//
  IsoLytEllipse = dispinterface
    ['{21426049-CDCE-4A01-B119-586CB14DBA18}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytArc
// Flags:     (4096) Dispatchable
// GUID:      {4C832ECA-9BA0-48C0-8E14-57AE2B13D19F}
// *********************************************************************//
  IsoLytArc = dispinterface
    ['{4C832ECA-9BA0-48C0-8E14-57AE2B13D19F}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytPolygon
// Flags:     (4096) Dispatchable
// GUID:      {E07F82B8-089B-4A40-BFFF-225790B34C7C}
// *********************************************************************//
  IsoLytPolygon = dispinterface
    ['{E07F82B8-089B-4A40-BFFF-225790B34C7C}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Count: Integer dispid 11;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
    property Point[nIndex: Integer]: IsoPoint dispid 14;
    function GetPoints: IsoPoints; dispid 12;
    procedure SetPoints(const newPoints: IsoPoints); dispid 13;
    procedure AddPoint(const newPoint: IsoPoint); dispid 15;
  end;

// *********************************************************************//
// DispIntf:  IsoLytPolyline
// Flags:     (4096) Dispatchable
// GUID:      {A2470115-7ED8-4195-A21B-1FD94682AA02}
// *********************************************************************//
  IsoLytPolyline = dispinterface
    ['{A2470115-7ED8-4195-A21B-1FD94682AA02}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Count: Integer dispid 11;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
    property Point[nIndex: Integer]: IsoPoint dispid 14;
    function GetPoints: IsoPoints; dispid 12;
    procedure SetPoints(const newPoints: IsoPoints); dispid 13;
    procedure AddPoint(const newPoint: IsoPoint); dispid 15;
  end;

// *********************************************************************//
// DispIntf:  IsoLytLegend
// Flags:     (4096) Dispatchable
// GUID:      {F3965995-3634-4425-BF17-F388867C36C7}
// *********************************************************************//
  IsoLytLegend = dispinterface
    ['{F3965995-3634-4425-BF17-F388867C36C7}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property TitleFont: IsoTextStyle dispid 11;
    property FieldFont: IsoTextStyle dispid 12;
    property BorderType: Integer dispid 13;
    property BorderColor: OLE_COLOR dispid 14;
    property Caption: WideString dispid 17;
    property CaptionFont: IsoTextStyle dispid 18;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
    procedure Connect(const objLytMap: IsoLytMap); dispid 15;
    procedure RecalculateFontSize; dispid 16;
  end;

// *********************************************************************//
// DispIntf:  IsoLytMapScale
// Flags:     (4096) Dispatchable
// GUID:      {0C089516-4654-431E-9EE2-B453239CA6F0}
// *********************************************************************//
  IsoLytMapScale = dispinterface
    ['{0C089516-4654-431E-9EE2-B453239CA6F0}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Font: IsoTextStyle dispid 11;
    property ScaleType: Integer dispid 12;
    property Units: seUnits dispid 13;
    property SegmentLength: Integer dispid 14;
    property SegmentCount: Integer dispid 15;
    property LeftDivisions: Integer dispid 16;
    property Color: OLE_COLOR dispid 17;
    property BackColor: OLE_COLOR dispid 19;
    property FontColor: OLE_COLOR dispid 20;
    property FontBackColor: OLE_COLOR dispid 21;
    property FontTranparent: WordBool dispid 22;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
    procedure Connect(const objLytMap: IsoLytMap); dispid 18;
  end;

// *********************************************************************//
// DispIntf:  IsoLytDirection
// Flags:     (4096) Dispatchable
// GUID:      {1906804F-B1C8-4D64-B475-9A19ABA2F6DD}
// *********************************************************************//
  IsoLytDirection = dispinterface
    ['{1906804F-B1C8-4D64-B475-9A19ABA2F6DD}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property DirectionType: Integer dispid 11;
    property DirectionColor: OLE_COLOR dispid 12;
    property BorderType: seDirectionBorderType dispid 13;
    property BorderColor: OLE_COLOR dispid 14;
    property Rotation: Double dispid 15;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytPicture
// Flags:     (4096) Dispatchable
// GUID:      {F8EF663A-D8DB-49F1-815E-7B6C01D43E33}
// *********************************************************************//
  IsoLytPicture = dispinterface
    ['{F8EF663A-D8DB-49F1-815E-7B6C01D43E33}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    property Path: WideString dispid 11;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// DispIntf:  IsoLytPoint
// Flags:     (4096) Dispatchable
// GUID:      {6364A2D5-D8B6-49EF-ACB4-7CA3E0837BCF}
// *********************************************************************//
  IsoLytPoint = dispinterface
    ['{6364A2D5-D8B6-49EF-ACB4-7CA3E0837BCF}']
    property Type_: seLytObjType dispid 1;
    property Bounds: IsoRect dispid 2;
    property Style: IsoStyle dispid 3;
    property Editable: WordBool dispid 9;
    property Tag: WideString dispid 10;
    procedure SetPosition(const newposition: IsoRect); dispid 4;
    procedure Move(xOffset: Integer; yOffset: Integer); dispid 5;
    procedure AlignToGrid; dispid 6;
    function HitTest(x: Integer; y: Integer): WordBool; dispid 7;
    procedure ShowPropertyDlg; dispid 8;
  end;

// *********************************************************************//
// The Class CosoLytElement provides a Create and CreateRemote method to          
// create instances of the default interface IsoLytElement exposed by              
// the CoClass soLytElement. The functions are intended to be used by             
// clients wishing to automate the CoClass objects exposed by the         
// server of this typelibrary.                                            
// *********************************************************************//
12345

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -