5,379
社区成员
发帖
与我相关
我的任务
分享
type
TDBGridEh = Class(DBGridEh.TDBGridEh)
public
procedure DefaultBuildIndicatorTitleMenu(var PopupMenu: TPopupMenu); override;
end;
TForm1 = class(TForm)
...........
implementation
...........
procedure TDBGridEh.DefaultBuildIndicatorTitleMenu(var PopupMenu: TPopupMenu);
begin
inherited;
PopupMenu.Items[0].Visible := False;
end;