1. 由于使用ado等引起的异常。2. 若是子线程或某方法操作ado可在该方法开头和结尾分别加上：function myfunbeginCoInitialize(nil); // your code;CoUninitialize; end;3. 在主方法加入该句子有时候不能解决问题，因为默认是初始化...
分类：
其他好文 时间：
2014-08-01 18:45:02
阅读次数：
172
delphi服务程序(service)的调试方法 ? ? ? ? ??????? delphi service 调试 方法一： 1.调试delphi 写的服务程序，有这么一个办法。原来每次都是用attach to process方法，很麻烦。并且按照服务线程的执...
分类：
其他好文 时间：
2014-08-01 16:21:12
阅读次数：
263
最近一次使用DELPHI做项目是使用DELPHI2009，为了访问本地数据库方便，使用ACCESS数据库，不需要安装驱动，（WINDOWS自带），但是ACCESS数据库的性能确实很糟糕，通过ADO连接，INSERT 1000条数据平均在1.5秒以上。 面前面临一个新的项目，本地数据库是继续用ADO，...
分类：
数据库 时间：
2014-08-01 15:42:41
阅读次数：
311
格式化文本，动态添加空格functionformatStr(constsrcStr:string;Leng:integer):string;
var
i,iLen:integer;
begin
//先把原字符串赋值给返回字符串Result
Result:=srcStr;
//计算相差多少空格
iLen:=Leng-Length(srcStr);
//在返回字符串后，补齐空格
fori:=1toiLendo
begin
..
分类：
其他好文 时间：
2014-08-01 13:55:42
阅读次数：
168
Delphi在Webbrowser中插入 HTML/java script代码使用方法将下面的代码赋值到1个记事本里保存，然后保存为xxx.htm就可以看到效果使用PasteHtml实现功能的事件 Windows Media播放器 mp3 mp4 Windows Real Player Flash ...
分类：
Web程序 时间：
2014-08-01 13:14:01
阅读次数：
403
菜单的项目是否可用 TPopupMenu.OnPopup事件
把代码放在这里面判断 // ------------------------------------------------------------------------------
procedure Tfrm_Main.pm_Edi...
分类：
其他好文 时间：
2014-08-01 13:13:41
阅读次数：
202
//Delphi动态建立WebBrowerunit Main;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = c...
分类：
Web程序 时间：
2014-08-01 13:07:31
阅读次数：
242
如何知道 Treeview,的节点是根节点 procedure TForm1.TreeView1ContextPopup(Sender: TObject; MousePos: TPoint;var Handled: Boolean);beginif TreeView1.Selected.IsFirs...
分类：
其他好文 时间：
2014-08-01 12:58:31
阅读次数：
182
{获取C盘的卷标格式化硬盘卷标改变} //GetHardDiskSerial('c:\') functionGetHardDiskSerial(Drive:string):string; varVolumeSerialNumber:DWORD; MaximumComponentLength:DWOR...
分类：
其他好文 时间：
2014-08-01 12:57:51
阅读次数：
154
unitUnit1; interface uses Windows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms, Dialogs,StdCtrls; type TForm1=class(TForm) Button1:TButt...
分类：
其他好文 时间：
2014-08-01 12:57:41
阅读次数：
198
