我从TMemo继承新类,不需要焦点? ( 积分: 20 )

  • 主题发起人 主题发起人 WilliamGui
  • 开始时间 开始时间
W

WilliamGui

Unregistered / Unconfirmed
GUEST, unregistred user!
enabled := false; tabstop := false;
 
tabstop := false; 不行
enabled := false; 我不想变成灰颜色

 
TNoFocusMemo = class(TMemo)
private
procedure WMSetFocus(var Message: TWMSetFocus); message WM_SETFOCUS;

end;
procedure TNoFocusMemo.WMSetFocus(var Message: TWMSetFocus);
begin
//什么也不做就行了
end;
 

Similar threads

后退
顶部