摘要：TDataSet控件以及它的继承控件，例如TSimpleDataSet/TClientDataSet等都可以使用Locate方法在结果数据集中查寻数据。程序首先必须使用SQL命令从后端数据库中取得数据并且形成结果数据集，然后才使用Locate方法查寻数据。当使用Locate方法查寻数据时，开发人员可以使用任何的字段条件来查寻，而无须理会这个字段是不是索引字段。当然，当开发人员使用索引字段来查寻数据时，Locate会直接使用索引来帮助查寻，因此速度会非常快速。如果开发人员使用非索引字段查寻数据，那么Locate也将使用目前它知道最好的方式来查寻数据。此外，Locate方法不只能够查寻一个单一的字 阅读全文

摘要：Delphi Cxgrid获取选中行列，排序规则，当前正在编辑的单元格内的值cxGrid1DBTableView1.Controller.FocusedRowIndex 当前行号cxGrid1DBTableView1.Controller.FocusedRow 当前行cxGrid1DBTableView1.Controller.FocusedColumn 当前列cxGrid1DBTableView1.Controller.FocusedColumnIndex 当前列号cxGrid1DBTableView1.Controller.EditingItem 当前编辑中的单元框cxGrid1DBTab 阅读全文

摘要：分类快捷键解释备注组件设计类Escape选择当前组件容器Shift+Click选择多个组件；选择窗体Tab选择下一个组件Shift+Tab选择上一个组件方向键选择此方向的下一个组件Ctrl+方向键将所选组件的位置移动1个像素Shift+方向键将所选组件的大小改变1个像素Ctrl+Shift+方向键将所选组件的位置移动1个栅格Del删除所选组件Ctrl+鼠标拖动选择一个容器内的多个组件可以一起修改共同属性Tab(在ObjectInspector中使用)搜索属性或事件代码编辑类F1;Ctrl+F1光标所在单词的帮助Ctrl+Shift+Enter光标所在单词的参考Ctrl+Click(标识符)寻找 阅读全文

摘要：procedure TdmlSBWXJL_R.qryDataBeforePost(DataSet: TDataSet);var BookMark: TBookmark; fYLJE, fYGJE : Extended;begin inherited; fYLJE := 0; fYGJE := 0; BookMark := qryJXYL.GetBookmark; qryJXYL.DisableControls; try qryJXYL.First; while not qryJXYL.Eof do begin fYLJE := fYLJE + tvDetailJXYLSBWXYL_SL.AsF 阅读全文

摘要：function NewID(sYWID: string; sID: string; iInc: Integer; bUseNewConn: Boolean): String;var qryTmp: TRSQuery; fValue, fOldValue: Extended; NewDB: TADOConnection;begin fValue := 1; if Trim(sYWID) = '' then sYWID := ' '; if Trim(sID) = '' then sID := ' '; NewDB := TADOC 阅读全文

摘要：有序类型包括:.integer(整型).character(字符型).boolean(布尔型).enumerated(枚举型).subrange(子界型)有序类型定义了一组被排序的值.每个相异值都有唯一的一个后继和唯一的一个前趋.每个相异值的后继都不相同,同样他们的前趋也不同.另外,每个值都有个序号.如果一个值的序号是n,那么它的前趋序号就是n-1,后继的序号就是n+1. 阅读全文