📄 delphicommctrl.inc
字号:
////////////////////////////////////////////////////////////////////////////
// this part of unit contains definitions moved here from CommCtrl.pas
// (using of CommCtrl.pas in Delphi3 leads to increase size of executable
// onto 30K)
type
PTCItemA = ^TTCItemA;
PTCItemW = ^TTCItemW;
PTCItem = PTCItemA;
tagTCITEMA = packed record
mask: UINT;
dwState: UINT;
dwStateMask: UINT;
pszText: PAnsiChar;
cchTextMax: Integer;
iImage: Integer;
lParam: LPARAM;
end;
tagTCITEMW = packed record
mask: UINT;
dwState: UINT;
dwStateMask: UINT;
pszText: PWideChar;
cchTextMax: Integer;
iImage: Integer;
lParam: LPARAM;
end;
PTCKeyDown = ^TTCKeyDown;
TTCKEYDOWN = packed record
hdr: TNMHDR;
wVKey: Word;
flags: UINT;
end;
tagTCITEM = tagTCITEMA;
_TC_ITEMA = tagTCITEMA;
_TC_ITEMW = tagTCITEMW;
_TC_ITEM = _TC_ITEMA;
TTCItemA = tagTCITEMA;
TTCItemW = tagTCITEMW;
TTCItem = TTCItemA;
TC_ITEMA = tagTCITEMA;
TC_ITEMW = tagTCITEMW;
TC_ITEM = TC_ITEMA;
const
CCM_FIRST = $2000; { Common control shared messages }
CCM_SETBKCOLOR = CCM_FIRST + 1; // lParam is bkColor
CCM_SETCOLORSCHEME = CCM_FIRST + 2; // lParam is color scheme
CCM_GETCOLORSCHEME = CCM_FIRST + 3; // fills in COLORSCHEME pointed to by lParam
CCM_GETDROPTARGET = CCM_FIRST + 4;
CCM_SETUNICODEFORMAT = CCM_FIRST + 5;
CCM_GETUNICODEFORMAT = CCM_FIRST + 6;
TCS_SCROLLOPPOSITE = $0001; // assumes multiline tab
TCS_BOTTOM = $0002;
TCS_RIGHT = $0002;
TCS_MULTISELECT = $0004; // allow multi-select in button mode
TCS_FLATBUTTONS = $0008;
TCS_FORCEICONLEFT = $0010;
TCS_FORCELABELLEFT = $0020;
TCS_HOTTRACK = $0040;
TCS_VERTICAL = $0080;
TCS_TABS = $0000;
TCS_BUTTONS = $0100;
TCS_SINGLELINE = $0000;
TCS_MULTILINE = $0200;
TCS_RIGHTJUSTIFY = $0000;
TCS_FIXEDWIDTH = $0400;
TCS_RAGGEDRIGHT = $0800;
TCS_FOCUSONBUTTONDOWN = $1000;
TCS_OWNERDRAWFIXED = $2000;
TCS_TOOLTIPS = $4000;
TCS_FOCUSNEVER = $8000;
TCS_EX_FLATSEPARATORS = $00000001;
TCS_EX_REGISTERDROP = $00000002;
TCM_FIRST = $1300; { Tab control messages }
TCM_GETIMAGELIST = TCM_FIRST + 2;
TCM_SETIMAGELIST = TCM_FIRST + 3;
TCM_GETITEMCOUNT = TCM_FIRST + 4;
TCM_GETITEMA = TCM_FIRST + 5;
TCM_SETITEMA = TCM_FIRST + 6;
TCM_INSERTITEMA = TCM_FIRST + 7;
TCM_DELETEITEM = TCM_FIRST + 8;
TCM_DELETEALLITEMS = TCM_FIRST + 9;
TCM_GETITEMRECT = TCM_FIRST + 10;
TCM_GETCURSEL = TCM_FIRST + 11;
TCM_SETCURSEL = TCM_FIRST + 12;
TCM_HITTEST = TCM_FIRST + 13;
TCM_SETITEMEXTRA = TCM_FIRST + 14;
TCM_ADJUSTRECT = TCM_FIRST + 40;
TCM_SETITEMSIZE = TCM_FIRST + 41;
TCM_REMOVEIMAGE = TCM_FIRST + 42;
TCM_SETPADDING = TCM_FIRST + 43;
TCM_GETROWCOUNT = TCM_FIRST + 44;
TCM_GETTOOLTIPS = TCM_FIRST + 45;
TCM_SETTOOLTIPS = TCM_FIRST + 46;
TCM_GETCURFOCUS = TCM_FIRST + 47;
TCM_SETCURFOCUS = TCM_FIRST + 48;
TCM_SETMINTABWIDTH = TCM_FIRST + 49;
TCM_DESELECTALL = TCM_FIRST + 50;
TCM_HIGHLIGHTITEM = TCM_FIRST + 51;
TCM_SETEXTENDEDSTYLE = TCM_FIRST + 52; // optional wParam == mask
TCM_GETEXTENDEDSTYLE = TCM_FIRST + 53;
TCM_GETITEMW = TCM_FIRST + 60;
TCM_SETITEMW = TCM_FIRST + 61;
TCM_INSERTITEMW = TCM_FIRST + 62;
TCM_SETUNICODEFORMAT = CCM_SETUNICODEFORMAT;
TCM_GETUNICODEFORMAT = CCM_GETUNICODEFORMAT;
TCM_GETITEM = TCM_GETITEMA;
TCM_SETITEM = TCM_SETITEMA;
TCM_INSERTITEM = TCM_INSERTITEMA;
TCN_FIRST = 0-550; { tab control }
TCN_LAST = 0-580;
TCN_KEYDOWN = TCN_FIRST - 0;
TCN_SELCHANGE = TCN_FIRST - 1;
TCN_SELCHANGING = TCN_FIRST - 2;
TCN_GETOBJECT = TCN_FIRST - 3;
TCIF_TEXT = $0001;
TCIF_IMAGE = $0002;
TCIF_RTLREADING = $0004;
TCIF_PARAM = $0008;
TCIF_STATE = $0010;
PBS_SMOOTH = 01;
PBS_VERTICAL = 04;
PBM_SETRANGE = WM_USER+1;
PBM_SETPOS = WM_USER+2;
PBM_DELTAPOS = WM_USER+3;
PBM_SETSTEP = WM_USER+4;
PBM_STEPIT = WM_USER+5;
PBM_SETRANGE32 = WM_USER+6; // lParam = high, wParam = low
PBM_GETRANGE = WM_USER+7; // lParam = PPBRange or Nil
// wParam = False: Result = high
// wParam = True: Result = low
PBM_GETPOS = WM_USER+8;
PBM_SETBARCOLOR = WM_USER+9; // lParam = bar color
PBM_SETBKCOLOR = CCM_SETBKCOLOR; // lParam = bkColor
SB_SETTEXTA = WM_USER+1;
SB_GETTEXTA = WM_USER+2;
SB_GETTEXTLENGTHA = WM_USER+3;
SB_SETTIPTEXTA = WM_USER+16;
SB_GETTIPTEXTA = WM_USER+18;
SB_SETTEXTW = WM_USER+11;
SB_GETTEXTW = WM_USER+13;
SB_GETTEXTLENGTHW = WM_USER+12;
SB_SETTIPTEXTW = WM_USER+17;
SB_GETTIPTEXTW = WM_USER+19;
SB_SETTEXT = SB_SETTEXTA;
SB_GETTEXT = SB_GETTEXTA;
SB_GETTEXTLENGTH = SB_GETTEXTLENGTHA;
SB_SETTIPTEXT = SB_SETTIPTEXTA;
SB_GETTIPTEXT = SB_GETTIPTEXTA;
SB_SETPARTS = WM_USER+4;
SB_GETPARTS = WM_USER+6;
SB_GETBORDERS = WM_USER+7;
SB_SETMINHEIGHT = WM_USER+8;
SB_SIMPLE = WM_USER+9;
SB_GETRECT = WM_USER + 10;
SB_ISSIMPLE = WM_USER+14;
SB_SETICON = WM_USER+15;
SB_GETICON = WM_USER+20;
SB_SETUNICODEFORMAT = CCM_SETUNICODEFORMAT;
SB_GETUNICODEFORMAT = CCM_GETUNICODEFORMAT;
SBT_OWNERDRAW = $1000;
SBT_NOBORDERS = $0100;
SBT_POPOUT = $0200;
SBT_RTLREADING = $0400;
SBT_TOOLTIPS = $0800;
SB_SETBKCOLOR = CCM_SETBKCOLOR; // lParam = bkColor
SBARS_SIZEGRIP = $0100;
{ List View Styles }
LVS_ICON = $0000;
LVS_REPORT = $0001;
LVS_SMALLICON = $0002;
LVS_LIST = $0003;
LVS_TYPEMASK = $0003;
LVS_SINGLESEL = $0004;
LVS_SHOWSELALWAYS = $0008;
LVS_SORTASCENDING = $0010;
LVS_SORTDESCENDING = $0020;
LVS_SHAREIMAGELISTS = $0040;
LVS_NOLABELWRAP = $0080;
LVS_AUTOARRANGE = $0100;
LVS_EDITLABELS = $0200;
LVS_OWNERDATA = $1000;
LVS_NOSCROLL = $2000;
LVS_TYPESTYLEMASK = $FC00;
LVS_ALIGNTOP = $0000;
LVS_ALIGNLEFT = $0800;
LVS_ALIGNMASK = $0c00;
LVS_OWNERDRAWFIXED = $0400;
LVS_NOCOLUMNHEADER = $4000;
LVS_NOSORTHEADER = $8000;
{ List View Extended Styles }
LVS_EX_GRIDLINES = $00000001;
LVS_EX_SUBITEMIMAGES = $00000002;
LVS_EX_CHECKBOXES = $00000004;
LVS_EX_TRACKSELECT = $00000008;
LVS_EX_HEADERDRAGDROP = $00000010;
LVS_EX_FULLROWSELECT = $00000020; // applies to report mode only
LVS_EX_ONECLICKACTIVATE = $00000040;
LVS_EX_TWOCLICKACTIVATE = $00000080;
LVS_EX_FLATSB = $00000100;
LVS_EX_REGIONAL = $00000200;
LVS_EX_INFOTIP = $00000400; // listview does InfoTips for you
LVS_EX_LABELTIP = $00004000;
LVS_EX_UNDERLINEHOT = $00000800;
LVS_EX_UNDERLINECOLD = $00001000;
LVS_EX_MULTIWORKAREAS = $00002000;
I_IMAGECALLBACK = -1;
I_SKIP = -2;
LVSIL_NORMAL = 0;
LVSIL_SMALL = 1;
LVSIL_STATE = 2;
{ List View column styles }
LVCF_FMT = $0001;
LVCF_WIDTH = $0002;
LVCF_TEXT = $0004;
LVCF_SUBITEM = $0008;
LVCF_IMAGE = $0010;
LVCF_ORDER = $0020;
LVSCW_AUTOSIZE = -1;
LVSCW_AUTOSIZE_USEHEADER = -2;
LVCFMT_LEFT = $0000;
LVCFMT_RIGHT = $0001;
LVCFMT_CENTER = $0002;
LVCFMT_JUSTIFYMASK = $0003;
LVCFMT_IMAGE = $0800;
LVCFMT_BITMAP_ON_RIGHT = $1000;
LVCFMT_COL_HAS_IMAGES = $8000;
LVIF_TEXT = $0001;
LVIF_IMAGE = $0002;
LVIF_PARAM = $0004;
LVIF_STATE = $0008;
LVIF_INDENT = $0010;
//LVIF_NORECOMPUTE = $0800;
LVIF_DI_SETITEM = $1000;
LVIS_FOCUSED = $0001;
LVIS_SELECTED = $0002;
LVIS_CUT = $0004;
LVIS_DROPHILITED = $0008;
//LVIS_ACTIVATING = $0020;
LVIS_OVERLAYMASK = $0F00;
LVIS_STATEIMAGEMASK = $F000;
{ List View messages }
LVM_FIRST = $1000; { ListView messages }
LVM_SETUNICODEFORMAT = CCM_SETUNICODEFORMAT;
LVM_GETUNICODEFORMAT = CCM_GETUNICODEFORMAT;
LVM_GETBKCOLOR = LVM_FIRST + 0;
LVM_SETBKCOLOR = LVM_FIRST + 1;
LVM_GETIMAGELIST = LVM_FIRST + 2;
LVM_SETIMAGELIST = LVM_FIRST + 3;
LVM_GETITEMCOUNT = LVM_FIRST + 4;
LVM_GETITEMA = LVM_FIRST + 5;
LVM_SETITEMA = LVM_FIRST + 6;
LVM_INSERTITEMA = LVM_FIRST + 7;
LVM_DELETEITEM = LVM_FIRST + 8;
LVM_DELETEALLITEMS = LVM_FIRST + 9;
LVM_GETCALLBACKMASK = LVM_FIRST + 10;
LVM_SETCALLBACKMASK = LVM_FIRST + 11;
LVM_GETNEXTITEM = LVM_FIRST + 12;
LVM_FINDITEMA = LVM_FIRST + 13;
LVM_GETITEMRECT = LVM_FIRST + 14;
LVM_SETITEMPOSITION = LVM_FIRST + 15;
LVM_GETITEMPOSITION = LVM_FIRST + 16;
LVM_GETSTRINGWIDTHA = LVM_FIRST + 17;
LVM_HITTEST = LVM_FIRST + 18;
LVM_ENSUREVISIBLE = LVM_FIRST + 19;
LVM_SCROLL = LVM_FIRST + 20;
LVM_REDRAWITEMS = LVM_FIRST + 21;
LVM_ARRANGE = LVM_FIRST + 22;
LVM_EDITLABELA = LVM_FIRST + 23;
LVM_GETCOLUMNA = LVM_FIRST + 25;
LVM_SETCOLUMNA = LVM_FIRST + 26;
LVM_INSERTCOLUMNA = LVM_FIRST + 27;
LVM_DELETECOLUMN = LVM_FIRST + 28;
LVM_GETCOLUMNWIDTH = LVM_FIRST + 29;
LVM_SETCOLUMNWIDTH = LVM_FIRST + 30;
LVM_GETHEADER = LVM_FIRST + 31;
LVM_CREATEDRAGIMAGE = LVM_FIRST + 33;
LVM_GETVIEWRECT = LVM_FIRST + 34;
LVM_GETTEXTCOLOR = LVM_FIRST + 35;
LVM_SETTEXTCOLOR = LVM_FIRST + 36;
LVM_GETTEXTBKCOLOR = LVM_FIRST + 37;
LVM_SETTEXTBKCOLOR = LVM_FIRST + 38;
LVM_GETTOPINDEX = LVM_FIRST + 39;
LVM_GETCOUNTPERPAGE = LVM_FIRST + 40;
LVM_GETORIGIN = LVM_FIRST + 41;
LVM_UPDATE = LVM_FIRST + 42;
LVM_SETITEMSTATE = LVM_FIRST + 43;
LVM_GETITEMSTATE = LVM_FIRST + 44;
LVM_GETITEMTEXTA = LVM_FIRST + 45;
LVM_SETITEMTEXTA = LVM_FIRST + 46;
LVM_SETITEMCOUNT = LVM_FIRST + 47;
LVM_SORTITEMS = LVM_FIRST + 48;
LVM_SETITEMPOSITION32 = LVM_FIRST + 49;
LVM_GETSELECTEDCOUNT = LVM_FIRST + 50;
LVM_GETITEMSPACING = LVM_FIRST + 51;
LVM_GETISEARCHSTRINGA = LVM_FIRST + 52;
LVM_SETICONSPACING = LVM_FIRST + 53;
LVM_SETEXTENDEDLISTVIEWSTYLE = LVM_FIRST + 54;
LVM_GETEXTENDEDLISTVIEWSTYLE = LVM_FIRST + 55;
LVM_GETSUBITEMRECT = LVM_FIRST + 56;
LVM_SUBITEMHITTEST = LVM_FIRST + 57;
LVM_SETCOLUMNORDERARRAY = LVM_FIRST + 58;
LVM_GETCOLUMNORDERARRAY = LVM_FIRST + 59;
LVM_SETHOTITEM = LVM_FIRST + 60;
LVM_GETHOTITEM = LVM_FIRST + 61;
LVM_SETHOTCURSOR = LVM_FIRST + 62;
LVM_GETHOTCURSOR = LVM_FIRST + 63;
LVM_APPROXIMATEVIEWRECT = LVM_FIRST + 64;
LVM_SETWORKAREA = LVM_FIRST + 65;
LVM_GETSELECTIONMARK = LVM_FIRST + 66;
LVM_SETSELECTIONMARK = LVM_FIRST + 67;
LVM_SETBKIMAGEA = LVM_FIRST + 68;
LVM_GETBKIMAGEA = LVM_FIRST + 69;
LVM_GETWORKAREAS = LVM_FIRST + 70;
LVM_SETHOVERTIME = LVM_FIRST + 71;
LVM_GETHOVERTIME = LVM_FIRST + 72;
LVM_GETNUMBEROFWORKAREAS = LVM_FIRST + 73;
LVM_SETTOOLTIPS = LVM_FIRST + 74;
LVM_GETITEMW = LVM_FIRST + 75;
LVM_SETITEMW = LVM_FIRST + 76;
LVM_INSERTITEMW = LVM_FIRST + 77;
LVM_GETTOOLTIPS = LVM_FIRST + 78;
LVM_SORTITEMSEX = LVM_FIRST + 81;
LVM_FINDITEMW = LVM_FIRST + 83;
LVM_GETSTRINGWIDTHW = LVM_FIRST + 87;
LVM_GETCOLUMNW = LVM_FIRST + 95;
LVM_SETCOLUMNW = LVM_FIRST + 96;
LVM_INSERTCOLUMNW = LVM_FIRST + 97;
LVM_GETITEMTEXTW = LVM_FIRST + 115;
LVM_SETITEMTEXTW = LVM_FIRST + 116;
LVM_GETISEARCHSTRINGW = LVM_FIRST + 117;
LVM_EDITLABELW = LVM_FIRST + 118;
LVM_SETBKIMAGEW = LVM_FIRST + 138;
LVM_GETBKIMAGEW = LVM_FIRST + 139;
LVM_GETITEM = LVM_GETITEMA;
LVM_SETITEM = LVM_SETITEMA;
LVM_INSERTITEM = LVM_INSERTITEMA;
LVM_GETCOLUMN = LVM_GETCOLUMNA;
LVM_SETCOLUMN = LVM_SETCOLUMNA;
LVM_INSERTCOLUMN = LVM_INSERTCOLUMNA;
LVM_GETITEMTEXT = LVM_GETITEMTEXTA;
LVM_SETITEMTEXT = LVM_SETITEMTEXTA;
LVM_EDITLABEL = LVM_EDITLABELA;
LVM_FINDITEM = LVM_FINDITEMA;
LVM_GETISEARCHSTRING = LVM_GETISEARCHSTRINGA;
LVM_GETSTRINGWIDTH = LVM_GETSTRINGWIDTHA;
LVM_SETBKIMAGE = LVM_SETBKIMAGEA;
LVM_GETBKIMAGE = LVM_GETBKIMAGEA;
LV_MAX_WORKAREAS = 16;
LVIR_BOUNDS = 0;
LVIR_ICON = 1;
LVIR_LABEL = 2;
LVIR_SELECTBOUNDS = 3;
LVHT_NOWHERE = $0001;
LVHT_ONITEMICON = $0002;
LVHT_ONITEMLABEL = $0004;
LVHT_ONITEMSTATEICON = $0008;
LVHT_ONITEM = LVHT_ONITEMICON or LVHT_ONITEMLABEL or
LVHT_ONITEMSTATEICON;
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -