内容列表
- 一种利用EXCEL快速写SQL语句的方法
- 复杂的SQL我从不手工写,都是在EXCEL中利用现有的表格直接粘贴到源程序中的,下面我详细介绍这种方法。下面这个插入过程有没有可读性?要知道每一行'+'号前面的内容都是从现成的EXCEL中直接粘贴过来的,工作量很小。pu_insert('fhd',[ &nb
- 分类:Delphi 查阅全文
- mscomm32的简单应用
- 风花雪月 e梦情缘网络代号:wnhoo or sos_admin网名:e梦缘Mail:[email protected]
因为看到很多网友对串口通信的问题,其中最多的是关于元件的选用与通信的实现。我想您不论用什么类型的控件操作rs232均是一样的,我比较喜欢用mscomm32,因为它是ms的,且是vb程式设计软件自带的,并且免费哦还有一个就是moxa的rs232专业开发包pcomm,到www.moxa.
- 分类:Delphi 查阅全文
- 钩子(HOOK)机制的使用
- 钩子(HOOK)机制的使用作者:e梦缘SetwindowsHookEx函数提供15种不同的消息监视类型,也就是15中不同的钩子。分别用于捕获某一特定类型或某一范围的消息(如:键盘消息,鼠标消息等)。我们这里仅以鼠标钩子的使用为例,讨论在DELPHI下怎样编写DLL程序和怎样在自己的程序中安装使用鼠标钩子函数。Windows提供API函数SetwindowsHookEx来建立一个Hook,通过这个函
- 分类:Delphi 查阅全文
- 程序间参数传递
- 风花雪月 e梦情缘网络代号:wnhoo or sos_admin网名:e梦缘Mail:[email protected]
功能:第一次執行的時候…會開啟project1.exe第二次執行的時候…不開啟project1.exe(因程式已執行)…但会将參數會丟給已執行的project1.exe第3次執行的時候…不開啟project1.exe(因程式已
- 分类:Delphi 查阅全文
- 用delphi实现ping
- 看了好多次有网友的提出关于用delphi实现ping的问题,今天又看到了;所以就将这个功能写成一个类,并且提供一个函数方便大家的使用!
函数procedure pinghost(ip:string;var info:string);ip:目标IP地址;info:ping了以后产生的信息(1)或(2);(1)成功信息ip 发送测试的字符数 返回时间(2)出错信息Can not find ho
- 分类:Delphi 查阅全文
- 调用DLL文件中的FORM
- 作者:e梦缘
好久发表文章了!!!
调用DLL文件中的FORM,具体实现过程如下:
library Project1;
uses
SysUtils,
Classes,Forms,windows,dialogs,
Unit1 in 'Unit1.pas' {Form1};
{$R *.res}
function showform(formname:str
- 分类:Delphi 查阅全文
- 程序关联实现
- 程序中readme是个.sos文件,点吉它实现如下:
基本实现如下:
unit Unit1;
interface
usesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs,Registry,shlobj, StdCtrls, ExtCtrls;
typeTForm1 =
- 分类:Delphi 查阅全文
- 传说中的DELPHI9--DiamondBack
- 昨天在MSN上碰到现在深圳的老朋友“太可怕”,他告诉我今年的BorCon上将会有DELPHI 9的正式消息,并发给了我这个:《Come to BorCon 2004 (US) to see the next Delphi release! - by John Kaster》。
但是很遗憾,距离BorCon 2004还有23天,我用GOOGLE搜了一下,没有找到比BDN上这
- 分类:Delphi 查阅全文
- 使用Dephi组件的生存期管理
- ?众所周知,创建型设计模式中的都会创建对象。可是对象在哪儿释放呢?当然,对于抽象工厂和工厂方法以及原型模式中,可以保存一个引用然后在需要的地方把它释放掉。可Singleton模式中却没有这样的引用,或是不能确定它是否创建了。此时,Dephi的组件的生存期管理机制就非常有用了,你只需要从TCompenent继承,并在构造函数中把自己的Owner设为另一个被管理的组件(一般来说是你的Form,Fram
- 分类:Delphi 查阅全文
- 自绘XP风格菜单
- 这是以前写的代码,自绘XP风格的菜单,硬盘坏了后以为没了,最后写的一个软件要自定义风格,“翻箱倒柜”的终于在我可爱的古董机^_^上找到了一个应用的例子。还是把它放到Blog上来,即可共享又可作为备用 :) 把主菜单的OnMeasureItem指向MeasureMainItem、OnAdvancedDrawItem指向DrawMainItem,子菜单的OnMeasure
- 分类:Delphi 查阅全文
- 在delphi中建立程序的快捷方式--并将快捷方式放在开始->程序->的启动组中
- 前几天应客户要求写这个东西,其实用VB,VC可能更快些,不过,我还是喜欢用DELPHI
首先 uses ActiveX,ComObj,StdCtrls,ShlObj,FileCtrl;
在指定文件夹建立当前应用程序才的快捷方式
procedure Tform1.MakeLink(Foldername:string;proName, lnkName, Description: string);
- 分类:Delphi 查阅全文
- 基于阻塞Socket(Indy)的远程控制类库-TNetCommand世界中的礼仪-02
- TNetImage类
源代码
// uNetImge .pas 屏幕图像相关操作
{{
作者:蛐蛐
时间:2004.5.26
}
unit uNetImage;
interface
uses
Classes, Windows, Graphics, Forms, Jpeg, SysUtils,
IdTCPServer, IdTC
- 分类:Delphi 查阅全文
- 大自然的BUG、人的BUG、软件的疑难杂症
- “每逢春夏,千鹤云集”的青城山,在此栖居了上千年的仙鹤纷纷飞走,从此失踪了。当地居民纷纷指责:这都是房地产大开发惹的祸!也许不是这个原因,也许是;全球多个国家出现气候异常,有没有根本的方法来防止呢,可能没有。人类的最大BUG就是癌症,以及艾滋病、SARS等的出现。没有根本的防治方法,也找不出根本的原因。搞软件的也总会碰到许多疑难杂症,有的解决了,有的无法解决。我们来对比分析
- 分类:Delphi 查阅全文
- 如何获取自己在程序中运行的外部EXE的Handle?
- 这是我在一个论坛的讨论稿,我想这些情况在实践程序设计过程中会常碰到,所以就将这些讨论资料写了下来:
作者:e梦缘
?
请问用什么方法可以运行一个外部的EXE并返回它的Handle?WinExec 返回不是该EXE的HandleShellExecute, ShellExecuteEx 也不是CreateProcess 返回的是 Process Handle到底要如何才可以返回和 GetWind
- 分类:Delphi 查阅全文
- Delphi 对象模型学习笔记
- 标题:Delphi 对象模型学习笔记关键词:Delphi 对象模型 作者:dREAMtHEATER难度:普通[] 中等[x] 高级[]http://dREAMtHEATER.yeah.netE-Mail:[email protected]完成日期:2004年08月21日
摘要 Borland Object Pascal 对象模型(现在已经
- 分类:Delphi 查阅全文
- 自己编写树(Tree)的封装类
- 在VCL中包含有一个TList类,几乎可以实现<链表>所有功能,Delphi的工程师真是伟大。但是在实际应用中需要TTree类,来实现<树>的功能,我写了两个类TyuTree,TYuNode。可以方便实现,树创建,结点增删、移动功能。请大家指教。
代码实例:
Procedure Test();
Var
YuTree: TyuTree;
Node:
- 分类:Delphi 查阅全文
- 生成BIG5字符集所有字符
-
program GenBig5Code;
{$APPTYPE CONSOLE}
uses
SysUtils;
Var
i, j: byte;
mBig5File: textfile;
begin
AssignFile(mBig5File, 'c:\Big5Code.bin');
Rewrite(mBig5File);
//BIG5字符集范围:
- 分类:Delphi 查阅全文
- dfm格式转换: 将二进制格式转为文本格式
- 在:DFM文件与XML文件互转 中,用到的dfm文件必须为文本格式, 如果是二进制格式, 处理就会出错.
但是在处理中如何判断dfm是二进制文件, 而且再将二进制文件转为文本格式呢. ---
dfm文件二进制格式时, 其文件会加一个文件头, 其中前3个字节来标识其为二进制, 这三个字节分别为:$FF, $0A, $00. 因为这三个字节在文本类型的文件中是不可能存在的,所以可以判断这3个字节就
- 分类:Delphi 查阅全文
- DFM文件与XML文件互转
- dfm文件是Delphi中存储窗体控件信息的,有时为了对大批量的dfm文件操作(如:批量替换控件、作检查等),往往不是太方便。XML对结构化的数据读写则很强,将文本类型的dfm转为xml后进行操作,再转回dfm存储大大方便了操作。
//DFM to XML
procedure Dfm2Xml(ADfmStrings: TStrings; AXml: IDsXmlDocume
- 分类:Delphi 查阅全文
- 为Windows Service添加服务描述
- 实际工作中,需要编写一个Windows服务,以实现分布式呼叫计费控制功能,当然,这个项目是由偶来完成啦,经过了俩周的开发终于被偶一举搞掂!再经过多次测试-修复-登记缺陷-再测试之后,一切OK了!
哈哈…………:)
高兴之余,在Wind
- 分类:Delphi 查阅全文