VFPGRID技巧.docVIP

VFP GRID技巧 Spinner在GRID中的运用利用Spinner控件可以很好的来进行数据的输入控制，尤其我们利用GRID控件来输入数据时，因为GRID不能很好的进行控制，所以很多时侯需要自己对她做些修改，那么将Spinner控件放入GRID时，就会遇到一个不能很好的进行跳行问题，除了用鼠标以外，很难找到方法使光标下移一行，因此本文在此做个介绍，以回车来使光标自动下移表格行。将一个Spinner控件放入GRID的TEXT控件位置，默认会以Spinner控件作优先控件。在该控件的KeyPress事件中，写如下代码：If nKeyCode 13NoDefaultSele GRID所绑定的数据源名称SkipIf eof ThisForm.cmd1.SetfocusEndIfEndIf 这样的话，当光标在spinner中，输完数据后，按回车，就自动跳到下一行，当移到最后一行时，当然也可以做添加一行的处理，而这里是焦点聚焦到一个按纽上。 添加复选框控件： 如果新控件是一个复选框，应将复选框的 Caption 属性设置为“ ”，并将列的 Sparse 属性设置为“假” .F. 。 提示:??? 如果想让复选框在表格列中居中，可先创建一个容器类，将复选框添加到容器类中，并调整复选框在容器类中的位置。然后将容器类添加到表格列中，并将复选框的 ControlSource 属性设置为需要的字段。 若要通过代码将控件添加到表格列l 请在表格的 Init 事件中，使用 AddObject 方法程序将控件添加到表格列，然后设置列的 CurrentControl 属性。例如，Init 事件包含了如下代码，向列中添加两个控件，并将其中一个设置为当前控件：THIS.grcColumn1.AddObject spnQuantity, SPINNER THIS.grcColumn1.AddObject cboQuantity, COMBOBOX THIS.grcColumn1.CurrentControl spnQuantityl 下面的代码确保控件是可见的，并且显示在表格中的每一行。THIS.grcColumn1.spnQuantity.Visible .T.THIS.grcColumn1.Sparse .F.在本例中，Column1 有三个可能的当前控件值：l spnQuantityl cboQuantityl Text1 （默认控件）附注??? 在表格级上设置的属性并不会传到列或标头。因此，必须直接设置标头或所包含控件的属性，它们不会继承列级别的属性设置。 提示??? 要想在表格列中显示组合框最佳状态，请设置下列组合框属性∶BackStyle 0Margin 0SpecialEffect 1BorderStyle 0