一:浏览模式:
浏览模式即不可编辑模式,但又可以选择单元内容复制的效果设置。
uses cxGridTableView, cxGridDBBandedTableView;
procedure BrowserGridSetting(var cxGridTableView: TcxGridTableView);
varicol:Integer;
begin
WITH cxGridTableView DO
BEGIN
OptionsBehavior.FocusCellOnTab := True ;
OptionsBehavior.FocusFirstCellOnNewRecord := True;
OptionsBehavior.GoToNextCellOnEnter := True;
OptionsBehavior.FocusCellOnCycle := True;
OptionsBehavior.NavigatorHints := True ;
OptionsCustomize.ColumnHiding := True;
OptionsCustomize.ColumnsQuickCustomization := True;
//OptionsCustomize.BandsQuickCustomization := True; //cxGrid1DBTableView1不适用
OptionsCustomize.GroupRowSizing := True;
OptionsData.CancelOnExit := False;
OptionsData.Deleting := False;
OptionsData.DeletingConfirmation := False;
OptionsData.Inserting := False;
OptionsData.Editing := True;
OptionsView.Footer := True;
OptionsView.FooterAutoHeight := True;
OptionsView.Indicator := True;
END;
if cxGridTableView.InheritsFrom(TcxGridDBBandedTableView) then
TcxGridDBBandedTableView(cxGridTableView).OptionsCustomize.BandsQuickCustomization := True;
//接着设置各列的属性。
for icol := 0 to cxGridTableView.ColumnCount-1 do
begin
if NOT Assigned(cxGridTableView.Columns[icol].Properties) then
cxGridTableView.Columns[icol].PropertiesClassName := 'TcxTextEditProperties';
cxGridTableView.Columns[icol].Properties.ReadOnly := True;
cxGridTableView.Columns[icol].Options.Editing := True;
end;
end;
一:编辑模式:
模式如上,修改如下n行:
Properties.ReadOnly := False ;
OptionsData.CancelOnExit := True;
OptionsData.Deleting := True;
OptionsData.DeletingConfirmation := True;
OptionsData.Inserting := True;