Delphi
shixueli
这个作者很懒,什么都没留下…
展开
-
测试了一下ics和indy10 http都有经常断线的情况
但delphi7自带的idhttp和用.net写的就没有断线的情况, 是我哪里没写对吗?原创 2016-10-16 07:55:05 · 1070 阅读 · 0 评论 -
delphi showmodal特征
搜索PUSH 0B001,第一个便是。原创 2014-01-12 15:57:45 · 1162 阅读 · 0 评论 -
禁用win7的挂起窗口管理
procedure DisableProcessWindowsGhosting;var DisableProcessWindowsGhostingProc: procedure;begin DisableProcessWindowsGhostingProc := GetProcAddress( GetModuleHandle('user32.dll'), '转载 2014-01-12 12:51:03 · 1292 阅读 · 0 评论 -
delphi模态窗口跑到后面的解决办法
procedure TForm1.ShowForm2;begin Self.Enabled := False; try with TForm2.Create(nil) do begin try if ShowModal = mrOk then // Returned OK. Do something;转载 2014-01-12 12:48:54 · 4556 阅读 · 0 评论 -
解决An error occurred while attempting to initialize the Borland Database Engine (error $210D)
Insufficient memory for this operation" ($2501)Problem: Your application (or another BDE application) has exhausted the memory available to the BDE.Solution:1) Close all BDE applications.2) Fi转载 2013-11-28 11:16:11 · 50251 阅读 · 1 评论 -
多语言替换清单
TextOut WideCanvasTextOutTextRect WideCanvasTextRect原创 2013-11-22 08:54:26 · 821 阅读 · 0 评论 -
菜单相关操作
单击:SendMessage(Handle, WM_COMMAND, MENU_ID, 0);获取菜单标题:GetMenuString(ahmenu, MENU_ID, wndtext, 255, 0);原创 2013-11-21 21:25:49 · 562 阅读 · 0 评论 -
delphi2007的midas.dll有问题
如果表里有流字段,savetofile再loadfromfile后会丢掉一部分数据。delphi7的midas.dll就没有这个问题。原创 2013-10-10 21:56:38 · 771 阅读 · 0 评论 -
nativexml4.07版改动
1、取消了tsdfastxml,论坛上说改成了tcustomxml,但我没找到,应该是与tnativexml合并了。2、加载一个7.4M的文件,4.07的tnativexml 仅需187ms,而旧版的tsdfastxml需560ms。3、旧版解析不了的文件新版也能解析了。4、新版的nodecount是包含空格节点的,不包含空格节点的属性是ElementCount,而旧版是没有Eleme原创 2013-05-05 09:35:40 · 1577 阅读 · 0 评论 -
cxGrid拖动多选的方法
OptionsBehavior.PullFocusing = True。原创 2012-09-10 10:14:47 · 1018 阅读 · 0 评论 -
delphi性能笔记
技术方案二:由于是考虑到大数据量的批量插入,于是想到了ADO.NET2.0的一个新的特性:SqlBulkCopy。有关这个的性能,很早之前我亲自做过性能测试,效率非常高。这也是我推荐的技术方案。技术方案三:利用SQLServer2008的新特性--表值参数(Table-Valued Parameter)。表值参数是SQLServer2008才有的一个新特性,使用这个新特性,我们可以把一原创 2013-03-24 21:49:16 · 1281 阅读 · 0 评论 -
combobox用getwindowtext的方法取不到text,得用SendMessage才行
SendMessage(hchild, WM_GETTEXT,256, integer(@strCaption) );原创 2013-03-16 14:05:29 · 3603 阅读 · 0 评论 -
BPL一样可以像DLL那样输出函数的
unit Unit2;interfaceprocedure bplfunc(a: string); stdcall; export;implementationprocedure bplfunc(a: string); stdcall;beginend; exports bplfunc; end.原创 2013-02-20 23:36:08 · 595 阅读 · 0 评论 -
备忘:DELPHI控件
ImageEn 图像处理、 查看、分析控件。能够读取和保存多种图像格式,并能从扫描仪中(单页和多页)获取图像、捕获视频、添加滤镜效果、合并图像、选择图像区域(支持魔术棒)等等。压缩包含D7/BDS2006两个版本的安装包。Add-in Express VCL是第一个用于Borland Delphi的可视化Microsoft Office插件开发工具,支持Microsoft Offi原创 2012-07-30 07:21:31 · 1539 阅读 · 0 评论 -
备忘:Delphi
1、在主线程中sleep程序就死掉了,而在线程中sleep不会导致主线程死掉2、多线程要更新主界面的状态的话,要通过同步方法Synchronize才行,否则会报错的。3、同步方法Synchronize执行过程中,主线程也死掉了。原创 2012-09-30 09:34:38 · 420 阅读 · 0 评论 -
如何设计Delphi TCP客户端
要实现客户端断线重连、等待服务器消息各位要怎么做?我原来的做法是:procedure TClientThread.Execute;var Msg, strClassName, strActionName: string; i: Integer; Obj: TExObj; BufferLen: Integer; errorMsg: string; tick原创 2012-09-30 09:29:00 · 1707 阅读 · 0 评论 -
delphi传Url参数给JAVA
function URLencode(str:string):string;var i:integer; temp:string;begin for i:= 1 to length(str) do begin temp:=temp+'%'+inttohex(integer(str[i]),0); end; result:=temp;end原创 2012-03-13 21:58:16 · 918 阅读 · 0 评论 -
动态调用事件
tnotifyevent( GetMethodProp(btnK3Inj, 'onclick'))(btnK3Inj);原创 2014-01-16 16:31:46 · 549 阅读 · 0 评论 -
clientdataset 更新数据
dspdetail.UpdateMode := upWhereKeyOnly; errorcount := 0; dspdetail.ApplyUpdates(dsDetail.Delta, -1, errorcount);procedure TInvoiceDetailForm.dspdetailUpdateError(Sender: TObject;原创 2014-02-13 22:35:18 · 1673 阅读 · 0 评论 -
用idhttpserver做web服务器的问题
D7版本, 出现的严重问题有:1/ 有些机器不访问一下index.jsp就死机.2/经常出现connection time out的情况, 重试一下又没问题原创 2016-10-09 21:34:54 · 1934 阅读 · 0 评论 -
写屏版开票必须校验的项目
1/发票号码是否重复2/写完之后校验一下写过去的数据是否正确.原创 2015-10-09 17:10:17 · 357 阅读 · 0 评论 -
真正好用的delphi gzip解压代码
procedure DecompressGZip(AInStream, AOutStream: TStream);var pb1, pb2: Byte;begin AInStream.Seek(1, 0); AInStream.Read(pb1, 1); AInStream.Seek(2, 0); AInStream.Read(pb2, 1); AInS转载 2015-10-09 17:04:02 · 4482 阅读 · 1 评论 -
多次惨痛教训告诉我, 以时间戳获取数据必须设一个提前量
不要只从上一次获取开始, 而要从前一天或者前几个小时开始, 以免由于各种原因导致获取不到数据.原创 2015-10-01 22:46:00 · 4244 阅读 · 0 评论 -
不要用mssoap来调用webservice, 否则等着头大吧
mssoap经常坏的, 一坏就报各种错, 疲于奔命原创 2015-07-22 11:46:36 · 1335 阅读 · 0 评论 -
不要用delphi来写有复杂类型的webservice, 否则会死得很惨
.原创 2015-07-15 11:11:45 · 2836 阅读 · 1 评论 -
RollbackTrans的时候最好先判断是否InTransaction, 否则有错时真是没法查
...原创 2015-07-03 06:50:56 · 2757 阅读 · 0 评论 -
bulk insert 和 insert bulk的区别
网上大部分介绍的都是bulk insert , 只能从物理文件中导入, insert bulk要通过编程去导入, 没法直接通过sql实现, c#的SqlBulkCopy就是用这种方法来实现的.原创 2015-06-01 11:09:42 · 9053 阅读 · 1 评论 -
unidac这家公司还做了一个sdac, 据说支持Table-valued parameter, 但unidac又不支持
变态吧原创 2015-06-01 10:16:12 · 719 阅读 · 0 评论 -
将一个控件的imMode设为imClose之后, 其他控件的imMode也会变为imClose
除非显式指定其他控件的imMode属性, 例如设为imOpen.原创 2015-06-21 18:39:13 · 1114 阅读 · 0 评论 -
语法高亮控件
http://www.tmssoftware.com/site/advmemo.asp原创 2015-05-17 08:52:09 · 492 阅读 · 0 评论 -
DelphiIE插件开发
看这篇文章就差不多了:Delphi 开发ActiveX控件(非ActiveForm)另外要注意的是Delphi7 web deploy一次之后菜单就变灰了。Delphi6没这个问题。html文件中的cab版本号一定要和dll版本号一致,否则总是提示安装的。原创 2014-03-12 14:46:07 · 1658 阅读 · 0 评论 -
Delphi 服务程序编写
1、必须在Start事件中将Started设为True ,表示已经启动成功。2、Execute只执行一次,所以必须自己写消息循环。3、消息循环不能写在 Execute 事件中,否则无法停止服务,应该写在另一个线程中。原创 2014-03-20 18:08:32 · 571 阅读 · 0 评论 -
delphi tcp http proxy
If you're using Indy (highly recommended), then try using a TIdConnectThroughHttpProxy object from the IdConnectThroughHttpProxy unit. It's a descendant of TIdIOHandler, so connect an instance of转载 2014-03-20 16:46:58 · 1296 阅读 · 0 评论 -
如何设置多个webbrowser间不共享session
IE如果不共享session的话,要加上-nomergeexmaple:"C:\Program Files\Internet Explorer\iexplore.exe" –nomerge但不知道webbrowser控件怎么设原创 2014-03-29 18:39:21 · 3184 阅读 · 1 评论 -
ansi string TO PWideChar注意事项
转换方法当然是:PWideChar(WideString(strAnsi))但因为有很多地方要调用,我写了一个通用的函数:function StrToPW(s: string): PWideChar;begin result := PWideChar(WideString(s));end;结果问题来了,只有第一次调用时得到的值是对的,第二次调用得到的值就乱七八糟了。不原创 2012-08-14 23:15:42 · 2071 阅读 · 0 评论 -
Delphi内存表控件性能对比
2.5万条数据。加载数据集速度对比:clientdatasetMemTableEhkbmMemTabledxMemData65698410621359656101610311344625103110311343645.66666671010.333333104原创 2012-07-20 09:24:45 · 7174 阅读 · 0 评论 -
Delphi调用WMI读取USB设备的PID和VID【转】
<br />WMI(Windows®Management Instrumentation ) 非常强大,它可以以数据库的形式查询你的电脑的软件和硬件,在它的数据库里面,时刻保存着最新的软件信息和硬件信息,因此你可以用WMI来检测CUP主频、温度,读取WINDOWS的进程.........<br /> 本文就介绍如何使用WMI读取USB设备的PID和VID码<br />procedure TForm1.Button2Click(Sender: TObject);<br />var<br />Locator:原创 2011-05-09 07:48:00 · 2972 阅读 · 0 评论 -
windows API函数ascii版的不一定会调用unicode版的
CreateFileA就没有调用CreateFileW,只HOOK CreateFileW是不够的。原创 2011-02-20 09:50:00 · 623 阅读 · 0 评论 -
DataController的FocusedRecordIndex与FocusedRowIndex的区别
<br />FocusedRowIndex排序之后就不对了,FocusedRecordIndex就没有这个问题。原创 2011-03-05 16:06:00 · 1743 阅读 · 0 评论 -
正则表达式中的不包含一个词的写法
<br />/b((?!abc)/w)+/b转载 2010-11-21 19:37:00 · 2382 阅读 · 0 评论