gpt4 book ai didi

delphi - 将devexpress编辑器隐藏在filterrow中

转载 作者:行者123 更新时间:2023-12-03 19:43:27 25 4
gpt4 key购买 nike

我有一个TcxGrid,其中定义了过滤器,但是由于我在网格中有一些复选框和按钮,因此它们也显示在过滤器行中。
我已经尝试了几乎所有方法来摆脱它们,但是没有任何效果。
DevExpress的答案也无济于事(如果我有时间的话,我实际上将更改为其他一些组件)

有没有从事过此工作的人,可能有我可以使用的解决方案?

enter image description here

最佳答案

下面的项目在数据行下方显示了过滤器框(这就是我认为的意思),并且没有任何
为网格列定义的控件。我希望这是您所追求的。

顺便说一句,我是用今年早些时候的vc.15 iirc版本的TcxGrid来做的。

更新我承认我对您的问题感到困惑,因为肯定在filter row中显示控件的原因是允许用户指定过滤器的值,因此,如果要隐藏它们,则用户将无法使用filter row。如果您想得到比我的答案更好的答案,我认为您需要更新您的q来确切说明您要做什么。

我不确定是否知道,但是筛选器框具有可以设置的Position属性,以便该框显示在数据行上方。



  TForm1 = class(TForm)
cxGrid1DBTableView1: TcxGridDBTableView;
cxGrid1Level1: TcxGridLevel;
cxGrid1: TcxGrid;
CDS1: TClientDataSet;
CDS1Marked: TBooleanField;
CDS1ID: TIntegerField;
DS1: TDataSource;
cxGrid1DBTableView1ID: TcxGridDBColumn;
cxGrid1DBTableView1Marked: TcxGridDBColumn;
CDS1Value: TIntegerField;
cxGrid1DBTableView1Value: TcxGridDBColumn;
procedure FormCreate(Sender: TObject);
private
protected
public
end;

var
Form1: TForm1;

implementation

{$R *.DFM}

procedure TForm1.FormCreate(Sender: TObject);
begin
CDS1.CreateDataSet;
CDS1.InsertRecord([0, False, 99]);
CDS1.InsertRecord([1, False, 88]);
CDS1.InsertRecord([2, False, 77]);
CDS1.InsertRecord([3, False, 66]);
CDS1.First;
end;

end.


DFM

object Form1: TForm1
Left = 267
Top = 103
Caption = 'MADefaultForm'
ClientHeight = 360
ClientWidth = 454
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poScreenCenter
Scaled = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object cxGrid1: TcxGrid
Left = 0
Top = 0
Width = 454
Height = 360
Align = alClient
TabOrder = 0
object cxGrid1DBTableView1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
FilterBox.Visible = fvAlways
DataController.DataSource = DS1
DataController.Filter.Active = True
DataController.KeyFieldNames = 'ID'
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <>
DataController.Summary.SummaryGroups = <>
FilterRow.Visible = True
object cxGrid1DBTableView1ID: TcxGridDBColumn
DataBinding.FieldName = 'ID'
end
object cxGrid1DBTableView1Marked: TcxGridDBColumn
DataBinding.FieldName = 'Marked'
Width = 97
end
object cxGrid1DBTableView1Value: TcxGridDBColumn
DataBinding.FieldName = 'Value'
PropertiesClassName = 'TcxTextEditProperties'
end
end
object cxGrid1Level1: TcxGridLevel
GridView = cxGrid1DBTableView1
end
end
object CDS1: TClientDataSet
Aggregates = <>
Params = <>
Left = 48
Top = 24
object CDS1ID: TIntegerField
FieldName = 'ID'
end
object CDS1Marked: TBooleanField
FieldName = 'Marked'
end
object CDS1Value: TIntegerField
FieldName = 'Value'
end
end
object DS1: TDataSource
DataSet = CDS1
Left = 88
Top = 24
end
end

关于delphi - 将devexpress编辑器隐藏在filterrow中,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/36748138/

25 4 0
Copyright 2021 - 2024 cfsdn All Rights Reserved 蜀ICP备2022000587号
广告合作:1813099741@qq.com 6ren.com