JianjunLiu
parent
b819fd95d6
commit
a2898ca9c9
Binary file not shown.
|
|
@ -44,6 +44,15 @@ type TAlign=class(tenumeration)
|
|||
{**
|
||||
@explan(说明) 自动对齐类型常量 %%
|
||||
**}
|
||||
{**
|
||||
@param(alNone)() 不对齐 %%
|
||||
@param(alTop)() 上 %%
|
||||
@param(alBottom)() 下 %%
|
||||
@param(alLeft)() 左对齐 %%
|
||||
@param(alRight)() 右对齐 %%
|
||||
@param(alClient)() 占满 %%
|
||||
**}
|
||||
|
||||
static alNone;
|
||||
static alTop;
|
||||
static alBottom;
|
||||
|
|
@ -53,7 +62,15 @@ type TAlign=class(tenumeration)
|
|||
static alCustom;
|
||||
end
|
||||
type TAnchorKind=class(tenumeration)
|
||||
//akTop, akLeft, akRight, akBottom
|
||||
{**
|
||||
@explan(说明) 锚定类型常量 %%
|
||||
**}
|
||||
{**
|
||||
@param(akTop)() 上 %%
|
||||
@param(akLeft)() 左 %%
|
||||
@param(akRight)() 右 %%
|
||||
@param(akBottom)()下 %%
|
||||
**}
|
||||
static akTop;
|
||||
static akLeft;
|
||||
static akRight;
|
||||
|
|
@ -84,14 +101,7 @@ type TComponentStyle=class(tenumeration)
|
|||
static csCheckPropAvail;
|
||||
static csSubComponent;
|
||||
static csTransient;
|
||||
end
|
||||
|
||||
type TOperation=class(tenumeration)
|
||||
static opInsert;
|
||||
static opRemove;
|
||||
static opRecycling;
|
||||
end
|
||||
|
||||
end
|
||||
type TWinControlFlag=class(tenumeration)
|
||||
static wcfClientRectNeedsUpdate;
|
||||
static wcfColorChanged;
|
||||
|
|
@ -109,9 +119,6 @@ type TWinControlFlag=class(tenumeration)
|
|||
static wcfAdjustedLogicalClientRectValid;
|
||||
static wcfKillIntfSetBounds;
|
||||
end
|
||||
|
||||
|
||||
|
||||
|
||||
type TControlStyleType=class(tenumeration)
|
||||
static csAcceptsControls; // can have children in the designer;
|
||||
|
|
@ -148,6 +155,12 @@ type TControlStyleType=class(tenumeration)
|
|||
static csRequiresKeyboardInput; // If the device has no physical keyboard then show the virtual keyboard when this control gets focus (therefore available only to TWinControl descendents);
|
||||
end
|
||||
type TMouseButton=class(tenumeration)
|
||||
{**
|
||||
@exlan(说明) 鼠标按键情况 %%
|
||||
@param(mbLeft)(integer) 左键 %%
|
||||
@param(mbRight)(integer) 右键 %%
|
||||
@param(mbMiddle)(integer) 中间按键 %%
|
||||
**}
|
||||
static mbLeft;
|
||||
static mbRight;
|
||||
static mbMiddle;
|
||||
|
|
@ -155,6 +168,13 @@ type TMouseButton=class(tenumeration)
|
|||
static mbExtra2;
|
||||
end
|
||||
type TShiftStateEnum=class(tenumeration)
|
||||
{**
|
||||
@exlan(说明) 功能键常量 %%
|
||||
@param(ssShift)(integer) shift %%
|
||||
@param(ssAlt)(integer) alt %%
|
||||
@param(ssCtrl)(integer) ctl %%
|
||||
@param(ssDouble)(integer) 双击 %%
|
||||
**}
|
||||
static ssShift;
|
||||
static ssAlt;
|
||||
static ssCtrl;
|
||||
|
|
@ -280,7 +300,10 @@ type TFormBorderStyle=class(tenumeration)
|
|||
end
|
||||
type TAlignStyle9=class(tenumeration)
|
||||
{**
|
||||
@explan(说明) 九宫格对齐常量 %%
|
||||
@explan(说明) 九宫格对齐常量,al9_ 开头 %%
|
||||
@param(AL9_DEFAULT)(integer) 默认 %%
|
||||
@param(AL9_TOPLEFT)(integer) 顶部 %%
|
||||
@param(AL9_CENTER)(integer) 居 %%
|
||||
**}
|
||||
static AL9_DEFAULT; //0
|
||||
static AL9_TOPLEFT; //1
|
||||
|
|
@ -297,11 +320,18 @@ type TAlignStyleH3=class(tenumeration)
|
|||
{**
|
||||
@explan(说明) 水平对齐常量 %%
|
||||
**}
|
||||
(**
|
||||
@param(AL3_LEFT)() 左 %%
|
||||
@param(AL3_RIGHT)() 右 %%
|
||||
@param(AL3_CENTER)() 居中 %%
|
||||
**)
|
||||
|
||||
static AL3_LEFT; //0
|
||||
static AL3_RIGHT; //1
|
||||
static AL3_CENTER; //2
|
||||
end
|
||||
type TSysCursor=class(tenumeration)
|
||||
|
||||
class function basevalue();override;
|
||||
begin
|
||||
{
|
||||
|
|
@ -328,6 +358,11 @@ type TSysCursor=class(tenumeration)
|
|||
IDC_SIZE := 32540;
|
||||
IDC_NO := 32548;
|
||||
end
|
||||
{**
|
||||
@explan(说明)idc_ 开头的 光标样式 %%
|
||||
@param(IDC_ARROW)() 类型 %%
|
||||
**}
|
||||
|
||||
static IDC_ARROW; //MAKEINTRESOURCE(32512)
|
||||
static IDC_IBEAM; //MAKEINTRESOURCE(32513)
|
||||
static IDC_WAIT; //MAKEINTRESOURCE(32514)
|
||||
|
|
@ -363,11 +398,21 @@ type TPairSplitterType=class(tenumeration)
|
|||
static pstVertical;
|
||||
end
|
||||
|
||||
|
||||
type TMBbtnstyle=class()
|
||||
{**
|
||||
@explan(说明) TMessageboxADlg 按钮样式常量%%
|
||||
**}
|
||||
{**
|
||||
@param(MB_OK)() 样式 %%
|
||||
@param(MB_OKCANCEL)() 样式 %%
|
||||
@param(MB_ABORTRETRYIGNORE)() 样式 %%
|
||||
@param(MB_YESNOCANCEL)() 样式 %%
|
||||
@param(MB_YESNO)() 样式 %%
|
||||
@param(MB_RETRYCANCEL)() 样式 %%
|
||||
@param(MB_CANCELTRYCONTINUE)() 样式 %%
|
||||
@param(MB_HELP)() 样式 %%
|
||||
**}
|
||||
|
||||
static MB_OK;
|
||||
static MB_OKCANCEL;
|
||||
static MB_ABORTRETRYIGNORE;
|
||||
|
|
@ -381,15 +426,19 @@ type TMBiconstyle=class()
|
|||
{**
|
||||
@explan(说明)TMessageboxADlg 图标样式常量%%
|
||||
**}
|
||||
(**
|
||||
@param(MB_ICONWARNING)() 样式 %%
|
||||
@param(MB_ICONASTERISK)() 样式 %%
|
||||
@param(MB_ICONQUESTION)() 样式 %%
|
||||
@param(MB_ICONSTOP)() 样式 %%
|
||||
**)
|
||||
|
||||
static MB_ICONWARNING;
|
||||
static MB_ICONASTERISK;
|
||||
static MB_ICONQUESTION;
|
||||
static MB_ICONSTOP;
|
||||
end
|
||||
type TDrawitemState=class
|
||||
{**
|
||||
@explan(说明) 系统控件子项绘制时的状态常量 %%
|
||||
**}
|
||||
static ODS_SELECTED;
|
||||
static ODS_GRAYED;
|
||||
static ODS_DISABLED;
|
||||
|
|
@ -466,7 +515,13 @@ end
|
|||
|
||||
type TSystemCursor=class
|
||||
{**
|
||||
@explan(说明) 鼠标常量类,作为参考 %%
|
||||
@explan(说明) 鼠标常量类,作为参考ocr_ 开头 %%
|
||||
@param(OCR_WAIT)() 样式 %%
|
||||
@param(OCR_CROSS)() 样式 %%
|
||||
@param(OCR_UP)() 样式 %%
|
||||
@param(OCR_SIZE)() 样式 %%
|
||||
@param(OCR_NO)() 样式 %%
|
||||
@param(OCR_HAND)() 样式 %%
|
||||
**}
|
||||
static OCR_WAIT; //150
|
||||
static OCR_CROSS; //30;
|
||||
|
|
@ -484,6 +539,9 @@ type TSystemCursor=class
|
|||
static OCR_IBEAM; //152
|
||||
end
|
||||
type tmacroconst=class(_commctrldef_,_tvclmsageid_,_shellapi_)
|
||||
{**
|
||||
@explan(说明) 宏定义集合 %%
|
||||
**}
|
||||
class function sinit();virtual;
|
||||
begin
|
||||
if tmacroconstinit then return ;
|
||||
|
|
@ -495,7 +553,7 @@ type tmacroconst=class(_commctrldef_,_tvclmsageid_,_shellapi_)
|
|||
static tmacroconstinit;
|
||||
end
|
||||
type tconstant = class(talign,TAnchorKind,TFormStyle,TComponentState,
|
||||
TComponentStyle,TOperation,TWinControlFlag,
|
||||
TComponentStyle,TWinControlFlag,
|
||||
TControlStyleType,TMouseButton,TShiftStateEnum,
|
||||
TControlFlag,TDockOrientation,TDragKind,TDragMode,
|
||||
TDragState,TDragMessage,TCanvasStates,TFPPenMode,
|
||||
|
|
@ -510,8 +568,14 @@ end
|
|||
type TSLUICONST=class(tmacroconst,tconstant)
|
||||
{**
|
||||
@explan(说明) 界面库常量类 %%
|
||||
@param(opRemove)() 移除 %%
|
||||
@param(opInsert)() 插入 %%
|
||||
@param(opRecycling)() 销毁 %%
|
||||
**}
|
||||
static WM_TRAY;
|
||||
static opInsert;
|
||||
static opRemove;
|
||||
static opRecycling;
|
||||
class function sinit();override;
|
||||
begin
|
||||
if WM_TRAY>0 then return ;
|
||||
|
|
@ -2023,6 +2087,9 @@ type _gdi_h_=class()
|
|||
end
|
||||
end
|
||||
type _winuserdef_=class()
|
||||
{**
|
||||
@explan(说明)一些常量 如按键相关的vk_开头,系统消息相关的常量wm_开头%%
|
||||
**}
|
||||
static WINUSERAPI;static WINABLEAPI;static WINVER;
|
||||
static MAKEINTRESOURCE;static DIFFERENCE;static RT_MANIFEST;
|
||||
static CREATEPROCESS_MANIFEST_RESOURCE_ID;static ISOLATIONAWARE_MANIFEST_RESOURCE_ID;static ISOLATIONAWARE_NOSTATICIMPORT_MANIFEST_RESOURCE_ID;
|
||||
|
|
@ -5719,6 +5786,9 @@ type _commctrldef_=class(_socketdef_,_gdi_h_,_commdlg_)
|
|||
end
|
||||
end
|
||||
type _tvclmsageid_ = class()
|
||||
{**
|
||||
@explan(说明)tslvcl库重新定义的消息等常量lm_开头 %
|
||||
**}
|
||||
static LM_USER;static WM_USER;static LM_LCL;
|
||||
static LM_ACTIVATEITEM;static LM_CHANGED;static LM_FOCUS;
|
||||
static LM_CLICKED;static LM_RELEASED;static LM_ENTER;
|
||||
|
|
|
|||
|
|
@ -321,6 +321,10 @@ type TMMouse=class(tuieventbase)
|
|||
property ypos:integer read hilparamsigned;
|
||||
function pos();
|
||||
begin
|
||||
{**
|
||||
@explan(说明) 获得位置信息 %%
|
||||
@return(array) x,y 位置 %%
|
||||
**}
|
||||
return array(xpos(),ypos());
|
||||
end
|
||||
property Dummy read Lparam;
|
||||
|
|
|
|||
Loading…
Reference in New Issue