癫狂编程

摘要： 1.1Delphi数据库应用程序的层次结构 Delphi数据库应用程序通过数据存取构件对数据库进行访问，通过可视的数据构件(Data Control)将数据呈现给用户，并与用户进行交互。Delphi数据库应用程序的结构如下图： 图 2‑1 Delphi数据库应用程序结构图 Delphi访问数据库可以 阅读全文

摘要： 项目需要筛选出不重复数据，以前没有做过，第一反应就是利用distinct处理，但是弄了好久也没搞出来，大家有知道的望告知下。 这次筛选没有使用distinct ，是利用group by ，利用id为唯一标示符（自增长），对按user进行排列，然后取重复项最小id（非重复项直接取唯一id），并以此id 阅读全文

摘要： 我想在关闭delphi编译的程序时，弹出“您是否确实要退出的窗口”点击否不退出，是退出 在主窗体的CloseQuery事件里，使用messagebox进行提示，根据选择的按钮对Canclose进行设置就可以了 如 begin if messagebox(handle, '是否退出程序', '提示', 阅读全文

摘要： ADOQry.Filtered:=false; ADOQry.Filtered:=true; ADOQry.FilterGroup:=fgPendingRecords ;FilterGroup参数解释如下：FgUnassigned 指定不使用任何的过滤器来过滤数据fgNone 移去任何的过滤器，让所 阅读全文

摘要： １　DataSet.Table[0].Rows[ i ][ j ] 其中i　代表第 i 行数, j 代表第 j 列数 ２　DataSet.Table[0].Rows[ i ].ItemArray[ j ] 其中i　代表第 i 行数, j 代表第 j 列数 ３　DataSet.Tables[0].Co 阅读全文

摘要： LabelText = DataSet11.Tables("COMM.USERS").Rows[0]["User_Name"].tostring() LabelText = DataSet11.Tables("COMM.USERS").Rows(0).Item("user_name") Label. 阅读全文

摘要： 比如我查找张三,那么DBGrid就可以定位到张三那行并选中这行,除了用循环实现还有没有快速定位的方法,谢谢! 解决方案 » to SuperTitan001 那如何找到张三的这行呢?除了用循环还有什么快速找到这行的方法吗? 最简单的dbgrid1.datasource.dataset.locate( 阅读全文

摘要： self.ADOQuery2.Edit;self.ADOQuery2.First;while not self.ADOQuery2.Eof dobeginself.ADOQuery2.FieldByName('单价').Value:=roundto(self.ADOQuery2.FieldByNam 阅读全文