摘要: 通 过 响 应“wm_NCHitTest” 消 息 来 移 动 窗 体。Windows 发 送“wM_NCHitTest” 消 息 来 确 定 鼠 标 操 作 是 否 发 生 在 窗 体的 客 户 区, 或 边 框 的 特 殊 区 上( 非 客 户 区)。如 果Windows 发 现 用 户 单 击 了 窗 体 标 题, 系 统 将 移 动 窗 体,... 阅读全文
posted @ 2010-09-20 21:20 °ι 、曲 终 阅读(414) 评论(0) 推荐(0)
摘要: TStrings是一个抽象类,在实际开发中,是除了基本类型外,应用得最多的。常规的用法大家都知道,现在来讨论它的一些高级的用法。先把要讨论的几个属性列出来:1、CommaText2、Delimiter & DelimitedText3、Names & Values & ValueFromIndex先看第一个:CommaText。怎么用呢?用代码说话:代码Code highl... 阅读全文
posted @ 2010-09-20 21:15 °ι 、曲 终 阅读(359) 评论(0) 推荐(0)
摘要: 1)创建线程MsgThread := TMsgThread.Create(False) ; //创建并执行线程MsgThread := TMsgThread.Create(True) ; //创建线程后挂起constructor Create(CreateSuspended: Boolean); 中的参数CreateSuspended表示创建后是否挂起线程。(2)设置线程里没有设置循环执行的话,且... 阅读全文
posted @ 2010-09-20 21:12 °ι 、曲 终 阅读(608) 评论(0) 推荐(0)
摘要: Delphi中有一个线程类TThread是用来实现多线程编程的,这个绝大多数Delphi书藉都有说到,但基本上都是对TThread类的几个成员作一简单介绍,再说明一下Execute的实现和Synchronize的用法就完了。然而这并不是多线程编程的全部,我写此文的目的在于对此作一个补充。线程本质上是进程中一段并发运行的代码。一个进程至少有一个线程,即所谓的主线程。同时还可以有多个子线程。当一个进程... 阅读全文
posted @ 2010-09-20 21:07 °ι 、曲 终 阅读(6294) 评论(0) 推荐(1)
摘要: 代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--varhwnd:Integer;beginhwnd:=FindWindow('Notepad',nil);SetForegroundWindow(hwnd);keybd_event(VK_CONTRO... 阅读全文
posted @ 2010-09-20 20:56 °ι 、曲 终 阅读(5213) 评论(0) 推荐(0)
摘要: TreeView由节点构成,建树通过对TreeView.items属性进行操作。Items是一个TTreeNodes对象,这是一个TTreeNode集。一、针对TTreeNodes,也就是 TreeView.Items,有这些属性:1、count,节点个数。2、item[index] ,通过index得到节点。二、针对TTreeNodes,也就是 TreeView.Items,常用的添加节点的操作... 阅读全文
posted @ 2010-09-20 20:52 °ι 、曲 终 阅读(277) 评论(0) 推荐(0)
摘要: 代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--//自定义事件过程,过程名可以任意取procedureTForm1.OnClick(Sender:TObject);beginifSenderisTButtonthenbeginifTButton(S... 阅读全文
posted @ 2010-09-20 20:51 °ι 、曲 终 阅读(2137) 评论(0) 推荐(0)
摘要: 代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--{WB_Set3DBorderStyle}procedureWB_Set3DBorderStyle(Sender:TWebBrowser;bValue:Boolean);varDocument:IHT... 阅读全文
posted @ 2010-09-20 20:49 °ι 、曲 终 阅读(1734) 评论(0) 推荐(0)
摘要: 很多时候要用到相差多少天,多少周,多少秒,查了一下资料,整理如下:首先 uses dateutils;先自己做了个实例,相关代码如下:代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--usesdateutils;procedureTForm1.But... 阅读全文
posted @ 2010-09-20 20:47 °ι 、曲 终 阅读(2594) 评论(0) 推荐(0)
摘要: BMDThread控件是一套相当成熟的线程控件,使用它可以让你快速的创建、管理线程。 可以到CSDN或者盒子上下载BMDThread控件。 下面我们用多线程模拟客户端发送文件的例子来简单认识一下它。 在窗体中放置一个TIDClient,TBMDThread,TBMDThreadGroup.三个TEdit,两个按钮(开始线程,结束线程),一个MEMO用于接受线程结果信息 功能:使用IDTCPCli... 阅读全文
posted @ 2010-09-20 20:44 °ι 、曲 终 阅读(723) 评论(0) 推荐(0)
摘要: 在memo里面的OnKeyPress里面加入 if Key>#127 then Key:= #0; 即可!!! 阅读全文
posted @ 2010-09-20 20:40 °ι 、曲 终 阅读(247) 评论(0) 推荐(0)
摘要: [代码]刚遇到这个问题就发上来了 这个".."真好用啊记住在你的edit编辑框里面在KeyPress里面加入代码哦! 阅读全文
posted @ 2010-09-20 20:39 °ι 、曲 终 阅读(214) 评论(0) 推荐(0)
摘要: 常数名称 十六进制值 十进制值 对应按键 VK_LBUTTON011鼠标的左键VK_RBUTTON022鼠标的右键VK-CANCEL 033Ctrl Break(通常不需要处理)VK_MBUTTON044鼠标的中键(三按键鼠标)VK_BACK088 Backspace键VK_TAB099 Tab键VK_CLEAR0C12Clear键(Num Lock关闭时的数字键盘5)VK_RETURN 0D13... 阅读全文
posted @ 2010-09-20 20:36 °ι 、曲 终 阅读(702) 评论(0) 推荐(0)
摘要: @:取址运算符; var int:integer; p:^integer; new(P); int:=24; p:=@int; dispose(P); ^:指针的引用解析操作符; var pint:^integer; new(pint); showmessage(inttohex(integer(@pint),8); pint^:=$ff; showmessage(inttohex(pint^,4... 阅读全文
posted @ 2010-09-20 20:34 °ι 、曲 终 阅读(420) 评论(0) 推荐(0)
摘要: 代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--unitwdRunOnce;{********************************************brief:让程序只运行一次*autor:linzhenqun*date:2005... 阅读全文
posted @ 2010-09-20 20:29 °ι 、曲 终 阅读(498) 评论(0) 推荐(0)
摘要: //判断文件是否存在 FileExists//判断文件夹是否存在 DirectoryExists//删除文件 DeleteFile; Windows.DeleteFile//删除文件夹 RemoveDir; RemoveDirectory//获取当前文件夹 GetCurrentDir//设置当前文件夹 SetCurrentDir; ChDir; SetCurrentDirectory//获取指定驱... 阅读全文
posted @ 2010-09-20 20:27 °ι 、曲 终 阅读(283) 评论(0) 推荐(0)
摘要: 代码 Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/--//增加i:=listview1.Items.Count;withListView1dobeginListItem:=Items.Add;ListItem.Caption:=IntToStr(i);... 阅读全文
posted @ 2010-09-20 20:21 °ι 、曲 终 阅读(1387) 评论(0) 推荐(0)
摘要: 当您使用完对象后,您应该及时撤销它,以便把这个对象占用的内存释放出来。您可以通过调用一个注销方法来撤销您的对象,它会释放分配给这个对象的内存。 Delphi的注销方法有两个:Destroy和Free。Delphi建议使用Free,因为它比Destroy更为安全,同时调用Free会生成效率更高的代码。 您可以用下列的语句释放用完的Employee对象: Employee.Free;  和Creat... 阅读全文
posted @ 2010-09-20 20:17 °ι 、曲 终 阅读(373) 评论(0) 推荐(0)
摘要: 在Delphi中,也有与C相似的预编译指令,虽然该类指令只在当前的单个文件有效(也有可能是笔者未全面了解该类指令的真正用法),但是这一类指令对于进行多版本的制作工作(如从标准版中出学习版),确实有着相当不错的用途。 一.指令介绍:1.DEFINE指令:格式:{$DEFINE 名称} 说明 :用于定义一个在当前单元有效的符号(Symbol)。定义了 之后可以使用IF DEF和IFNDEF指令来判断该... 阅读全文
posted @ 2010-09-20 20:16 °ι 、曲 终 阅读(236) 评论(0) 推荐(0)
摘要: 1.登不了大雅之堂地理解几个概念说到类和对象,我们不能不提及这样几个概念:类,对象,实例。就我个人觉得可以这样来理解:对象指的是泛称,自然界的任何实体都可以看成一个对象;而类则是以这些对象某些特征而分成的一系列的种类;实例则是特指属于某一个类的一个对象。好啦,这些大道理我就不用多说了。不如来一个“背道而驰”的作法,我们用Delphi code 来阐述这些外国人提出的一些令我... 阅读全文
posted @ 2010-09-20 20:13 °ι 、曲 终 阅读(438) 评论(0) 推荐(0)
摘要: [代码] 阅读全文
posted @ 2010-09-20 20:07 °ι 、曲 终 阅读(332) 评论(0) 推荐(0)
摘要: 转自:万一老师的 Delphi 博客[代码] 阅读全文
posted @ 2010-09-20 20:04 °ι 、曲 终 阅读(340) 评论(0) 推荐(0)
摘要: 1)创建线程 MsgThread := TMsgThread.Create(False) ; //创建并执行线程 MsgThread := TMsgThread.Create(True) ; //创建线程后挂起 constructor Create(CreateSuspended: Boolean); 中的参数CreateSuspended表示创建后是否挂起线程。 (2)设置线程里没有设置循环执行... 阅读全文
posted @ 2010-09-20 19:59 °ι 、曲 终 阅读(254) 评论(0) 推荐(0)