delphi
mochizuki
有十多年的开发经验,擅长仓库管理系统、进销存办公系统、企业管理系统研发
展开
-
delphi中多线程同步的一些方法
当有多个线程的时候,经常需要去同步这些线程以访问同一个数据或资源。例如,假设有一个程序,其中一个线程用于把文件读到内存,而另一个线程用于统计文件中的字符数。当然,在把整个文件调入内存之前,统计它的计数是没有意义的。但是,由于每个操作都有自己的线程,操作系统会把两个线程当作是互不相干的任务分别执行,这样就可能在没有把整个文件装入内存时统计字数。为解决此问题,你必须使两个线程同步工作。存在一些线程转载 2013-05-08 14:59:16 · 638 阅读 · 0 评论 -
在保存BLOB型字段时,怎么显示进度条?
来自:http://topic.csdn.net/t/20051129/08/4424653.html//以下我创建了一个模型,希望能对楼主有所帮助 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, C转载 2013-05-08 15:09:16 · 785 阅读 · 4 评论 -
FastReport中文菜单显示不全或者乱码解决方法
原出处已经不知道了,个人感觉第二种方法好,在新的XE3中也适用 方法一第一:将Source目录内的frxRes.pas 修改:procedure TfrxResources.AddXML(const Str: AnsiString);varStream: TStringStream;beginStream := TStringStream.Create(UTF8En转载 2013-05-08 15:15:27 · 2053 阅读 · 0 评论 -
FastReport分组打印并且指定每页行数(不足填空行)
var GPage,GIndex,FGIndex:integer; PageList:array of integer; PageLine: integer; PageMaxRow: integer=28; procedure PageFooter1OnBeforePrint(Sender: TfrxComponent);be转载 2013-05-08 15:19:53 · 1691 阅读 · 0 评论 -
动态的添加资源文件到可执行程序中
注:只对release版有用procedure TForm1.Button1Click(Sender: TObject);varmstrm1:TMemoryStream;update : dword;workdir:string;beginworkdir := ExtractFilePath(ParamStr(0));mstrm1 := TMemoryStrea转载 2013-05-08 15:55:01 · 974 阅读 · 0 评论 -
Delphi控制Excel的方法
转自:http://wenda.tianya.cn/question/24c090e4f4743b4f1 创建Excel文件 要在Delphi中控制Excel,就必须用到OLE自动化。现在一般采用OLE2来创建OLE对象,当激活一个OLE对象时,服务器程序仅在容器程序内部激活,这就是所谓的“就地激活”(in-place activation)。 创建Excel文件时,先创建一个OLE对象,然后在转载 2015-09-09 10:59:57 · 610 阅读 · 0 评论