CxGrid既能充满又能根据内容进行宽度调整

显示内容后，在运行下面的代码  

for i := 0 to FMainEx.cxgrdtblvw_CX.ColumnCount - 1 do

  begin

    FMainEx.cxgrdtblvw_CX.Columns[i].ApplyBestFit();

  end; 

uses cxGridTableView；

procedure BestFitCxgrid(Cx:TcxGridTableView);

var

  i:Integer;

begin

  for i := 0 to Cx.ColumnCount - 1 do

  begin

    Cx.Columns[i].ApplyBestFit();

  end;

end;