摘要：the project already contains a form or module named pcm001怎麼解決 菜单Project -> Remove from project...找到你的包含pcm001(类名)单元，先移掉再加 阅读全文

摘要：Delphi中的Sender：TObject对象解析 procedure TForm1.Button1Click(Sender: TObject); begin end; 解析：Procedure是过程，TForm是窗体类，加上数字就是某个窗体，像TForm1就是Form1窗体。 Button1是你 阅读全文

摘要：Delphi中的窗体，有模式窗体与非模式窗体两种。两种窗体的调用方式不同，模式窗体使用ShowModal显示，非模式窗体使用Show显示。当显示模式窗体的时候你是不能操作本程序的其他窗体的，你不能把焦点从模式窗体转到其他窗体上。而非模式窗体则没有这种限制，你可以从一个非模式窗体切换到另外一个非模式窗 阅读全文

摘要：Delphi中MDI子窗口的关闭方式默认为缩小而不是关闭，所以当你单击子窗口右上角的关闭按钮时会发觉该子窗口只是最小化，而不是你预期的那样被关闭。解决办法是在子窗口的OnClose事件处理过程中加入如下代码，示例：procedure ChildForm.OnClose(Sender: TObject 阅读全文

摘要：以下是在之前的公司与别人共同参与制定的Delphi开发规范（5年前了，那时用的还是Delphi7,部分规则可能有些过时，但不整理了，觉得有用的人，自己整理成适合自己的开发规范吧）， 目 录一、序言 二、通用源代码格式规则2.1 缩格2.2 页边空格 2.3 Begin…End 配对 2.4代码文件中 阅读全文

摘要：给你段源码看一看用stringgird做得： 阅读全文

摘要：//要点18: 如果函数在接口区定义了, 就无需用 forward 提前声明了 unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, 阅读全文

摘要：第一种方法delphi 快速导出excel 调用: ToExcel('D:\a.xsl',QueryToExcel);//路径可以自定义 ********************************************************************************* 阅读全文

摘要：delphi的一个公用函数库 阅读全文

摘要：unit YzDelphiFunc; interface uses ComCtrls, Forms, Windows, Classes, SysUtils, ComObj, ActiveX, ShlObj, Messages, Graphics, Registry, Dialogs, Controls, uProcess, uCpuUsage, StrUtils, CommCtrl,... 阅读全文

摘要：一; delphi 快速导出excel uses ComObj,clipbrd; function ToExcel(sfilename:string; ADOQuery:TADOQuery):boolean; const xlNormal=-4143; var y : integer; tsList 阅读全文

摘要：由于在Windows安装了最近的更新(KB2982791, KB2970228)后，Delphi的IDE需要创建的一个文件%TEMP%\EditorLineEnds.ttr会被系统锁定，导致除非重新启动操作系统，否则Delphi 8~2010无法启动两次。 Delphi的IDE在启动时提取了一个字体 阅读全文

摘要：Delphi里使用TRichEdit，使用SetSelTextBuf时可以设置显示的字体格式，但是显示位置是在当前的插入光标后，如果人为改变插入光标的位置，比如在其他位置单，以后再插入的内容位置就没办法控制了。能不能限制每次新增加的内容都加到末尾？或者用其他的方式实现增加内容也可以，但是要能够控制这 阅读全文

摘要：int linecount=RichEdit1->Lines->Count; RichEdit1-> SelStart=SendMessage(RichEdit1-> Handle,EM_LINEINDEX,linecount,0); RichEdit1-> SelStart=RichEdit1->SelStart+linecount; 阅读全文

摘要：ParentBackground := False; 阅读全文

摘要：if pagecontrol.activepage=TabSheet1 then是在当前显示页 解决方案 PageControl1.ActivePage 解决方案 case activepageindex 解决方案 PageControl1.TabIndex 也可以判断当前选项是第几项 解决方案 c 阅读全文

摘要：BDE打包发布实例操作步骤如下：使用软件：Setup Factory 7.0打包把C:\Program Files\Common Files\Borland Shared中的所有文件和你的开发的应用程序都加上把Borland Shared、Database Engine、DBD、DBExpress四 阅读全文

摘要：Lazarus的设计目标是应用Free Pascal，所以所有凡是Free Pascal能运行的平台，Lazarus都可以运行。最新版本能运行于Linux，Win32和Mac OS。整个界面的外观和操作和Delphi IDE一样，因此，如果你会使用Delphi的话，用起Lazarus IDE来就一定 阅读全文

摘要：procedure TForm1.FormCreate(Sender: TObject); begin ADOQuery1.ExecuteOptions := [eoAsyncFetch];//设为异步读取 end; //ADOQuery的OnFetchProgress事件 procedure TF 阅读全文

摘要：本例效果图: 代码文件: 窗体文件: 阅读全文