标签: tcxgrid

我将4个cxgrid放入cxTabSheet,3个对齐的albottom和1个对齐的alClient ...当鼠标位于任何cxgrid的边缘时,光标鼠标不会更改为crSize(NS,WE,NESW,NWSE)而不能选择网格边框以拖动鼠标并调整其大小.我怎样才能做到这一点？

我使用 TcxGrid 但我无法在执行时创建字段，因为我有一个数据透视查询并且列是可变的

我可以像 tDbGrid 一样填充 cxGrid 吗？

我已经在上面显示了导航器TcxGrid.我想在不隐藏它的情况下禁用整个导航器.我怎样才能做到这一点？

我有以下代码

procedure TfrmJsApplications.colMaintStylesGetContentStyle(
  Sender: TcxCustomGridTableView; ARecord: TcxCustomGridRecord;
  AItem: TcxCustomGridTableItem; out AStyle: TcxStyle);
var
  aColumn: TcxCustomGridTableItem;
  aValue: Variant;
begin
  inherited;
  try
    aColumn := Sender.FindItemByName('colApplication_Doc');
    aValue := aRecord.Values[aColumn.Index];
    if VarToStr(aValue) <> '' then
      colMaint.Properties.Buttons[0].Caption := 'Redigere'
    else
      colMaint.Properties.Buttons[0].Caption := 'Opret'
  except
    on E:exception do
      Logfile.Error('F_JsApplications.colMaintStylesGetContentStyle: ' + E.Message);
  end;

在cxGrid中的列上运行.但由于某种原因,我根本无法弄清楚这一行

if VarToStr(aValue) <> '' then

使功能崩溃.我知道当aValue成为Null值时,但据我所知,在这种情况下VarToStr应返回''