![](https://img-blog.csdnimg.cn/20201014180756925.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
Delphi
文章平均质量分 74
yepemig
这个作者很懒,什么都没留下…
展开
-
使用indy的IdHTTPServer控件
unit Unit1;interfaceuses...... ActiveX,IdBaseComponent, IdComponent, IdCustomTCPServer, IdCustomHTTPServer,IdHTTPServer,IdTCPServer,IdContext;type......procedure Server1CommandGet(AContext: T转载 2009-01-12 22:30:00 · 3831 阅读 · 0 评论 -
Delphi + IIS + VbScript(*.asp) 实现多线上传下载和软件自动更新.
...准备写原创 2012-01-31 11:54:45 · 1099 阅读 · 1 评论 -
之前用Delphi随手写的软键盘SoftKeyBoard
之前用Delphi随手写的软键盘SoftKeyBoard源码下载:http://download.csdn.net/detail/yepemig/623805原创 2012-01-31 10:16:56 · 2540 阅读 · 0 评论 -
delphi 中的一个线程池单元的归纳说明
unit Ut_CustomThread;interfaceuses Classes, SysUtils, SyncObjs,Ut_ResourceStrings,Windows;Type //基本线程类 TBaseThread = class; //线程错误处理类 EThreadException = class(Exception); //线程等待错误处理类 EThread原创 2009-02-06 21:46:00 · 2056 阅读 · 0 评论 -
Delphi中的线程类(5,大结局)
回到前面CheckSynchronize,见下面的代码:function CheckSynchronize(Timeout: Integer = 0): Boolean;var SyncProc: PSyncProc; LocalSyncList: TList;begin if GetCurrentThreadID raise EThread.Cre转载 2009-01-14 20:12:00 · 755 阅读 · 0 评论 -
Delphi中的线程类(1)
猛禽[Mental Studio]http://mental.mentsu.com( 之一)Delphi中有一个线程类TThread是用来实现多线程编程的,这个绝大多数Delphi书藉都有说到,但基本上都是对TThread类的几个成员作一简单介绍,再说明一下Execute的实现和Synchronize的用法就完了。然而这并不是多线程编程的全部,我写此文的目的在于对此作一个补充。转载 2009-01-14 20:05:00 · 694 阅读 · 0 评论 -
TList, List.Pack 清除所有已是 nil 的对象
// Add、Count、Items[n]var List: TList; {声明 List} frmRed: TForm; {用于测试的对象, 这里选择了窗体}begin List := TList.Create; {建立列表} frmRed := TForm.Create(n转载 2009-01-14 01:27:00 · 980 阅读 · 1 评论 -
Delphi中的线程类(4)
临界区(CriticalSection)则是一项共享数据访问保护的技术。它其实也是相当于一个全局的布尔变量。但对它的操作有所不同,它只有两个操作:Enter和Leave,同样可以把它的两个状态当作True和False,分别表示现在是否处于临界区中。这两个操作也是原语,所以它可以用于在多线程应用中保护共享数据,防止访问冲突。用临界区保护共享数据的方法很简单:在每次要访问共享数据之前调用En转载 2009-01-14 20:11:00 · 666 阅读 · 0 评论 -
Delphi中的线程类(2)
首先就是构造函数:constructor TThread.Create(CreateSuspended: Boolean);begin inherited Create; AddThread; FSuspended := CreateSuspended; FCreateSuspended := CreateSuspended; FHandle := Be转载 2009-01-14 20:06:00 · 1162 阅读 · 0 评论 -
assert() 函数用法
assert宏的原型定义在中,其作用是如果它的条件返回错误,则终止程序执行,原型定义:#include void assert( int expression );assert的作用是现计算表达式 expression ,如果其值为假(即为0),那么它先向stderr打印一条出错信息,然后通过调用 abort 来终止程序运行。请看下面的程序清单badptr.c:#include #i转载 2009-01-14 01:24:00 · 450 阅读 · 0 评论 -
CreateWaitableTimer和SetWaitableTimer函数
用户感觉到软件的好用,就是可以定时地做一些工作,而不需要人参与进去。比如每天定时地升级病毒库,定时地下载电影,定时地更新游戏里的人物。要想实现这些功能,就可以使用定时器的API函数CreateWaitableTimer和SetWaitableTimer来实现了,这对API函数创建的时钟是比较精确的,可以达到100倍的10亿分之一秒。 函数CreateWaitableTimer和SetWaitab转载 2009-01-14 20:01:00 · 1129 阅读 · 0 评论 -
浅谈DELPHI指针
浅谈Object Pascal的指针 作者:Nicrosoft 阅读:5421 次 时间:8/26/2001 来源:Nicrosoft个人网站 大家都认为,C语言之所以强大,以及其自由性,很大部分体现在其灵活的指针运用上。因此,说指针是C语言的灵魂,一点都不为过。同时,这种说法也让很多人产生误解,似乎只有C语言的指针才能算指针。Basic不支持指针,在此不论。其实,Pascal语言本身原创 2009-01-12 22:38:00 · 461 阅读 · 0 评论 -
DELPHI 线程池代码
unit uThreadPool;{ aPool.AddRequest(TMyRequest.Create(RequestParam1, RequestParam2, ...)); }interfaceuses Windows, Classes;// 是否记录日志// {$DEFINE NOLOGS}type TCriticalSection = class(TOb原创 2009-01-12 22:35:00 · 803 阅读 · 0 评论 -
用Idhttp.post方法将客户端的文本提交给服务器的范例
var strMsg:string; sParams: TStringStream;begin sParams := TStringStream.create();IdHTTP1.Request.ContentType := application/x-www-form-urlencoded; try sParams.WriteString(参数1=结果&参数2=结果转载 2009-01-12 22:27:00 · 1812 阅读 · 0 评论 -
Delphi多线程处理(转载)
Delphi多线程处理(转载) 1-1 多线程的基本概念 WIN 98/NT/2000/XP 是个多任务操作系统,也就是:一个进程可以划分为多个线程,每个线程轮流占用CPU 运行时间和资源,或者说,把CPU 时间划成片,每个片分给不同的线程,这样,每个线程轮流的“挂起”和“唤醒”,由于时间片很小,给人的感转载 2009-01-13 00:39:00 · 1561 阅读 · 1 评论 -
Hook 概念
来自csdn 作者rivershan一、基本概念: 钩子(Hook),是Windows消息处理机制的一个平台,应用程序可以在上面设置子程以监视指定窗口的某种消息,而且所监视的窗口可以是其他进程所创建的。当消息到达后,在目标窗口处理函数之前处理它。钩子机制允许应用程序截获处理window消息或特定事件。 钩子实际上是一个处理消息的程序段,通过系统调用,把它挂入系统。每当特定的消息发出转载 2009-01-12 22:50:00 · 704 阅读 · 0 评论 -
在Delphi中调试COM+
由于COM+是执行在COM+的执行环境中,因此Delphi 的程序员无法像Delphi的分布式多层应用系统一样可以直接在 Delphi 的IDE 中设定应用程序服务器的断点来调试。 事实上, Delphi 仍然可以在 Delphi 的集成开发环境中调试 COM+组件,也可以让程序员在集成开发环境中在COM+组件的程序单元中设定断点,然后执行客户端应用程序调用 COM+组件。此时 Delphi转载 2009-01-12 22:49:00 · 628 阅读 · 0 评论 -
PGN,图像界面,换肤色
软件的“换肤”技术早已不是什么新鲜事了,但细心的朋友一定已经发现了,现在正悄悄地流行了一种新的改善视觉效果的方法——这里我斗胆定义为“换肤色”技术吧!用过Winamp 5、Windows MediaPlay 9、MSN Messenger 6、QQ2004这些新版本软件了吧,呵呵,全都采用了所谓换汤不换药的“换肤色”技术。挺有意思是吧,下面我们就“自己动手,丰衣足食”。 首先我用e转载 2009-01-12 22:47:00 · 1190 阅读 · 1 评论 -
delphi 实现虚拟打印, 远程集中打印
技术重点:说白了就是利用已安装在电脑中的打开印驱动, 打印出Prn文件.再用Prn文件在其它地方相同驱动的打印机上打印.1.从注册表(HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Print\Printers)中读出要监控的打印机的端口(Port)和设置(Attributes)保存备份.2.在注册表(原创 2012-01-31 10:54:47 · 4925 阅读 · 0 评论