07 2019 档案

DELPHI ClientData使用详解
摘要:在三层结构中,TClientDataSet的地位是不可估量的,她的使用正确与否,是十分关键的,本文从以下几个方面阐述她的使用,希望对你有所帮助.1.动态索引procedure TForm1.DBGrid1TitleClick(Column: TColumn);begin if (not column 阅读全文

posted @ 2019-07-30 18:58 癫狂编程 阅读(934) 评论(0) 推荐(0) 编辑

如何使用delphi将Clientdataset的Delta保存到数据库中
摘要:[delphi] view plain copy //ATableName-表名, AKeyField-主键,多个主键用;隔开,如 ;pid;times; from:unit HlsImplBase; [delphi] view plain copy function THlsImplBase.UpdateTableData(ATableName, AKeyField: AnsiString... 阅读全文

posted @ 2019-07-30 18:54 癫狂编程 阅读(619) 评论(0) 推荐(0) 编辑

delphi数据集查找不定位
摘要:procedure TForm1.Button2Click(Sender: TObject); var R: Variant; begin R := MemTableEh1.Lookup('Name',Edit1.Text,'Name'); if not VarIsNull(R) then ShowMessage(R); end; 阅读全文

posted @ 2019-07-30 11:55 癫狂编程 阅读(292) 评论(0) 推荐(0) 编辑

Delphi7-TClientDataSet: 查找
摘要:TClientDataSet[12]: 查找 方法有:1、Locate: 根据字段列表和对应的字段值查找并定位, 找到返回 True.2、Lookup: 根据字段列表和对应的字段值查找, 返回需要的字段值.3、SetKey、GotoKey 或 SetKey、GotoNearest: 根据索引字段的值 阅读全文

posted @ 2019-07-30 11:53 癫狂编程 阅读(640) 评论(0) 推荐(0) 编辑

Delphi7数据库编程之TDataSet(转)
摘要:TDataSet类由TBDEDataSet(BDE组件)、TCustomADODataSet(ADO组件)、TIBCustomDataSet(InterBase组件)、TCustomSQLDataSet(dbExpress组件)和TCustomClientDataSet子类组成。 下面介绍DataS 阅读全文

posted @ 2019-07-30 11:21 癫狂编程 阅读(500) 评论(0) 推荐(0) 编辑

delphi的万能数据库操作
摘要:好多人都抱怨delphi没有提供一个可以把任意数据放入数据库的控件,虽然说用代码实现也不难,但是有控件会更方便,这次我终于还是抽出空来做了这么个控件,以后就可以直接拖放了。它支持把任意数据类型写入数据库,也可以从数据库读出到流,或是直接保存为文件。另外,我加了一些对常用图像的处理,保存 jpg或是g 阅读全文

posted @ 2019-07-29 19:16 癫狂编程 阅读(514) 评论(0) 推荐(0) 编辑

dataset的find查找功能使用
摘要:var record = dataset.find(["status"],[curstatus]); //status指的是dataset中的某个字段,curstatus指的是指定的字段的值datasetChoose.setCurrent(record); //设置查找到的记录为当前记录 作者:巴克 阅读全文

posted @ 2019-07-29 19:14 癫狂编程 阅读(790) 评论(0) 推荐(0) 编辑

dbgrid中移动焦点到指定的行和
摘要:dbgrid是从TCustomGrid继承下来的,它有col与row属性,只不过是protected的,不能直接访问,要处理一下,可以这样: TDrawGrid(dbgrid1).row:=row; TDrawGrid(dbgrid1).col:=col; dbgrid1.setfocus;就可以看 阅读全文

posted @ 2019-07-28 17:02 癫狂编程 阅读(276) 评论(0) 推荐(0) 编辑

给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?(100分)
摘要:哈哈,我弄出来了。在大富翁上搜索的。Form1.DBGrid1.SelectedIndex := 4;Form1.DBGrid1.SetFocus;这样就行了。谢谢你! procedure TForm1.Button1Click(Sender: TObject);begin{修改KuCunInfo中 阅读全文

posted @ 2019-07-28 17:00 癫狂编程 阅读(198) 评论(0) 推荐(0) 编辑

能详细说一下action:=cafree这句吗?好多书都没说清楚!
摘要:关闭一个窗口有几种方式:最小化这个窗口,隐藏这个窗口,释放这个窗口,这句话就是说但这个窗口关闭的时候释放这个窗口,它应该是在form的onclose事件里面的 就是form.onclose() begin Action:=cafree; end;它的做用是不是相当于form.relase或form. 阅读全文

posted @ 2019-07-28 16:52 癫狂编程 阅读(606) 评论(0) 推荐(0) 编辑

dbExpress Driver for SQL Server
摘要:https://www.devart.com/dbx/sqlserver/ 阅读全文

posted @ 2019-07-26 22:41 癫狂编程 阅读(189) 评论(0) 推荐(0) 编辑

Delphi XE中使用dbExpress连接MySQL数据库疑难问题解决
摘要:Delphi IDE中包含一个Data Explorer的组件,如下图所示: 该组件基于dbExpress(包含TSQLConnection、TSQLDataSet、TSQLQuery、TSQLStoredProc、TSQLTable、TsqlServerMethod、TSQLMonitor、TSi 阅读全文

posted @ 2019-07-26 22:40 癫狂编程 阅读(299) 评论(0) 推荐(0) 编辑

dbgrid中移动焦点到指定的行和列
摘要:dbgrid是从TCustomGrid继承下来的,它有col与row属性,只不过是protected的,不能直接访问,要处理一下,可以这样:TDrawGrid(dbgrid1).row:=row;TDrawGrid(dbgrid1).col:=col;dbgrid1.setfocus;就可以看到效果 阅读全文

posted @ 2019-07-26 03:09 癫狂编程 阅读(470) 评论(0) 推荐(0) 编辑

给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?(100分)
摘要:给DBGrid动态赋值后,如何用程序指定某行某列为当前焦点?主要是如何指定列,行我能够指定,用DBGrid1.DataSource.DataSet.RecNo := 2;就行了,但是列我不会,请大家教我。谢谢! 如果希望是第2列获得焦点(字段数组下标从0开始):ADOTable1.RecNo := 阅读全文

posted @ 2019-07-26 03:04 癫狂编程 阅读(387) 评论(0) 推荐(0) 编辑

SQL Server 取日期时间格式 日期与字符串之间的转换
摘要:SQL Server 取日期时间部分 在本文中,GetDate()获得的日期由两部分组成,分别是今天的日期和当时的时间: Select GetDate() 用DateName()就可以获得相应的年、月、日,然后再把它们连接起来就可以了: Select Datename(year,GetDate()) 阅读全文

posted @ 2019-07-25 17:50 癫狂编程 阅读(1434) 评论(0) 推荐(0) 编辑

自动创建数据库(DELPHI+SQL SERVER)
摘要:procedure TForm1.Btn_OKClick(Sender: TObject); var sqlconn:string; begin Sqlconn:='Provider=SQLOLEDB.1;'+'password='+Edit_Password.Text +';Persist Security Info=true;User ID='+Edit_Name.Text ... 阅读全文

posted @ 2019-07-22 22:48 癫狂编程 阅读(1022) 评论(0) 推荐(0) 编辑

Delphi中ClientDataSet的用法小结
摘要:TClientDataSet控件继承自TDataSet,其数据存储文件格式扩展名为 .cds,是基于文件型数据存储和操作的控件。该控件封装了对数据进行操作处理的接口和功能,而本身并不依赖上述几种数据库驱动程序,基本上能满足单机"瘦"数据库应用程序的需要。 一、TClientDataSet的基本属性和 阅读全文

posted @ 2019-07-22 17:09 癫狂编程 阅读(785) 评论(0) 推荐(0) 编辑

CnPack开发包基础库
摘要:unit CnCommon; {* | ================================================================================ * 软件名称:开发包基础库 * 单元名称:公共运行基础库单元 * 单元作者:CnPack开发组 * 备 注:该单元定义了组件包的基础类库 * 开发平台:PWin98SE + Delphi 5... 阅读全文

posted @ 2019-07-21 19:26 癫狂编程 阅读(392) 评论(0) 推荐(0) 编辑

CnPack 开源软件项目
摘要:Cnpack公共窗体库 CnPack 2009-09-14 SVN 包,包括以下内容: 1. CnPack 组件包所有源代码。2. CnPack 开发组所有文档和模板,其中帮助文档目前包括多语帮助文档、CnDebugger 接口帮助文档、CnCalendar 历法说明文档、平滑字体组件帮助文档、停靠 阅读全文

posted @ 2019-07-21 18:58 癫狂编程 阅读(923) 评论(0) 推荐(0) 编辑

Delphi TStringList的用法
摘要:Delphi TStringList的用法 TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。 TStringList 常用方法与属性: var List: TStringList; i: Integer; begin List := TStringList.Create; 阅读全文

posted @ 2019-07-21 17:54 癫狂编程 阅读(170) 评论(0) 推荐(0) 编辑

Delphi动态创建菜单
摘要:在程序运行中动态创建菜单,主要使用TMeunItem类,所有菜单的条目都是TMenuItem的一个实例。 打开Delphi7集成开发环境,在默认新建工程里,放置一个Button1按钮和MainMenu1菜单项,设置Button1的Caption属性为添加主菜单。 在Button1的Object In 阅读全文

posted @ 2019-07-20 05:20 癫狂编程 阅读(871) 评论(0) 推荐(0) 编辑

Delphi 之 菜单组件(TMainMenu)
摘要:菜单组件TMainMenu 创建菜单双击TmenuMain,单击Caption就可以添加一个菜单项 菜单中添加分割线只需加“-”就可以添加一个分割线 级联菜单的设计 单击鼠标右键弹出菜单中选择Create Submenu菜单项 单选功能设计 要在设计的菜单项目中选择RadioItem属性为True, 阅读全文

posted @ 2019-07-20 04:13 癫狂编程 阅读(340) 评论(0) 推荐(0) 编辑

Delphi组件编辑器
摘要:看到Dev中的cxGrid组件的编辑器很强大,于是很想探究一下,跟踪cxGrid的代码比较麻烦,但原理大概知道一二.首先来研究一下设计器双击cxGrid弹出一个编辑窗体,选择窗体中的一个内容后,属性编辑器中的内容也随着变化.有了这个特性,对于控件中的一些复杂成员(继承于TPersistent类),如 阅读全文

posted @ 2019-07-16 00:38 癫狂编程 阅读(638) 评论(0) 推荐(0) 编辑

delphi设计浮动窗口
摘要:用过Photoshop的朋友一定对它的那些方便的浮动面板记忆犹新,其实这些面板就是一个个的小窗体,但这些小窗体都放在Photoshop的主窗体上 (不是存在主窗体中),有自己的标题栏、最小化按钮及最大化按钮。但它们与MDI程序不同的是,他们可以拖到主窗体外,更重要的是工作中所有这些面板窗体 与主窗体 阅读全文

posted @ 2019-07-16 00:19 癫狂编程 阅读(560) 评论(0) 推荐(0) 编辑

Delphi让控件随着窗口的大小而改变
摘要:Delphi让控件随着窗口的大小而改变方法1:设置Anchors属性,把akLeft,akTop,akRight,akBottom都设为True.方法2:设置Align属性,其值为alClient. 阅读全文

posted @ 2019-07-16 00:18 癫狂编程 阅读(914) 评论(0) 推荐(0) 编辑

delphi 双击dbgrid 调用另一窗体的例子
摘要:unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, Grids, DBGrids, DB, ADODB, StdCtrls; ty 阅读全文

posted @ 2019-07-16 00:17 癫狂编程 阅读(313) 评论(0) 推荐(0) 编辑

什么是运行期包与设计期包
摘要:CnPackTip#8 什么是运行期包与设计期包 参与讨论: JingYu, Passion, 小夏整理: SkyJacker 2007.10.16, 2007.11.05http://www.cnpack.orgCnPack III QQ Group:32712412CnPack IV QQ Gr 阅读全文

posted @ 2019-07-14 22:47 癫狂编程 阅读(243) 评论(0) 推荐(0) 编辑

为控件添加设计期支持
摘要:每个开发人员都会有设计自定义控件的冲动。事实上,这也并不太难。 .NET支持三种类型的控件开发 1. 扩展控件。也就是说在现有一个控件类型基础上进行扩展,例如针对一个Button进行扩展,这种开发的最后结果就是我们得到了一个特殊的Button 2. 复合控件。也就是说把几个现有控件组合起来。继承自U 阅读全文

posted @ 2019-07-14 22:43 癫狂编程 阅读(131) 评论(0) 推荐(0) 编辑

Access access中,查询字段是否存
摘要:' ' 过程及函数名: ListAllTableAndAllField' 版本号 : --' 说明 : 本过程只用于演示如何用adodb的OpenSchema获取' 当前ACCESS数据库的所有表的所有列信息' 引用 : Micrsoft ActiveX Data Ojbects 2.1 Libra 阅读全文

posted @ 2019-07-03 19:33 癫狂编程 阅读(662) 评论(0) 推荐(0) 编辑

delphi中and和or的特殊用法
摘要:1=1 10=2 100=4 1000=8 1 or 2 = 3(11); 1 and 3 = 1; 2 and 3 = 2; 2 or 4 = 6(110); 2 and 6 = 2; 4 and 6 = 4; 阅读全文

posted @ 2019-07-03 19:27 癫狂编程 阅读(1376) 评论(0) 推荐(0) 编辑

利用SQL语句查找某数据库中所有存储过程包含的内容(转)
摘要:Use 数据库DECLARE @ProcName varchar(50)Create Table #tmpName(Content varchar(2000))Create Table #tmp(ProcName varchar(2000),Content1 varchar(8000))--定义一个 阅读全文

posted @ 2019-07-03 19:27 癫狂编程 阅读(1547) 评论(0) 推荐(0) 编辑

delphi 权限控制(delphi TActionList方案)
摘要:在软件开发中,为软件加入权限控制功能,使不同的用户有不同的使用权限,是非常重要的一项功能,由其在开发数据库方面的应用,这项功能更为重要。但是,要为一个应用加入全面的权限控制功能,又怎样实现呢?大家知道,现在的应用,一般均以菜单访问功能的形式出现,按照常规的做法,只要让注册进入应用的不同用户,可以访问 阅读全文

posted @ 2019-07-03 10:40 癫狂编程 阅读(1119) 评论(0) 推荐(0) 编辑

DELPHI 字符串与日期格式互转
摘要:procedure TForm1.Button1Click(Sender: TObject); var D:TDateTime; s:string; begin D:=VarToDateTime('05-10-14 04:35PM'); S:=FormatDatetime('YYYY/MM/DD HH:MM:SS',D); showmessage(s); end; 阅读全文

posted @ 2019-07-02 13:51 癫狂编程 阅读(481) 评论(0) 推荐(0) 编辑

Delphi格式化函数Format、FormatDateTime和FormatFloat详解
摘要:1.Format 根据指定所需要的格式,格式化字符串。 原型: function Format(const Format: string const Args: array of const): string 例子: 2.FormatDateTime 格式化日期值 原型: function Form 阅读全文

posted @ 2019-07-02 13:42 癫狂编程 阅读(1638) 评论(0) 推荐(0) 编辑

如何优雅的给TDatetimePicker控件赋值(Delphi)
摘要:给DatetimePicker赋值时,可以通过界面设置赋值,也可以通过代码赋值。 通常,我们会给表示起始时间的dtp赋值为 00:00:00,给表示结束时间的dtp赋值为23:59:59。 代码如下: dtp1.time:=strtodatetime('00:00:00'); dtp2.time:= 阅读全文

posted @ 2019-07-02 13:13 癫狂编程 阅读(1451) 评论(0) 推荐(0) 编辑

导航

< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8
好的代码像粥一样,都是用时间熬出来的
点击右上角即可分享
微信分享提示