有空研究一下OwnerDraw和三种Windows风格CS_OWNDC和CS_PARENTDC和CS_CLASSDC

时间:2023-12-06 17:26:32

就在StdCtrls.pas, ExtCtrls.pas和Buttons.pas三个类里研究就够了,这是初步的搜索结果:

---------- 在打开的文档中查找 ----------
"G:\StdCtrls.pas"(,): TOwnerDrawState = Windows.TOwnerDrawState;
"G:\StdCtrls.pas"(,): {$NODEFINE TOwnerDrawState}
"G:\StdCtrls.pas"(,): Rect: TRect; State: TOwnerDrawState) of object;
"G:\StdCtrls.pas"(,): TComboBoxStyle = (csDropDown, csSimple, csDropDownList, csOwnerDrawFixed,
"G:\StdCtrls.pas"(,): csOwnerDrawVariable);
"G:\StdCtrls.pas"(,): State: TOwnerDrawState); virtual;
"G:\StdCtrls.pas"(,): TListBoxStyle = (lbStandard, lbOwnerDrawFixed, lbOwnerDrawVariable,
"G:\StdCtrls.pas"(,): lbVirtual, lbVirtualOwnerDraw);
"G:\StdCtrls.pas"(,): State: TOwnerDrawState); virtual;
"G:\StdCtrls.pas"(,): State: TOwnerDrawState);
"G:\StdCtrls.pas"(,): if FStyle in [csOwnerDrawFixed, csOwnerDrawVariable] then
"G:\StdCtrls.pas"(,): CBS_DROPDOWNLIST or CBS_OWNERDRAWFIXED,
"G:\StdCtrls.pas"(,): CBS_DROPDOWNLIST or CBS_OWNERDRAWVARIABLE);
"G:\StdCtrls.pas"(,): State: TOwnerDrawState;
"G:\StdCtrls.pas"(,): State := TOwnerDrawState(LongRec(itemState).Lo);
"G:\StdCtrls.pas"(,): if FStyle = csOwnerDrawVariable then
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if (Index <> -) and not (ListBox.Style in [lbVirtual, lbVirtualOwnerDraw]) then
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then exit;
"G:\StdCtrls.pas"(,): if Value in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): lbVirtualOwnerDraw: Style := lbOwnerDrawFixed;
"G:\StdCtrls.pas"(,): (, LBS_OWNERDRAWFIXED, LBS_OWNERDRAWVARIABLE, LBS_OWNERDRAWFIXED,
"G:\StdCtrls.pas"(,): LBS_OWNERDRAWFIXED);
"G:\StdCtrls.pas"(,): Data[Self.Style in [lbVirtual, lbVirtualOwnerDraw]] or
"G:\StdCtrls.pas"(,): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then
"G:\StdCtrls.pas"(,): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then
"G:\StdCtrls.pas"(,): State: TOwnerDrawState);
"G:\StdCtrls.pas"(,): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then
"G:\StdCtrls.pas"(,): State: TOwnerDrawState;
"G:\StdCtrls.pas"(,): State := TOwnerDrawState(LongRec(itemState).Lo);
"G:\StdCtrls.pas"(,): if FStyle = lbOwnerDrawVariable then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\StdCtrls.pas"(,): if Style in [lbVirtual, lbVirtualOwnerDraw] then
"G:\ExtCtrls.pas"(,): procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState); override;
"G:\ExtCtrls.pas"(,): inherited Style := csOwnerDrawFixed;
"G:\ExtCtrls.pas"(,): State: TOwnerDrawState);
"G:\Buttons.pas"(,): with Params do Style := Style or BS_OWNERDRAW;
共找到 处。
输出完成 (耗时: 秒)