qislidingscalecomponenteditor.pas

iocopm3.04源码,一套很好的工控开发工具

{*******************************************************}
{                                                       }
{       TiSlidingScaleComponentEditor                   }
{                                                       }
{       Copyright (c) 1997,2003 Iocomp Software         }
{                                                       }
{*******************************************************}
{$I iInclude.inc}

{$ifdef iVCL}unit  iSlidingScaleComponentEditor;{$endif}
{$ifdef iCLX}unit QiSlidingScaleComponentEditor;{$endif}

interface

uses
  {$I iIncludeUsesForms.inc}

  {$IFDEF iVCL} iComponentEditorForm,  iTypes,  iSlidingScale,{$ENDIF}
  {$IFDEF iCLX}QiComponentEditorForm, QiTypes, QiSlidingScale,{$ENDIF}

  {$IFDEF iVCL}  StdCtrls,  ExtCtrls,  Controls,  ComCtrls, Classes,  iComponentEditorThemePanel,  iComponentEditorButtonPanel,  iEditorBasicComponents,  iOPCBrowserPanel,  iAboutPanel,
  iRadioGroup, iComponent, iVCLComponent, iCustomComponent, iCheckBox;{$ENDIF}
  {$IFDEF iCLX} QStdCtrls, QExtCtrls, QControls, QComCtrls, Classes, QiComponentEditorThemePanel, QiComponentEditorButtonPanel, QiEditorBasicComponents, QiOPCBrowserPanel, QiAboutPanel;{$ENDIF}

type
  TiSlidingScaleComponentEditorForm = class(TiComponentEditorForm)
    PageControl: TiComponentEditorPageControl;
    GeneralTabSheet: TTabSheet;
    Label42: TLabel;
    PositionEdit: TiComponentEditorEdit;
    AboutTabSheet: TTabSheet;
    iComponentEditorButtonPanel1: TiComponentEditorButtonPanel;
    ThemeTabSheet: TTabSheet;
    iComponentEditorThemePanel: TiComponentEditorThemePanel;
    OPCTabSheet: TTabSheet;
    iOPCBrowserPanel: TiOPCBrowserPanel;
    iAboutPanel1: TiAboutPanel;
    DesignTabSheet: TTabSheet;
    DesignPageControl: TiComponentEditorPageControl;
    DesignGeneralTabSheet: TTabSheet;
    DesingTitleTabSheet: TTabSheet;
    DesignPointerTabSheet: TTabSheet;
    DesignScaleTabSheet: TTabSheet;
    DesignTicksTabSheet: TTabSheet;
    Label14: TLabel;
    Label17: TLabel;
    PointerSizeUpDown: TiUpDown;
    PointerColorPicker: TiComponentEditorColorPicker;
    PointerOrientationRadioGroup: TiComponentEditorRadioGroup;
    PointerLineGroupBox: TGroupBox;
    Label15: TLabel;
    Label16: TLabel;
    PointerLineWidthUpDown: TiUpDown;
    PointerLineColorPicker: TiComponentEditorColorPicker;
    PointerLineWidthEdit: TiComponentEditorEdit;
    PointerSizeEdit: TiComponentEditorEdit;
    PointerStyleRadioGroup: TiComponentEditorRadioGroup;
    Label10: TLabel;
    Label40: TLabel;
    TitleMarginEdit: TiComponentEditorEdit;
    TitleTextEdit: TiComponentEditorEdit;
    TitleFontPicker: TiComponentEditorFontPicker;
    TitleAlignmentRadioGroup: TiComponentEditorRadioGroup;
    Label2: TLabel;
    Label3: TLabel;
    ScaleBackGroundColorPicker: TiComponentEditorColorPicker;
    ScaleShadowColorPicker: TiComponentEditorColorPicker;
    ScaleAlignStyleRadioGroup: TiComponentEditorRadioGroup;
    ScaleAntiAliasedEnabledCheckBox: TiComponentEditorCheckBox;
    ScaleOrientationRadioGroup: TiComponentEditorRadioGroup;
    ScaleShadowEnabledCheckBox: TiComponentEditorCheckBox;
    MajorGroupBox: TGroupBox;
    Label5: TLabel;
    Label6: TLabel;
    Label24: TLabel;
    Label1: TLabel;
    TickMajorCountUpDown: TiUpDown;
    TickMajorLengthUpDown: TiUpDown;
    TickMajorWidthUpDown: TiUpDown;
    TickMajorColorPicker: TiComponentEditorColorPicker;
    TickMajorCountEdit: TiComponentEditorEdit;
    TickMajorLengthEdit: TiComponentEditorEdit;
    TickMajorWidthEdit: TiComponentEditorEdit;
    TickMajorLabelGroupBox: TGroupBox;
    Label7: TLabel;
    Label8: TLabel;
    TickMajorLabelPrecisionUpDown: TiUpDown;
    TickMajorLabelFontPicker: TiComponentEditorFontPicker;
    TickMajorLabelPrecisionEdit: TiComponentEditorEdit;
    TickMajorLabelMarginEdit: TiComponentEditorEdit;
    MidGroupBox: TGroupBox;
    Label21: TLabel;
    Label26: TLabel;
    Label35: TLabel;
    TickMidLengthUpDown: TiUpDown;
    TickMidWidthUpDown: TiUpDown;
    TickMidColorPicker: TiComponentEditorColorPicker;
    TickMidLengthEdit: TiComponentEditorEdit;
    TickMidWidthEdit: TiComponentEditorEdit;
    ShowMidTicksCheckBox: TiComponentEditorCheckBox;
    TickMidLabelGroupBox: TGroupBox;
    Label11: TLabel;
    Label13: TLabel;
    TickMidLabelPrecisionUpDown: TiUpDown;
    TickMidLabelFontPicker: TiComponentEditorFontPicker;
    TickMidLabelPrecisionEdit: TiComponentEditorEdit;
    TickMidLabelMarginEdit: TiComponentEditorEdit;
    ShowMidTickLabelsCheckBox: TiComponentEditorCheckBox;
    MinorGroupBox: TGroupBox;
    Label9: TLabel;
    Label12: TLabel;
    Label19: TLabel;
    Label25: TLabel;
    TickMinorCountUpDown: TiUpDown;
    TickMinorLengthUpDown: TiUpDown;
    TickMinorWidthUpDown: TiUpDown;
    TickMinorColorPicker: TiComponentEditorColorPicker;
    TickMinorCountEdit: TiComponentEditorEdit;
    TickMinorLengthEdit: TiComponentEditorEdit;
    TickMinorWidthEdit: TiComponentEditorEdit;
    OrientationRadioGroup: TiComponentEditorRadioGroup;
    OuterMarginGroupBox: TGroupBox;
    OuterMarginLeftUpDown: TiUpDown;
    OuterMarginTopUpDown: TiUpDown;
    OuterMarginBottomUpDown: TiUpDown;
    OuterMarginRightUpDown: TiUpDown;
    OuterMarginLeftEdit: TiComponentEditorEdit;
    OuterMarginTopEdit: TiComponentEditorEdit;
    OuterMarginBottomEdit: TiComponentEditorEdit;
    OuterMarginRightEdit: TiComponentEditorEdit;
    BorderStyleRadioGroup: TiComponentEditorRadioGroup;
    BackGroundColorPicker: TiComponentEditorColorPicker;
    Label31: TLabel;
    Label4: TLabel;
    ScaleSpanEdit: TiComponentEditorEdit;
    UpdateFrameRateUpDown: TiUpDown;
    UpdateFrameRateEdit: TiComponentEditorEdit;
    AutoFrameRateCheckBox: TiComponentEditorCheckBox;
    Label76: TLabel;
    TransparentCheckBox: TiComponentEditorCheckBox;
    CachedDrawingCheckBox: TiComponentEditorCheckBox;
    ReverseScaleCheckBox: TiComponentEditorCheckBox;
  protected
    procedure CreateThemeInstance; override;
    procedure CopyPropertiesToForm     (Component: TWinControl); override;
    procedure CopyPropertiesToComponent(Component: TWinControl); override;
  end;