因项目需要，我用Delphi写了一个连接数据库把数据导出到Sql文件的dll，其中使用了TADOQuery组件。其中只有一个导出方法：functionDataExport(path,ini_path:PChar):integer;写完之后，用delphi写了一个test.exe进行测试，发现可以正常使用。之后便把这个d...

[阅读全文]

关键字：Dialog、对话框、resizable1、问题的提出问题来自Stanley_Xu，希望得到只有关闭按钮（还可以有帮助），左上也没有程序的图标并且能够更改窗口大小的对话框。VCL中为TForm设置了BorderStyle和BorderIcons属性，用以简化窗口样式的设置（否则就要调用SetWindowLong...

[阅读全文]

MicrosoftOfficeInfoPath2003使用了多种XML技术，包括XSLT、XML架构、XHTML、XPath、DOM、XML签名和使用所有上述技术的XML处理器。这些技术由万维网联合会(W3C)（WWW联合会(W3C)：商业与教育方面的一个联合机构，该机构对与万维网相关的所有领域的研究工作进行监督，并促...

[阅读全文]

文/jorge如前所述，算法层的实现，不外乎两种操作：1。如果一个方块的数值等于周围未挖开的方块数目，则把周围所有方块标记为雷；2。如果一个方块的数值等于周围已经标记为雷的方块个数，则在该块上同时单击左右键。实际上，这只是最简单的两种判断（简单到甚至不该称之为“判断”，而只是例行公事而已），而比...

[阅读全文]

昨天在DFW上看到一个问题，要求“使程序窗口置于最低层（在桌面上）；点击“显示桌面”以后还是在桌面上”，琢磨了一下，实现了“让窗体在执行了‘显示桌面’以后仍旧显示在桌面上”，代码如下：unitUnit1;interfaceu...

[阅读全文]

大学期间基本没有什么编程经验，虽然上学期间相关的课程也学了一些，但那些只是基本的东西而已。比如C语言、比如数据结构、比如数据库。况且作为一个学生，一个比较懒的学生，我基本上是只学了那些老师所教的东西，所谓的“重点”。可以说，对于程序开发，我是一个门外汉。而大学毕业后，我的工作恰又和编程有关。作为...

[阅读全文]

procedureTForm1.DBGrid1DrawColumnCell(Sender:TObject;constRect:TRect;DataCol:Integer;Column:TColumn;State:TGridDrawState);vars:String;beginTDBGrid(Sender).Defau...

[阅读全文]

DFW里有朋友问：有多个jpg文件,如:1.jpg2.jpg3.jpg......怎样将这些文件以追加形式合并成一个新的jpg文件?也就是说1.jpg作为第一页,2.jpg作为第二页,如此类推.想了一下，思路就是把每个jpeg文件解码成位图以后进行拼接再编码为jpeguses...,Jpeg;......procedu...

[阅读全文]

这是阿亮第一次写文章，有不正确的地方，欢迎讨论指正。

[阅读全文]

unitUnit1;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,ExtCtrls,StdCtrls,jpeg;constLMouseDown=False;typeTForm1=class(...

[阅读全文]

unityaohaoqiU;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,Spin;typeTForm1=class(TForm)Button1:TButton;SpinE...

[阅读全文]

[原文]Thatiscorrect.ABPLisaDLL.(ButnotallDLLsareBPLs.)>ButIstillfoundsomedifferent,suchasthatIcancreatea>objectfromtheHostexeandthatpasstoaBPLandmodifyitsafely,bu...

[阅读全文]

我这有一个对当前页面的设置代码varmmm,nnn,aaa:OleVariant;beginmmm:=wdLine;nnn:=1;aaa:=wdFieldPage;WordApp.ActiveWindow.ActivePane.View.SeekView:=wdSeekCurrentPageHeader;WordApp...

[阅读全文]

unitjisuanqiU;interfaceusesWindows,Messages,SysUtils,Variants,Classes,Graphics,Controls,Forms,Dialogs,StdCtrls,ExtCtrls;typeTForm1=class(TForm)Button1:TButton;B...

[阅读全文]

Delphi的属性是一个很有特色的功能，这一特性在C#里得到了很好的继承。对于一个类来说，属性是对类中的数据进行有效修改和访问的特殊接口。在VCL中，被published的属性还有一个特性，就是可以在界面设计过程中对属性进行设置.属性的类型数字、字符、布尔、枚举、TStrings、集合，类对象或者接口类型等示例:TEn...

[阅读全文]

如何写出象TTable,TAdoTable,Tquery,TAdoQuery等控件一样的自动下拉显示Field属性DelphiVCL在Delphi中有很多源码，但是有些关键的属性编辑器却找不到，下面我将举几个例子来说明一下我们可以研究一下TDBEdit的两个关键属性一个Datasource,DataField.示例如下...

[阅读全文]

libraryDBInstall;{ImportantnoteaboutDLLmemorymanagement:ShareMemmustbethefirstunitinyourlibrary'sUSESclauseANDyourproject's(selectProject-ViewSource)USESclausei...

[阅读全文]

请看下面这段代码：procedureTForm1.Button1Click(Sender:TObject);varstrColor:string;i,R,G,B,p:integer;strlist:TStringList;beginstrColor:=medt.Text+'-';strlist:=TStringList...

[阅读全文]

关于SQLDMO的使用2005-4-516:13:52lw549sqldmo.dll是一个com,安装SQLServer后位于ProgramFiles\MicrosoftSQLServer\80\Tools\Binn文件夹下,关于sqldmo能做什么的问题,不是本文讨论的重点,这里只说明如何使用该com,现在开始。第一...

[阅读全文]

文/jorge如上述，本程序分为了接口层和算法层。上述全局变量和常量，基本都属于接口层的内容。下面，来看接口层的具体实现。其工作的第一步，是要捕获扫雷窗口并取得其信息。这由函数GetMineWindow来完成：=//试图取得可用的扫雷窗口，返回值表示是否成功。若成功，则全局变量//MineWnd、MineDC、Area...

[阅读全文]

使用CreateOleObject方法对WORD文档操作具有先天所具备的优势，与delphi所提供的那些控件方式的访问相比，CreateOleObject方法距离WORD核心的操作“更近”，因为它直接使用OFFICE所提供的VBA语言对WORD文档的操作进行编程。以下是我在本机上所做的实验，机器...

[阅读全文]

不是由BORLAND提供的组件叫第三方组件：安装方法：就目前常见的各种形式的组件的安装方法介绍一下。1只有一个DCU文件的组件。DCU文件是编译好的单元文件，这样的组件是作者不想把源码公布。一般来说，作者必须说明此组件适合Delphi的哪种版本，如果版本不对，在安装时就会出现错误。也正是因为没有源码，给使用者带来了不便...

[阅读全文]

花了一个下午翻了MSDN,写了这个例子,为了安全,我用Delphi建了个什么也没有作的程序prjzzhost.exe,将它用作被注入的宿主进程.写了一个TestDll.Dll,里面只有一个Log函数,用来在文件Test.Txt中输出信息.最重要的一个程序project1.exe是用来注入的.测试环境:windowsse...

[阅读全文]

Delphi自带Web应用示例Iserver.dll的正确设置　　　　一次偶然的机会，我对将delphi自带的iserver.dll　Web应用服务器放到windowsxppro上运行，结果发现其初始的文本甚而显示正常，而当我点击其页面中访问数据库的链接时，则总是提示服务器内错误（http500)。在肯定自己的iis目...

[阅读全文]

文/jorge有了前述的数据，编写接口层似乎已经不成问题了。现在来构思一下程序运行的过程。说句实话，那种对于某种变化实时作出响应的程序，一般都用什么方法编成，本人并不很了解，推测无非是两种思想，一种是用一个线程不断地对这个变化进行检查，发现改变则动作；另一种是注册一个类似于钩子的东西，用回调函数来处理。无疑第二种方式要...

[阅读全文]

procedureTDM.CopyDbDataToExcel(Target:TDBGridEh;mb,FileName:string);variCount,jCount:Integer;XLApp:Variant;Sheet:Variant;beginScreen.Cursor:=crHourGlass;ifnotVa...

[阅读全文]

//---初始化varwApp,work:Variant;trywApp:=GetActiveOleObject('word.Application');exceptwApp:=CreateOleObject('word.Application');end;//---替换字符wApp.selection.find.te...

[阅读全文]

{发这篇文章之前一直没装宽带，起初是因为看到别人的窗体样式很好看，可是很多都用到了控件，体积比较大再者界面也看多了，直到WINBLANDS（一款WINDOWS界面美化软件）中的CHRISTMASTIME样式的窗口让我眼睛一亮，就是它了，正所谓食色性也，身为男人的偶当然也不例外，所以就想办法将它请到我的窗口来，刚开始的时...

[阅读全文]

在Win32标准控件库中(comctl32.dll)的控件绝大部分的控件都支持自画(OwnerDraw)功能的设置，这里以按钮为例子说说此类控件在delphi中的编写方式以及应该注意的问题！由于标准的按钮都有一套规定的外观标准（由windows的comctl32.dll中的代码绘制），为了给用户一个自己绘制控件的机会，...

[阅读全文]

摘:http://www.gaoso.com/Article/program/Delphi/200501/8735.html--EhLib控件的强大表格处理能力，相信使用过的朋友都有领会，但DBGrdiEh没有发布自动根据栏宽的方法，的确是有点遗憾。不过还好，在DBGrdiEh的OptionsEh中，我们可以发现有个d...

[阅读全文]