主题:grid中的按钮代码问题!
这是关于grid中的按钮代码
&& 另存数据
IF NOT EMPTY(thisform.TableName)
LOCAL cFileName
IF RECCOUNT(thisform.TableName)>0
cFileName=PUTFILE("文件名:",thisform.TableName,"dbf")
IF NOT EMPTY(cFileName)
COPY TO (cFileName)
ENDIF
ENDIF
ENDIF
添加
&& append
IF NOT EMPTY(thisform.Tablename)
APPEND BLANK IN (thisform.TableName)
thisform.DataChange=.t.
thisform.DataGrid.Refresh()
thisform.datagrid.SetFocus() && 鼠标焦点跳至表格对象内
ENDIF
1、其中thisform.TableName中的TableName是指的什么名称,是grid的Name还是其他的,我没搞明白?
2、在添加按钮中的thisform.datagrid.SetFocus() && 鼠标焦点跳至表格对象内
是指当前鼠标点击或者记录指针的位置吗?
3、请帮我加上详细的注释
谢谢!!!
&& 另存数据
IF NOT EMPTY(thisform.TableName)
LOCAL cFileName
IF RECCOUNT(thisform.TableName)>0
cFileName=PUTFILE("文件名:",thisform.TableName,"dbf")
IF NOT EMPTY(cFileName)
COPY TO (cFileName)
ENDIF
ENDIF
ENDIF
添加
&& append
IF NOT EMPTY(thisform.Tablename)
APPEND BLANK IN (thisform.TableName)
thisform.DataChange=.t.
thisform.DataGrid.Refresh()
thisform.datagrid.SetFocus() && 鼠标焦点跳至表格对象内
ENDIF
1、其中thisform.TableName中的TableName是指的什么名称,是grid的Name还是其他的,我没搞明白?
2、在添加按钮中的thisform.datagrid.SetFocus() && 鼠标焦点跳至表格对象内
是指当前鼠标点击或者记录指针的位置吗?
3、请帮我加上详细的注释
谢谢!!!