随笔分类 -  Delphi

上一页 1 ··· 19 20 21 22 23 24 25 26 27 ··· 63 下一页

DELPHI使用TClientDataSet时不携带MIDAS.DLL的方法
摘要:TClientDataSet小家碧玉,恐怕人人都喜欢使用。但是,都知道娶TClientDataSet是有代价的,因为你同时也得面对丈母娘MIDAS.DLL。 能不能使用TClientDataSet又不用MIDAS.DLL呢? 很简单,就是uses一下MidasLib单元! MidasLib单元在De 阅读全文

posted @ 2020-10-05 23:07 癫狂编程 阅读(161) 评论(0) 推荐(0) 编辑

delphi 程序执行完了会自动退出···难道会选择最近的Exit?
摘要:一个奇怪的问题,当条件为False时,还是掉进了过程里: ret:=IsBoxFull(StrToInt(E_BoxNo.Text),RG_Box); if ret=true then begin if Application.MessageBox('该箱表数已满,是否打印条形码!','系统提示', 阅读全文

posted @ 2020-10-05 21:07 癫狂编程 阅读(308) 评论(0) 推荐(0) 编辑

Delphi用ini文件连接数据库
摘要:CS数据库连接-delphi+inichinayaosir{delphi connection database with ini file}unit DataModule;interfaceuses SysUtils, Classes, DB, ADODB,INIFiles;type TDataM 阅读全文

posted @ 2020-10-05 11:29 癫狂编程 阅读(409) 评论(0) 推荐(0) 编辑

delphi错误‘Unable to find record. No key specified’‘解决办法注意事项。
摘要:1.使用clientdataset的设置事件的响应: procedure TDataModule2.ClientDataSet1AfterPost(DataSet: TDataSet);beginTry TClientDataSet(DataSet).ApplyUpdates(-1); Except 阅读全文

posted @ 2020-10-04 16:16 癫狂编程 阅读(389) 评论(0) 推荐(0) 编辑

TDBGrid中用Enter仿真Tab键盘
摘要:procedure TForm1.FormKeyPress(Sender: TObject; var Key: Char);begin if Key = #13 then //如果是一个Enter键盘 begin if not (ActiveControl is TDBGrid) then //如果 阅读全文

posted @ 2020-10-04 15:54 癫狂编程 阅读(124) 评论(0) 推荐(0) 编辑

在DBGrid中,怎样判断焦点离开了某个单元格?(100分)
摘要:https://wedelphi.com/t/99347/ 在DBGrid中,怎样判断焦点离开了某个单元格?onColexit事件只能判断用键盘到移到另一列,还不能判断mouse离开单元格,我想做的是:不论是mouse或用键盘离开某个单元格做点别的事情 那个应该可以的呀,OnColExit/OnAf 阅读全文

posted @ 2020-10-04 14:00 癫狂编程 阅读(300) 评论(0) 推荐(0) 编辑

『delphi』Enter键移动焦点的效果
摘要:procedure Tlogin.Edit1KeyDown(Sender: TObject; var Key: Word; Shift: TShiftState);begin if key=vk_return then FindNextControl(ActiveControl,true,false 阅读全文

posted @ 2020-10-04 13:49 癫狂编程 阅读(177) 评论(0) 推荐(0) 编辑

在 Delphi 中实现控件焦点转移?
摘要:要在 Delphi 中实bai现按回车后控件焦点的转移,可以调du用 Windows API 消息发送函数 PostMessage,做法如下:zhi把 Form1 的 KeyPreview 属性设为 True,在 Edit 和 Memo 的 OnKeyPress 事件dao中加入以下代码:if Ke 阅读全文

posted @ 2020-10-04 13:48 癫狂编程 阅读(416) 评论(0) 推荐(0) 编辑

Delphi焦点移动
摘要:使用消息机制: 下一个焦点: SendMessage(Form1.Handle,WM_NEXTDLGCTL,0,0); 上一个焦点: SendMessage(Form1.Handle,WM_NEXTDLGCTL,1,0); 阅读全文

posted @ 2020-10-04 13:43 癫狂编程 阅读(184) 评论(0) 推荐(0) 编辑

delphi 焦点定位
摘要:active control 是当前窗口获得焦点的控件。 WM_NEXTDLGCTL是一个消息。 perform(WM_NEXTDLGCTL,0,0)是把当前焦点移到下一个控件。 if not (active control is TDBGrid) then 窗口具有active control 属 阅读全文

posted @ 2020-10-04 13:40 癫狂编程 阅读(411) 评论(0) 推荐(0) 编辑

将DBGrid 当前列定位到指定的字段上
摘要:// 功能:将 DbGrid 当前列定位到某字段上。 // 参数: pDbGrid:TDbGrid; DBGrid // pcFieldName : string 数据表字段名,字段名不区分大小写 // 返回:当表字段在 DBGrid 中存在时,返回表字段所在的列的序号,首序号为0 // 否则,返回 阅读全文

posted @ 2020-10-03 16:24 癫狂编程 阅读(150) 评论(0) 推荐(0) 编辑

复制出一个同样的窗体
摘要:要复制出一个同样的窗体,并保留原窗体,步骤如下: 1. 打开原窗体,使用文件菜单栏的“Save as”命令,另存为一个文件;--即保存时,该文件是一个新的文件,要给它起名字,一旦保存成功,则原有的文件就脱离该项目,必须要用Project==>Add to Project命令,导入原有窗体;--修改于 阅读全文

posted @ 2020-10-03 13:22 癫狂编程 阅读(289) 评论(0) 推荐(0) 编辑

DBEdit的OnChange事件(100分)
摘要:关于DBEdit的问题:DBEdit中有一个OnChange事件,设置:当DBEdit中的数据发生改变,触发一个OnChange事件,系统弹出警告对话框,并询问操作员是否修改数据。但现在碰到这样一个问题:程序未运行时,DBEdit中的数据为空,然而,程序运行后,DBEdit中必然有数据,这样就有了一 阅读全文

posted @ 2020-09-22 19:14 癫狂编程 阅读(277) 评论(0) 推荐(0) 编辑

delphi中DBEdit,数据的修改和提交
摘要:https://bbs.csdn.net/topics/300030768 我用DBEdit,DBComboBox这些控件,还用到ActionList行为,进行增删,但是现在的问题是每次我在DBEdit,DBComboBox中修改,没按提交,就提交到数据库中,为什么?请大家帮帮忙 把adoDataS 阅读全文

posted @ 2020-09-19 19:16 癫狂编程 阅读(879) 评论(0) 推荐(0) 编辑

delphi 根据DELTA自动生成SQL语句
摘要:delphi 根据DELTA自动生成SQL语句 上传客户端的CLIENTDATASET.delta到服务器的clientdataset.data,服务端解析clientdataset的数据生成相应的SQL语句。 相对于直接调用datasetprovider.applyupdates()方法提交数据而 阅读全文

posted @ 2020-09-19 10:18 癫狂编程 阅读(293) 评论(0) 推荐(0) 编辑

clientdataset生成sql
摘要:遍历clientdataset,生成sql语句,参照咏南写则,增加了一表多主键的情况 function TForm1.vartosql(value: Variant): wideString; var tmp:widestring; begin if (varisnull(Value)) or (v 阅读全文

posted @ 2020-09-19 10:15 癫狂编程 阅读(179) 评论(0) 推荐(0) 编辑

在delphi中生成GUID/自动获取临时表名......
摘要:什么是 GUID ? 全球唯一标识符 (GUID) 是一个字母数字标识符,用于指示产品的唯一性安装。在许多流行软件应用程序(例如 Web 浏览器和媒体播放器)中,都使用 GUID。 GUID 的格式为8-4-4-4-12 :“xxxxxxxx-xxxx-xxxx-xxxx-xxxxxxxxxxxx” 阅读全文

posted @ 2020-09-18 22:50 癫狂编程 阅读(222) 评论(0) 推荐(0) 编辑

如何得到表的主键名称(字段名称)
摘要:king_Cai Unregistered / Unconfirmed GUEST, unregistred user! Feb 25, 2002 #1 如何得到表的主键名称(字段名称)? C curioussea Unregistered / Unconfirmed GUEST, unregist 阅读全文

posted @ 2020-09-18 22:44 癫狂编程 阅读(570) 评论(0) 推荐(0) 编辑

通用的更新方法 THlsImplBase
摘要:function THlsImplBase.UpdateTableData(ATableName, AKeyField: AnsiString; var AData: Variant): Boolean; var LSql: string; I: Integer; {$IFDEF MSSQL} LP 阅读全文

posted @ 2020-09-17 23:50 癫狂编程 阅读(189) 评论(0) 推荐(0) 编辑

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

posted @ 2020-09-17 20:49 癫狂编程 阅读(295) 评论(0) 推荐(0) 编辑

上一页 1 ··· 19 20 21 22 23 24 25 26 27 ··· 63 下一页

导航

好的代码像粥一样,都是用时间熬出来的