在线时间:8:00-16:00
迪恩网络APP
随时随地掌握行业动态
扫描二维码
关注迪恩网络微信公众号
{ TControl } public constructor Create(...); override; // destructor Destroy; override; // procedure AddObject(...); override; //添加对象 procedure RemoveObject(...); override; //移除对象 procedure SetNewScene(...); virtual; //设置新场景 procedure SetBounds(...); virtual; //设置位置、大小 function AbsoluteToLocal(...): TPointF; virtual; //点转换 function LocalToAbsolute(...): TPointF; virtual; //... function AbsoluteToLocalVector(...): TVector; virtual; //... function LocalToAbsoluteVector(...): TVector; virtual; //... function PointInObject(...): Boolean; virtual; //判断指定点是否在对象范围内 procedure RecalcUpdateRect; virtual; //重计算... procedure RecalcNeedAlign; virtual; //... procedure RecalcOpacity; virtual; //... procedure RecalcAbsolute; virtual; //... procedure RecalcEnabled; virtual; //... procedure RecalcHasEffect; virtual; //... function MakeScreenshot: TBitmap; //将控件捕获为 Bitmap procedure ShowCaretProc; //显示输入光标 procedure SetCaretPos(...); //设置输入光标的位置 procedure SetCaretSize(...); //设置输入光标的大小 procedure SetCaretColor(...); //设置输入光标的颜色 procedure HideCaret; //隐藏输入光标 procedure BeginUpdate; virtual; //开始更新 procedure EndUpdate; virtual; //结束更新 procedure Realign; virtual; //重新排列 procedure ApplyEffect; //应用特效 procedure Painting; virtual; //DoPaint 前 procedure DoPaint; virtual; //重绘过程 procedure AfterPaint; virtual; //DoPaint 后 procedure UpdateEffects; //更新特效 procedure SetFocus; //设置为焦点控件 procedure PaintTo(...); //将控件绘制到指定 Canvas procedure Repaint; //重绘 procedure InvalidateRect(...); //使指定矩形范围无效而而强制更新 procedure Lock; //锁定 property AbsoluteMatrix: TMatrix ...; //实际的矩阵 property AbsoluteOpacity: Single ...; //实际的透明度 property AbsoluteWidth: Single ...; //实际的宽度 property AbsoluteHeight: Single ...; //实际的高度 property AbsoluteScale: TPointF ...; //实际的比例 property AbsoluteEnabled: Boolean ...; //实际的可用状态; 可能会随父对象而不可用 property HasEffect: Boolean ...; //是否有特效 property HasDisablePaintEffect: Boolean ...; //? property HasAfterPaintEffect: Boolean ...; //? property ChildrenRect: TRectF ...; //获取子对象占据的矩形 property InvertAbsoluteMatrix: TMatrix ...; //翻转后的矩阵 property InPaintTo: Boolean ...; //? property LocalRect: TRectF ...; //获取局部的矩形范围 property AbsoluteRect: TRectF ...; //获取实际的矩形范围 property UpdateRect: TRectF ...; //获取要更新的矩形范围 property BoundsRect: TRectF ...; //获取或设置矩形范围; 设置时可同时指定位置, 但再获取到的矩形都是 (0,0,Width,Height) property ParentedRect: TRectF ...; //获取相对于父对象的矩形范围 property ParentedVisible: Boolean ...; //判断上级对象是否可见 property ClipRect: TRectF ...; //获取剪辑区域矩形 property Canvas: TCanvas ...; //绘图层 property Scene: IScene ...; //获取场景接口 property AutoCapture: Boolean ...; //能否在 MouseDown 时自动捕获控件 property CanFocus: Boolean ...; //能否设置焦点 property DisableFocusEffect: Boolean ...; //是否禁用焦点特效 property DisableDefaultAlign: Boolean ...; //是否禁用默认对齐 property TabOrder: TTabOrder ...; //Tab 序号 published property IsMouseOver: Boolean ...; //鼠标是否在其上 property IsDragOver: Boolean ...; //是否有拖放经过 property IsFocused: Boolean ...; //是否拥有焦点; 只读, 可通过 SetFocus() 设置 property IsVisible: Boolean ...; //是否可见; 同 Visible, 但只读 property Align: TAlignLayout ...; //对齐方式 property Cursor: TCursor ...; //光标 property DragMode: TDragMode ...; //拖放模式 property EnableDragHighlight: Boolean ...; //拖放时是否高亮显示 property Enabled: Boolean ...; //是否可用 property Position: TPosition ...; //位置 property RotationAngle: Single ...; //旋转角度 property RotationCenter: TPosition ...; //旋转中心点 property Locked: Boolean ...; //是否锁定控件; 使用 Lock() 方法锁定更好 property Width: Single ...; //宽 property Height: Single ...; //高 property Margins: TBounds ...; //内边界 property Padding: TBounds ...; //外边界 property Opacity: Single ...; //透明度: 0..1 property ClipChildren: Boolean ...; //是否隐藏超出边界的子控件 property ClipParent: Boolean ...; //? property HitTest: Boolean ...; //当前版本未完成 Hint 功能 property CanClip: Boolean ...; //是否同意被父对象剪辑 property PopupMenu: TCustomPopupMenu ...; //指定右键菜单 property Scale: TPosition ...; //缩放比例 property Visible: Boolean ...; //是否显示 property DesignVisible: Boolean ...; //是否在设计时显示 property OnDragEnter: TDragEnterEvent ...; //拖放进入时 property OnDragLeave: TNotifyEvent ...; //拖放离开时 property OnDragOver: TDragOverEvent ...; //拖放经过时 property OnDragDrop: TDragDropEvent ...; //拖放放下时 property OnDragEnd: TNotifyEvent ...; //拖放结束时 property OnKeyDown: TKeyEvent ...; //按键时 property OnKeyUp: TKeyEvent ...; //离键时 property OnClick: TNotifyEvent ...; //单击时 property OnDblClick: TNotifyEvent ...; //双击时 property OnCanFocus: TCanFocusEvent ...; //SetFocus() 时 property OnEnter: TNotifyEvent ...; //获取焦点时 property OnExit: TNotifyEvent ...; //失去焦点时 property OnMouseDown: TMouseEvent ...; //鼠标按下时 property OnMouseMove: TMouseMoveEvent ...; //鼠标移动时 property OnMouseUp: TMouseEvent ...; //鼠标按键释放时 property OnMouseWheel: TMouseWheelEvent ...; //鼠标(滚动轮)滚动时 property OnMouseEnter: TNotifyEvent ...; //鼠标进入时 property OnMouseLeave: TNotifyEvent ...; //鼠标离开时 property OnPainting: TOnPaintEvent ...; //重绘开始时 property OnPaint: TOnPaintEvent ...; //重绘时 property OnResize: TNotifyEvent ...; //调整大小时 property OnApplyStyleLookup: TNotifyEvent ...; //应用新样式时 end; { TControl } public constructor Create(...); override; // destructor Destroy; override; // procedure AddObject(...); override; //添加对象 procedure RemoveObject(...); override; //移除对象 procedure SetNewScene(...); virtual; //设置新场景 procedure SetBounds(...); virtual; //设置位置、大小 function AbsoluteToLocal(...): TPointF; virtual; //点转换 function LocalToAbsolute(...): TPointF; virtual; //... function AbsoluteToLocalVector(...): TVector; virtual; //... function LocalToAbsoluteVector(...): TVector; virtual; //... function PointInObject(...): Boolean; virtual; //判断指定点是否在对象范围内 procedure RecalcUpdateRect; virtual; //重计算... procedure RecalcNeedAlign; virtual; //... procedure RecalcOpacity; virtual; //... procedure RecalcAbsolute; virtual; //... procedure RecalcEnabled; virtual; //... procedure RecalcHasEffect; virtual; //... function MakeScreenshot: TBitmap; //将控件捕获为 Bitmap procedure ShowCaretProc; //显示输入光标 procedure SetCaretPos(...); //设置输入光标的位置 procedure SetCaretSize(...); //设置输入光标的大小 procedure SetCaretColor(...); //设置输入光标的颜色 procedure HideCaret; //隐藏输入光标 procedure BeginUpdate; virtual; //开始更新 procedure EndUpdate; virtual; //结束更新 procedure Realign; virtual; //重新排列 procedure ApplyEffect; //应用特效 procedure Painting; virtual; //DoPaint 前 procedure DoPaint; virtual; //重绘过程 procedure AfterPaint; virtual; //DoPaint 后 procedure UpdateEffects; //更新特效 procedure SetFocus; //设置为焦点控件 procedure PaintTo(...); //将控件绘制到指定 Canvas procedure Repaint; //重绘 procedure InvalidateRect(...); //使指定矩形范围无效而而强制更新 procedure Lock; //锁定 property AbsoluteMatrix: TMatrix ...; //实际的矩阵 property AbsoluteOpacity: Single ...; //实际的透明度 property AbsoluteWidth: Single ...; //实际的宽度 property AbsoluteHeight: Single ...; //实际的高度 property AbsoluteScale: TPointF ...; //实际的比例 property AbsoluteEnabled: Boolean ...; //实际的可用状态; 可能会随父对象而不可用 property HasEffect: Boolean ...; //是否有特效 property HasDisablePaintEffect: Boolean ...; //? property HasAfterPaintEffect: Boolean ...; //? property ChildrenRect: TRectF ...; //获取子对象占据的矩形 property InvertAbsoluteMatrix: TMatrix ...; //翻转后的矩阵 property InPaintTo: Boolean ...; //? property LocalRect: TRectF ...; //获取局部的矩形范围 property AbsoluteRect: TRectF ...; //获取实际的矩形范围 property UpdateRect: TRectF ...; //获取要更新的矩形范围 property BoundsRect: TRectF ...; //获取或设置矩形范围; 设置时可同时指定位置, 但再获取到的矩形都是 (0,0,Width,Height) property ParentedRect: TRectF ...; //获取相对于父对象的矩形范围 property ParentedVisible: Boolean ...; //判断上级对象是否可见 property ClipRect: TRectF ...; //获取剪辑区域矩形 property Canvas: TCanvas ...; //绘图层 property Scene: IScene ...; //获取场景接口 property AutoCapture: Boolean ...; //能否在 MouseDown 时自动捕获控件 property CanFocus: Boolean ...; //能否设置焦点 property DisableFocusEffect: Boolean ...; //是否禁用焦点特效 property DisableDefaultAlign: Boolean ...; //是否禁用默认对齐 property TabOrder: TTabOrder ...; //Tab 序号 published property IsMouseOver: Boolean ...; //鼠标是否在其上 property IsDragOver: Boolean ...; //是否有拖放经过 property IsFocused: Boolean ...; //是否拥有焦点; 只读, 可通过 SetFocus() 设置 property IsVisible: Boolean ...; //是否可见; 同 Visible, 但只读 property Align: TAlignLayout ...; //对齐方式 property Cursor: TCursor ...; //光标 property DragMode: TDragMode ...; //拖放模式 property EnableDragHighlight: Boolean ...; //拖放时是否高亮显示 property Enabled: Boolean ...; //是否可用 property Position: TPosition ...; //位置 property RotationAngle: Single ...; //旋转角度 property RotationCenter: TPosition ...; //旋转中心点 property Locked: Boolean ...; //是否锁定控件; 使用 Lock() 方法锁定更好 property Width: Single ...; //宽 property Height: Single ...; //高 property Margins: TBounds ...; //内边界 property Padding: TBounds ...; //外边界 property Opacity: Single ...; //透明度: 0..1 property ClipChildren: Boolean ...; //是否隐藏超出边界的子控件 property ClipParent: Boolean ...; //? property HitTest: Boolean ...; //当前版本未完成 Hint 功能 property CanClip: Boolean ...; //是否同意被父对象剪辑 property PopupMenu: TCustomPopupMenu ...; //指定右键菜单 property Scale: TPosition ...; //缩放比例 property Visible: Boolean ...; //是否显示 property DesignVisible: Boolean ...; //是否在设计时显示 property OnDragEnter: TDragEnterEvent ...; //拖放进入时 property OnDragLeave: TNotifyEvent ...; //拖放离开时 property OnDragOver: TDragOverEvent ...; //拖放经过时 property OnDragDrop: TDragDropEvent ...; //拖放放下时 property OnDragEnd: TNotifyEvent ...; //拖放结束时 property OnKeyDown: TKeyEvent ...; //按键时 property OnKeyUp: TKeyEvent ...; //离键时 property OnClick: TNotifyEvent ...; //单击时 property OnDblClick: TNotifyEvent ...; //双击时 property OnCanFocus: TCanFocusEvent ...; //SetFocus() 时 property OnEnter: TNotifyEvent ...; //获取焦点时 property OnExit: TNotifyEvent ...; //失去焦点时 property OnMouseDown: TMouseEvent ...; //鼠标按下时 property OnMouseMove: TMouseMoveEvent ...; //鼠标移动时 property OnMouseUp: TMouseEvent ...; //鼠标按键释放时 property OnMouseWheel: TMouseWheelEvent ...; //鼠标(滚动轮)滚动时 property OnMouseEnter: TNotifyEvent ...; //鼠标进入时 property OnMouseLeave: TNotifyEvent ...; //鼠标离开时 property OnPainting: TOnPaintEvent ...; //重绘开始时 property OnPaint: TOnPaintEvent ...; //重绘时 property OnResize: TNotifyEvent ...; //调整大小时 property OnApplyStyleLookup: TNotifyEvent ...; //应用新样式时 end; |
2023-10-27
2022-08-15
2022-08-17
2022-09-23
2022-08-13
请发表评论