癫狂编程

Delphi listview 让焦点始终在新输出的焦点上，并自动滚动

摘要：有时候我们需要将一个listview 作为一个状态栏，将软件运行的信息输出到这个listview 中，这就要求自动滚动一下。在listview 的 onchange 事件中加入代码 procedure TMainForm.lv_ULinfoChange(Sender: TObject; Item 阅读全文

posted @ 2020-12-12 11:59 癫狂编程阅读(470) 评论(0) 推荐(0)

delphi xe7 判断listbox滚动条是否到达底部，并加载数据

摘要：或者说成，listbox下拉加载数据方法1：当listbox滚动条完全到达底部； var Form2: TForm2; i: Single = -1; implementation {$R *.fmx} procedure TForm2.lst1Gesture(Sender: TObject; c 阅读全文

posted @ 2020-12-12 11:46 癫狂编程阅读(529) 评论(0) 推荐(0)

Oracle中根据表明获取对应表触发器名称

摘要： Select object_name From user_objects a left join all_triggers b on a.object_Name = b.trigger_name wherea.object_type='TRIGGER' and b.table_name = 'XF_ 阅读全文

posted @ 2020-12-11 16:43 癫狂编程阅读(144) 评论(0) 推荐(0)

如何导出Oracle的存储过程为Sql语句

摘要： Oracle中，过程、type、函数等对象的源码可以通过USER_SOURCE或DBA_SOURCE查询；注意观察查询结果中，带有LINE字段，表示该段源码的行号。所以我们可以通过拼接"CREATE OR REPLACE PACKAGE"拼接查询结果，生成创建过程、函数等的sql语句，举例： SE 阅读全文

posted @ 2020-12-11 16:06 癫狂编程阅读(1031) 评论(0) 推荐(0)

如何动态添加DBGrid的Column???(30分)

摘要：如题：例如：Dbgrid.Column.Add.Title.Caption := 'aaa';Dbgrid.Column.Add.FieldName := 'bbb';但是这样不对，它会变成三列，第一列是空的，然后第二列是aaa,第三列是bbb请问如何做才是正确的？？ Dbgrid.Column.A 阅读全文

posted @ 2020-12-10 17:26 癫狂编程阅读(359) 评论(0) 推荐(0)

Delphi界面篇之ListView控件

摘要： //增加项或列(字段) ListView1.Clear;ListView1.Columns.Clear;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Add;ListView1.Columns.Items[0].Capti 阅读全文

posted @ 2020-12-09 20:13 癫狂编程阅读(981) 评论(0) 推荐(0)

BDE动态连接Oracle数据库

摘要： BDE动态连接Oracle数据库说明：系统是三层架构；数据库是Oracle9, Server采用BDE连接数据库，使用scktsrvr.exe，Client采用SocketConnection连接到Server。本系统Server采用读取配置文件来动态连接所需要的数据库，如果系统更换数据库、修改数阅读全文

posted @ 2020-12-09 18:45 癫狂编程阅读(490) 评论(0) 推荐(0)

控制面板cpl大全

摘要： ALSNDMGR.CPL AC97 Audio组态设定 appwiz.cpl 添加和删除程序 bthprops.cpl desk.cpl 显示属性 firewall.cpl Windows防火墙 hdwwiz.cpl 添加硬件向导 igfxcpl.cpl inetcpl.cpl Internet属性阅读全文

posted @ 2020-12-09 18:43 癫狂编程阅读(722) 评论(0) 推荐(0)

BatchUpdata 学习记录

摘要： BatchUpdata 工作原理:当ADO从数据源取得数据之后,客户端对于所有数据的修改都是暂时储存在客户端的缓存中,而不是立刻更新数据源中. 使用BatchUpdata的优点:客户端和数据源之间不会产生密切的互动，因此可以降低数据源的负荷。另外可以减少网络的Roundtrip，在拥有大量客户端的应阅读全文

posted @ 2020-12-09 17:01 癫狂编程阅读(143) 评论(0) 推荐(0)

在Windows 7或Server 2008 R2上安装更新时提示0x80092004错误的解决方案

摘要：适用的情况：安装2019年8月或之后的月度安全质量汇总更新，如KB4512506（2019年8月汇总）、KB4512486（2019年8月安全更新）、KB4516065（2019年9月汇总），无论是从Windows Update安装，还是下载后单独安装，均提示0x80092004错误，安装失败。此阅读全文

posted @ 2020-12-08 23:30 癫狂编程阅读(1057) 评论(0) 推荐(0)

Delphi：如何将列表作为参数传递给SQL查询？

摘要：我有一个整数或字符串列表,需要作为Delphi DataSet的参数传递.怎么做？这是一个例子. MyQuery是这样的： select * from myTable where intKey in :listParam 我将一个参数设置为列表或数组或其他内容： MyQuery.ParamByNa 阅读全文

posted @ 2020-12-07 20:11 癫狂编程阅读(350) 评论(0) 推荐(0)

delphi Ado 执行带有冒号字符语句的处理。

摘要：用DELPHI的程序员都知道ADO的易用性，用ADO控件操作数据库是非常受欢迎的，但使用ADO也会碰到一些麻烦问题，就像DELPHI 5下如果要用ADO就要先装好ADO补丁，有的SQL的语句在数据库工具里执行可以成功但用DELPHI的AdoQuery执行不一定能成功。今天又碰到这问题：ADO要执行的阅读全文

posted @ 2020-12-07 20:05 癫狂编程阅读(257) 评论(0) 推荐(0)

SQLite与Delphi XE4 （一）

摘要：时隔这么久，因为工作中需要将一些图片序列文件进行分析，然后将结果进行分组统计，而分组统计用SQL语法很容易实现，但是要求程序运行的环境中安装有庞大的数据库系统，经过网上的寻找，终于发现了SQLite。 SQLite是一款开源的（呵呵，对于我们来说就是免费的）、嵌入式关系型数据库，省去了专用于关系型数阅读全文

posted @ 2020-12-07 17:35 癫狂编程阅读(637) 评论(0) 推荐(0)

delphi在TMemo中实现高亮文字

摘要： delphi在TMemo中实现高亮文字在memo中实现类似IDE的效果，对数字及自定义的关键字高亮显示，并自定义关键字 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Contr 阅读全文

posted @ 2020-12-07 17:31 癫狂编程阅读(762) 评论(0) 推荐(0)

Delphi中用beep函数拼出节奏和歌曲

摘要： On Windows, Beep calls the Windows API MessageBeep.BOOL Beep( DWORD dwFreq, // sound frequency, in hertz DWORD dwDuration // sound duration, in millis 阅读全文

posted @ 2020-12-07 16:46 癫狂编程阅读(331) 评论(0) 推荐(0)

在oracle中插入数据报错：ORA-00984列在此处不允许

摘要：这里报错的原因就是当数据类型varchar2时没有使用单引号。没写单引号，不管是双引号还是什么都没写都会报这个错误。阅读全文

posted @ 2020-12-07 16:31 癫狂编程阅读(1145) 评论(0) 推荐(0)

建议在 "INI读写单元向导" 中增加部分内容。

摘要：我一般会在生成的文件后增加这样一段，能不能直接放到里面去？initialization IniOptions := TIniOptions.Create; AppPath := ExtractFilePath(Application.Exename); IniOptions.LoadFromFile 阅读全文

posted @ 2020-12-07 12:08 癫狂编程阅读(114) 评论(0) 推荐(0)

微软ADO程序员参考 UpdateBatch 方法

摘要：摘自：微软ADO程序员参考 http://www.office-cn.net/t/ado/index.html?htm_mdmthupdatebatch.htm UpdateBatch 方法将所有挂起的批更新写入磁盘。语法 recordset.UpdateBatch AffectRecords 阅读全文

posted @ 2020-12-05 13:14 癫狂编程阅读(477) 评论(0) 推荐(0)

oracle多表关联删除的两种方法

摘要：修改了上次的文章，网上的朋友对这篇博文提了意见，非常中肯，虽然上次是转载，但是我也为我的不专业表示歉意。这次是原创，所有内容均已经重写，并验证通过。先删除两个测试表，p_DropTable是一个判断表是否存在的存储过程，如果存在则删除，不存在则跳过。 CALL p_DropTable('T_DB' 阅读全文

posted @ 2020-12-05 12:04 癫狂编程阅读(2752) 评论(0) 推荐(0)

Delphi7 获取默认浏览器打开指定网页url地址

摘要：来自 unit Unit1; 百度 interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls,Registry,ShellAPI; type 阅读全文

posted @ 2020-12-03 18:34 癫狂编程阅读(743) 评论(0) 推荐(0)