就在StdCtrls.pas, ExtCtrls.pas和Buttons.pas三个类里研究就够了,这是初步的搜索结果:
---------- 在打开的文档中查找 ---------- "G:StdCtrls.pas"(410,4): TOwnerDrawState = Windows.TOwnerDrawState; "G:StdCtrls.pas"(411,15): {$NODEFINE TOwnerDrawState} "G:StdCtrls.pas"(415,26): Rect: TRect; State: TOwnerDrawState) of object; "G:StdCtrls.pas"(528,61): TComboBoxStyle = (csDropDown, csSimple, csDropDownList, csOwnerDrawFixed, "G:StdCtrls.pas"(529,7): csOwnerDrawVariable); "G:StdCtrls.pas"(560,15): State: TOwnerDrawState); virtual; "G:StdCtrls.pas"(882,34): TListBoxStyle = (lbStandard, lbOwnerDrawFixed, lbOwnerDrawVariable, "G:StdCtrls.pas"(883,25): lbVirtual, lbVirtualOwnerDraw); "G:StdCtrls.pas"(953,15): State: TOwnerDrawState); virtual; "G:StdCtrls.pas"(2794,11): State: TOwnerDrawState); "G:StdCtrls.pas"(2971,19): if FStyle in [csOwnerDrawFixed, csOwnerDrawVariable] then "G:StdCtrls.pas"(2980,29): CBS_DROPDOWNLIST or CBS_OWNERDRAWFIXED, "G:StdCtrls.pas"(2981,29): CBS_DROPDOWNLIST or CBS_OWNERDRAWVARIABLE); "G:StdCtrls.pas"(3189,11): State: TOwnerDrawState; "G:StdCtrls.pas"(3193,15): State := TOwnerDrawState(LongRec(itemState).Lo); "G:StdCtrls.pas"(3219,19): if FStyle = csOwnerDrawVariable then "G:StdCtrls.pas"(3830,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(3847,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(3873,67): if (Index <> -1) and not (ListBox.Style in [lbVirtual, lbVirtualOwnerDraw]) then "G:StdCtrls.pas"(3880,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(3887,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(3903,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(3934,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(3945,44): if ListBox.Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(4032,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(4118,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4224,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then exit; "G:StdCtrls.pas"(4236,38): if Value in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4255,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4275,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4307,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4310,16): lbVirtualOwnerDraw: Style := lbOwnerDrawFixed; "G:StdCtrls.pas"(4355,13): (0, LBS_OWNERDRAWFIXED, LBS_OWNERDRAWVARIABLE, LBS_OWNERDRAWFIXED, "G:StdCtrls.pas"(4356,10): LBS_OWNERDRAWFIXED); "G:StdCtrls.pas"(4375,47): Data[Self.Style in [lbVirtual, lbVirtualOwnerDraw]] or "G:StdCtrls.pas"(4402,39): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then "G:StdCtrls.pas"(4419,39): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then "G:StdCtrls.pas"(4573,11): State: TOwnerDrawState); "G:StdCtrls.pas"(4589,41): if (Style in [lbVirtual, lbVirtualOwnerDraw]) then "G:StdCtrls.pas"(4605,11): State: TOwnerDrawState; "G:StdCtrls.pas"(4609,15): State := TOwnerDrawState(LongRec(itemState).Lo); "G:StdCtrls.pas"(4631,19): if FStyle = lbOwnerDrawVariable then "G:StdCtrls.pas"(4657,38): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:StdCtrls.pas"(4717,36): if Style in [lbVirtual, lbVirtualOwnerDraw] then "G:ExtCtrls.pas"(965,61): procedure DrawItem(Index: Integer; Rect: TRect; State: TOwnerDrawState); override; "G:ExtCtrls.pas"(4951,24): inherited Style := csOwnerDrawFixed; "G:ExtCtrls.pas"(4967,11): State: TOwnerDrawState); "G:Buttons.pas"(1473,39): with Params do Style := Style or BS_OWNERDRAW; 共找到 48 处。 输出完成 (耗时: 0 秒)