当前最全的TAdvStringGrid控件属性事件介绍和使用方法

《当前最全的TAdvStringGrid控件属性事件介绍和使用方法》由会员上传分享，免费在线阅读，更多相关内容在教育资源-天天文库。

1、当前最全的TAdvStringGrid控件属性事件介绍和使用方法(AdvStringGrid使用技巧/Cells)---作者：TTT日期：20090306---       　　TAdvStringGrid是Delphi编程中常用的控件，经常用于统计数据和设计比较复杂的表格。控件功能很强大，但相应的使用也很复杂!　　以下是我整理出的常用技巧，有一部分是我自己的经验，有一部分是网上搜的别人的总结，有一部分整理了，有一部分没有整理；有一部分测试了，有一部分没有经过测试~~~呵呵，但都是我手工编辑的啊~~。(部分示例过程

2、是用于创建和设置动态Cells的过程，如果不理解请参考我总结的另一篇文章<完美动态TAdvStringGrid(cells)一例>)　　常用属性设置　　---　   Options—goEditing：是否可以编辑   Options—goTabs：控制是否可用TAB键将光标移到下一CELL   Option—goColSizing/RowSizing=true：设置列宽/行高可调整   Navigation—AlwaysEdi=true：进入单元格时自动变成编辑状态   Navigation—AdvanceOnE

3、nter=true：回车时自动移到下一个CELL   Navigation—AdvancelInsert:控制当光标在最后一个CELL时是否可以按回车插入新行   Navigation—AllowDeleteRow:控制是否按DELETE键删除当前行   Navigation—AppendOnArrowDown:控制按下箭头是否可以新增一行(未找到这个属性)   MouseActions—RowSelect/ColSelect=true：选择整行/选择整列   Navigation—AutoComboDropSiz

4、e=true组合框下拉框展开宽度自动设置   MouseActions—DirectComboDrop=True组合框进入时自动展开   (点击鼠标时直接进入编辑，或允许、不允许改变行或列宽等特性，都可以在MouseActions中设置。)   AutoNumAlign:=True则数字类型数据在CELL里会自动右对齐   AutoNumberCol(n);自动在第n列按顺序显示数字，即1，2，3……   AutoSize:=true：自动设置列宽，不推荐使用，自动调整后，真的很难看。   EnableWheel:

5、=true：一次滚动多行，EnableWheel:=False时，一次滚动一行。   SearchFooter—Visible:=TRUE时，会在ADVStringGrid的底部显示出搜索框(未找到属性)   FloatingFooter—Visible:为TRUE时，即在ADVStringGrid底部显示求和列，要想让求和列显示小数，还需要将FloatFormat属性设置为：%g(未找到属性)   (自动换行到新追回行：必须在onCellValidate过程中执行strGrid.AddRow；可以同时加一些赋值语

6、句。)   (当合并行后，如果想使文字垂直居中，可以先设置ADVStringGrid的MultilineCells设置为True,然后在文字前面加#13换行来实行)   (改变固定列的显示样式：ControlLook——FixedGradientFrom(起始色）——FixedGradientFrom(结束色）　　+++　　用过程设置相关属性　　---   1,设定单元表各列是否可以编辑:首先在设置属性：Options—goEditing=true；然后，在CanEditCell事件中设定。   procedure

7、TForm50.stgPartListCanEditCell(Sender:TObject;ARow,ACol:Integer;varCanEdit:Boolean);   Var     I:integer;   begin       if(stgPartList.cells[cC1Data_Flag,ARow]='')or(stgPartList.cells[cC1Data_Flag,ARow]='C')thenbegin           canEdit:=false;           exit;  

8、     end elsebegin           forI:=0tocColQty1dobegin               ifACol=Ithenbegin                   ifstgPartList.cells[cC1Data_Flag,aRow]='C'thenCanEdit:=false