paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-04-07 05:18:00 +02:00
Code Issues Packages Projects Releases Wiki Activity

LCL: published dragging related properties

Browse Source 
patch by: Paul Ishenin

git-svn-id: trunk@10648 -
This commit is contained in:
vincents 2007-02-16 08:31:43 +00:00
parent 23b36dbfdd
commit ba85e84687
9 changed files with 138 additions and 39 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
lcl/buttons.pp
View File

@ -118,11 +118,16 @@ type
property Color;
property Constraints;
property Default;
property DragCursor;
property DragMode;
property Enabled;
property Font;
property ModalResult;
property OnChangeBounds;
property OnClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyDown;
@ -134,6 +139,7 @@ type
property OnMouseMove;
property OnMouseUp;
property OnResize;
property OnStartDrag;
property ParentFont;
property ParentShowHint;
property PopupMenu;

6
lcl/checklst.pas
View File

@ -75,6 +75,8 @@ type
property BorderSpacing;
property BorderStyle;
property Constraints;
property DragCursor;
property DragMode;
property ExtendedSelect;
property Items;
property ItemHeight;
@ -82,6 +84,10 @@ type
property OnClick;
property OnDblClick;
property OnDrawItem;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnStartDrag;
property OnEnter;
property OnExit;
property OnItemClick;

10
lcl/colorbox.pas
View File

@ -123,6 +123,8 @@ type
property ClickOnSelChange;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property ExtendedSelect;
property Font;
@ -144,7 +146,10 @@ type
property OnChangeBounds;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnDrawItem;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyDown;
@ -160,7 +165,8 @@ type
property OnMouseWheelUp;
property OnResize;
property OnSelectionChange;
property OnShowHint;
property OnShowHint;
property OnStartDrag;
end;
procedure Register;
@ -520,4 +526,4 @@ begin
end;
end;
{------------------------------------------------------------------------------}
end.
end.

52
lcl/comctrls.pp
View File

@ -157,8 +157,12 @@ type
property Visible default true;
property Color default clBtnFace;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnHint: TNotifyEvent read FOnHint write FOnHint;
property OnMouseDown;
property OnStartDrag;
end;
@ -197,6 +201,9 @@ type
property ImageIndex default 0;
property Left stored False;
property OnContextPopup;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnHide: TNotifyEvent read FOnHide write FOnHide;
@ -205,6 +212,7 @@ type
property OnMouseUp;
property OnResize;
property OnShow: TNotifyEvent read FOnShow write FOnShow;
property OnStartDrag;
property PageIndex stored False;
property ParentFont;
property ParentShowHint;
@ -245,9 +253,9 @@ type
//property BiDiMode;
property Constraints;
//property DockSite;
//property DragCursor;
property DragCursor;
//property DragKind;
//property DragMode;
property DragMode;
property Enabled;
property Font;
//property HotTrack;
@ -274,11 +282,11 @@ type
property OnContextPopup;
//property OnDockDrop;
//property OnDockOver;
//property OnDragDrop;
//property OnDragOver;
property OnDragDrop;
property OnDragOver;
//property OnDrawTab;
//property OnEndDock;
//property OnEndDrag;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnGetImageIndex;
@ -289,7 +297,7 @@ type
property OnPageChanged;
property OnResize;
//property OnStartDock;
//property OnStartDrag;
property OnStartDrag;
//property OnUnDock;
end;
@ -1009,6 +1017,8 @@ type
property Columns;
property ColumnClick;
property Constraints;
property DragCursor;
property DragMode;
// property DefaultItemHeight;
// property DropTarget;
property Enabled;
@ -1039,25 +1049,29 @@ type
property TabOrder;
property Visible;
property ViewStyle;
property OnMouseMove;
property OnAdvancedCustomDraw;
property OnAdvancedCustomDrawItem;
property OnAdvancedCustomDrawSubItem;
property OnChange;
property OnClick;
property OnColumnClick;
property OnCompare;
property OnDblClick;
property OnMouseDown;
property OnMouseUp;
property OnKeyPress;
property OnKeyUp;
property OnKeyDown;
property OnDeletion;
property OnSelectItem;
property OnCustomDraw;
property OnCustomDrawItem;
property OnCustomDrawSubItem;
property OnAdvancedCustomDraw;
property OnAdvancedCustomDrawItem;
property OnAdvancedCustomDrawSubItem;
property OnDblClick;
property OnDeletion;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnKeyDown;
property OnKeyPress;
property OnKeyUp;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnSelectItem;
property OnStartDrag;
end;
TProgressBarOrientation = (pbHorizontal, pbVertical, pbRightToLeft, pbTopDown);
@ -2411,9 +2425,9 @@ type
property OnMouseMove;
property OnMouseUp;
property OnSelectionChanged;
property Options;
//property OnStartDock;
property OnStartDrag;
property Options;
property Items;
property TreeLineColor;
property ExpandSignColor;

51
lcl/extctrls.pp
View File

@ -265,12 +265,17 @@ type
property Anchors;
property BorderSpacing;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property Images;
property OnChangeBounds;
property OnChanging;
property OnCloseTabClicked;
property OnContextPopup;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnGetImageIndex;
@ -279,6 +284,7 @@ type
property OnMouseUp;
property OnPageChanged;
property OnResize;
property OnStartDrag;
property Options;
property PageIndex;
property PopupMenu;
@ -358,17 +364,17 @@ type
property ParentShowHint;
property Pen: TPen read FPen write SetPen;
property OnChangeBounds;
// property OnDragDrop;
// property OnDragOver;
property OnDragDrop;
property OnDragOver;
// property OnEndDock;
// property OnEndDrag;
property OnEndDrag;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnPaint;
property OnResize;
// property OnStartDock;
// property OnStartDrag;
property OnStartDrag;
property Shape: TShapeType read FShape write SetShape;
property ShowHint;
property Visible;
@ -482,9 +488,9 @@ type
property BorderSpacing;
property Color;
property Constraints;
// property DragCursor;
property DragCursor;
// property DragKind;
// property DragMode;
property DragMode;
property Enabled;
property Font;
property Hint;
@ -497,10 +503,10 @@ type
property OnChangeBounds;
property OnClick;
property OnDblClick;
// property OnDragDrop;
// property OnDragOver;
property OnDragDrop;
property OnDragOver;
// property OnEndDock;
// property OnEndDrag;
property OnEndDrag;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
@ -509,7 +515,7 @@ type
property OnPaint;
property OnResize;
// property OnStartDock;
// property OnStartDrag;
property OnStartDrag;
end;
@ -565,10 +571,15 @@ type
property BorderSpacing;
property Center;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property OnChangeBounds;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnMouseDown;
property OnMouseEnter;
property OnMouseLeave;
@ -576,6 +587,7 @@ type
property OnMouseUp;
property OnPaint;
property OnResize;
property OnStartDrag;
property ParentShowHint;
property Picture;
property PopupMenu;
@ -704,6 +716,8 @@ type
property Columns;
property Constraints;
property Ctl3D;
property DragCursor;
property DragMode;
property Enabled;
property Font;
property ItemIndex;
@ -711,6 +725,9 @@ type
property OnChangeBounds;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyDown;
@ -720,6 +737,7 @@ type
property OnMouseMove;
property OnMouseUp;
property OnResize;
property OnStartDrag;
property ParentFont;
property ParentColor;
property ParentCtl3D;
@ -830,6 +848,8 @@ type
published
property Caption;
property Color;
property DragCursor;
property DragMode;
property Height;
property Left;
property ParentColor;
@ -844,11 +864,15 @@ type
property Width;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
//property OnEnter;
//property OnExit;
property OnStartDrag;
end;
@ -892,6 +916,8 @@ type
property CharCase;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property EditLabel;
property Enabled;
property LabelPosition;
@ -911,6 +937,9 @@ type
property OnChange;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyDown;
@ -919,6 +948,7 @@ type
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnStartDrag;
end;
@ -982,6 +1012,7 @@ type
property ClientWidth;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property Font;

6
lcl/filectrl.pp
View File

@ -91,6 +91,8 @@ Type
property Anchors;
property BorderStyle;
property Constraints;
property DragCursor;
property DragMode;
property ExtendedSelect;
property FileType;
property Font;
@ -102,6 +104,9 @@ Type
property OnChangeBounds;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyPress;
@ -114,6 +119,7 @@ Type
property OnMouseWheelDown;
property OnMouseWheelUp;
property OnResize;
property OnStartDrag;
property ParentShowHint;
property ParentFont;
property PopupMenu;

2
lcl/forms.pp
View File

@ -595,6 +595,8 @@ type
property OnDestroy;
property OnDockDrop;
property OnDockOver;
property OnDragDrop;
property OnDragOver;
property OnEndDock;
property OnGetSiteInfo;
property OnHide;

13
lcl/grids.pas
View File

@ -1106,9 +1106,9 @@ type
property DefaultColWidth;
property DefaultDrawing;
property DefaultRowHeight;
//property DragCursor;
property DragCursor;
//property DragKind;
//property DragMode;
property DragMode;
property Enabled;
property FixedColor;
property FixedCols;
@ -1166,16 +1166,13 @@ type
property OnSelectCell;
property OnSetEditText;
property OnTopleftChanged;
{
property OnContextPopup;
//property OnContextPopup;
property OnDragDrop;
property OnDragOver;
property OnEndDock;
//property OnEndDock;
property OnEndDrag;
property OnStartDock;
//property OnStartDock;
property OnStartDrag;
}
end;

31
lcl/stdctrls.pp
View File

@ -388,6 +388,8 @@ type
property CharCase;
property Color;
property Ctl3D;
property DragCursor;
property DragMode;
property DropDownCount;
property Enabled;
property Font;
@ -401,7 +403,10 @@ type
property OnClick;
property OnCloseUp;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnDrawItem;
property OnEndDrag;
property OnDropDown;
property OnEditingDone;
property OnEnter;
@ -412,6 +417,7 @@ type
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
property OnStartDrag;
property OnSelect;
property ParentColor;
property ParentCtl3D;
@ -584,6 +590,7 @@ type
property OnDragOver;
property OnDrawItem;
property OnEnter;
property OnEndDrag;
property OnExit;
property OnKeyPress;
property OnKeyDown;
@ -599,6 +606,7 @@ type
property OnResize;
property OnSelectionChange;
property OnShowHint;
property OnStartDrag;
property ParentShowHint;
property ParentFont;
property PopupMenu;
@ -759,6 +767,7 @@ type
property Color;
property Constraints;
property CharCase;
property DragCursor;
property DragMode;
property EchoMode;
property Enabled;
@ -767,7 +776,10 @@ type
property OnChange;
property OnChangeBounds;
property OnClick;
property OnDragDrop;
property OnDragOver;
property OnEditingDone;
property OnEndDrag;
property OnEnter;
property OnExit;
Property OnKeyDown;
@ -777,6 +789,7 @@ type
Property OnMouseMove;
property OnMouseUp;
property OnResize;
property OnStartDrag;
property ParentFont;
property ParentShowHint;
property PasswordChar;
@ -799,12 +812,17 @@ type
property BorderSpacing;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property Font;
property Lines;
property MaxLength;
property OnChange;
property OnDragDrop;
property OnDragOver;
property OnEditingDone;
property OnEndDrag;
property OnEnter;
property OnExit;
property OnKeyDown;
@ -815,6 +833,7 @@ type
property OnMouseMove;
property OnMouseEnter;
property OnMouseLeave;
property OnStartDrag;
property ParentFont;
property PopupMenu;
property ReadOnly;
@ -868,17 +887,23 @@ type
property Caption;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property FocusControl;
property Font;
property OnChangeBounds;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnMouseDown;
property OnMouseEnter;
property OnMouseLeave;
property OnMouseMove;
property OnMouseUp;
property OnResize;
property OnStartDrag;
property ParentFont;
property ShowAccelChar;
property TabOrder;
@ -1246,6 +1271,8 @@ type
property Caption;
property Color;
property Constraints;
property DragCursor;
property DragMode;
property Enabled;
property FocusControl;
property Font;
@ -1261,6 +1288,9 @@ type
property WordWrap;
property OnClick;
property OnDblClick;
property OnDragDrop;
property OnDragOver;
property OnEndDrag;
property OnMouseDown;
property OnMouseMove;
property OnMouseUp;
@ -1268,6 +1298,7 @@ type
property OnMouseLeave;
property OnChangeBounds;
property OnResize;
property OnStartDrag;
property OptimalFill;
end;