工作是我的生活 我为工作而陶醉

 一、隐藏任务栏在windows中，系统的任务栏本质上也是一个窗口，其窗口类名为“shell_traywnd"。要实现对它的操作，可通过api函数findwindow和showwindow来达到目的。varwndhandle:thandle;wndclass:array[0..50] of char;beginstrpcopy(@wndclass[0],‘shell_traywnd‘);wndha

微软的每一个产品，无论功能还是界面设计都会带给我们一定的惊喜，比如OfficeXP、Office2003、Messenger的界面设计，早已成为众多软件竞相模仿的对象，就拿Messenger来说，我就见过好几套网络视频会议的软件都借鉴了它的界面风格。　　前段时间因为要在原来的软件上增加一个快捷键提示窗体，这个提示窗要求在显示的时候比较醒目美观能引起用户注意，显示后不影响用户操作，能够关掉。很自然的

SetWindowsHookEx　　HOOK钩子详细介绍 　　基本概念 　　钩子(Hook)，是Windows消息处理机制的一个平台,应用程序可以在上面设置子程以监视指定窗口的某种消息，而且所监视的窗口可以是其他进程所创建的。当消息到达后，在目标窗口处理函数之前处理它。钩子机制允许应用程序截获处理window消息或特定事件。 　　钩子实际上是一个处理消息的程序段，通过系统调用，把它挂入系统。每当特

虚拟串口就是当本地并没有对应的串口硬件设备，而为应用层提供串口设备一样的系统调用接口，以兼容原本使用本地串口的应用软件的“虚”设备。本文作者给出了一种在Windows平台上实现虚拟串口的方法，由此实现的“串口”具有真实串口完全相同的系统调用接口。 在很多应用中需要用到虚拟串口，如在Modem卡出现之前，已经有了接在计算机串口上的外部Modem，而且各种拔号程序也是通过串口与外部Modem通信的

Windows 2000/XP和2003等支持一种叫做/"服务程序/"的东西.程序作为服务启动有以下几个好处:(1)不用登陆进系统即可运行.(2)具有SYSTEM特权.所以你在进程管理器里面是无法结束它的.笔者在2003年为一公司开发机顶盒项目的时候,曾经写过课件上传和媒体服务,下面就介绍一下如何用Delphi7创建一个Service程序.运行Delphi7,选择菜单File-->New-->Ot

elphi的TService的輸入桌面切換 dfm:object CopyDeskService: TCopyDeskService  OldCreateOrder = False  OnCreate = ServiceCreate  OnDestroy = ServiceDestroy  AllowPause = False  DisplayName = Copy Desk Service 

--- Windows NT服务程序不同于一般的运行程序，它不需要NT登录进去，只需要开机进入NT系统便可以运行，一般用于系统服务方面的应用，学会编写NT服务程序对网络管理人员而言是非常重要的，Delphi4.0作为一种高效、快速、强大的开发语言，为开发NT服务程序提供了非常便捷的方法，加上其可视化界面以及与数据库的完美结合，使我们开发与数据库有关的NT服务程序变得非常简单，下面以编写一个NT定期

CallNextHookEx　　Winapi:调用下一个钩子　　CallNextHookEx(　　hhk: HHOOK; {当前钩子的句柄}　　nCode: Integer; {钩子代码; 就是给下一个钩子要交待的}　　wParam: WPARAM; {要传递的参数; 由钩子类型决定是什么参数}　　lParam: LPARAM {要传递的参数; 由钩子类型决定是什么参数}　　): LRESULT;

Windows图形驱动级远程屏幕传输的实现2008年04月28日 星期一 下午 04:35计算机屏幕图像的截取在屏幕的录制、计算机远程控制以及多媒体教学软件中都是关键术，基于Windows操作系统有多种截屏方法，研究的重点集中在如何快速有效的截取DBI（Device-Independent Bitmap）格式的屏幕图形数据。现在商业软件流行的截屏技术主要采取的Api Hook技术，但这种技术一次截

//转自 http://blog.youkuaiyun.com/delphi1234/archive/2008/02/20/2110095.aspx unit Unit1; interface uses Windows, Messages, SysUtils, Variants,

mORMot 的下载页面：https://synopse.info/fossil/wiki?name=Downloads 内有如下源代码下载地址mORMot的基础源码包： https://synopse.info/files/mORMot.7z下面2个包不知道是什么包，有知道的请告知Big Tablefrom https://synopse.info/files/S

内容摘要：OOP的英文全称是Object Oriented Programming，翻译过来就是面向对象编程。OOP是一种非常重要的编程思想。也许你会对这种抽象的东西不感兴趣，可是几乎任何一个高手都会告诉你：“语言并不重要，重要的是编程思想。”刚刚接触的Delphi的朋友，可能最感兴趣的就是它丰富、强大的VCL（可视化构件库）。仅仅向窗体上扔几个构件，甚至不用动手写代码，就能很容易地做出一个有实用

在程序运行过程中，往往出现一些意外错误状态而导致程序无法运行下去的情况。因此 在实现程序功能的同时，必须考虑如何处理程序运行过程中可能出现的各种异常情况。所谓异常是指打断程序正常流程的、非常见或意外的状态、打开文件时按路径找不到文件、不能分配所需的内存等。现本人结合实际就Delphi中异常的产生、来源以及实现异常处理的方法进行探讨。　　异常的来源 　　异常可由一些不同的资源产生，用户的程序可以因为

Delphi的接口陷阱参考：[http://www.CrazyCoder.cn/]现在我所知的有两大陷阱：陷阱一、接口的类型转换陷阱参考：[http://www.CrazyCoder.cn/]a) 不能把一个对象引用强制转换成这个引用的类型没有声明实现的接口，即使这个对象实际实现了这个接口（呵呵，优点拗口）。参考：[http://www.CrazyCoder.cn/]b) 当把一个对象变量赋给一个

在delphi7要实现XP效果的方式，简单省心的大致有以下三种：（当然用第三方控件除外） 1、就是将WIN32下的XPMainFest放入界面中,即会产生XP效果代码如下： unit Unit1; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, XP

users   ComObjprocedure saveToExcel();var   Ole:variant;   Ac,Ar,a,b:integer;begin   if not Form12.ADOQuery2.Active then   begin      ShowMessage(数据集没有打开);      Exit;   end;Try   Ole:=createoleo

 //声明:sndPlaySound( lpszSoundName: PChar; {声音文件} uFlags: UINT{播放选项}): BOOL;//uFlags 参数可选值:SND_SYNC = 0; {同步播放, 程序须等到播放完毕才向下执行}SND_ASYNC = 1; {异步播放, 在函数返回之后开始播放, 不影响程序继续执行}

//函数AddChild(const TagName: DOMString): IXMLNode; overload;AddChild(const TagName, NamespaceURI: DOMString): IXMLNode; overload;CreateElement(const TagOrData, NamespaceURI: DOMString): IXMLNode;Create

----Delphi为用户提供了一个方便的绘图环境,即某些控件的CANVAS属性(画布)。用户可以把某些控件的表面作为一张画布,在上面绘制各种图形或显示图像,但在CANVAS的使用过程中少不了一个特殊对象,那就是矩形RECT,灵活使用它会完成很多特殊的功能,为Delphi编制的Windows程序增加活力。RECT的特点----RECT既是一个特殊的数据结构，又是一个函数,它的作用就是定义一个矩形区

msg结构    typedef struct tagMSG{HWND hWnd; 所欲送达的窗口代码(handle)UINTmessage;消息为-Unsign 整数(int)WPARAMwParam;相关参数后文说明LPARAMtParam;相关参数后文说明DWORDtime 时间POINTpt 鼠标光标位置}MSG;CALL-BACK FUNCTION(回调函数) 窗口函数是在Regis

下面是个示例代码，你也可以将Canvas的brush style设置成bsClear,使得文本具有透明效果。uses Jpeg;procedure TForm1.Button1Click(Sender: TObject);var Bmp : TBitmap; Jpg : TJpegImage;begin try   Bmp := TBitmap.Create;   Jpg := TjpegImag

用Delphi开发DirectX控件 整理编辑：China ASP　　Microsoft推出的DirectX使我们在Windows9x下开发游戏软件便利了许多。一般在介绍DirectX 的资料里都讲的是如何用VC++来开发，其实inprise公司的语言也可以用来开发基于DirectX的游戏软件。我们这里用的是DirectX控件，它有Delphi3和Delphi4不同的版本。在http://www.

Delphi作为一种方便的可视化程序设计语言，一 直非常受大家喜爱。但它在图形处理、3D表现等方面 不很让人满意。如果说你要开发一个Windows95下的 3D游戏，你会用什么工具呢？DirectX!不少人会不加 思索地答道。然而接触过DirectX的朋友们都知道它 内部的结构复杂，一般来说结合VC开发是一个理想 的组合。而要在Delphi中利用DirectX SDK真是难上 加难。但现在一切都好

消息，就是指Windows发出的一个通知，告诉应用程序某个事情发生了。例如，单击鼠标、改变窗口尺寸、按下键盘上的一个键都会使Windows发送一个消息给应用程序。消息本身是作为一个记录传递给应用程序的，这个记录中包含了消息的类型以及其他信息。例如，对于单击鼠标所产生的消息来说，这个记录中包含了单击鼠标时的坐标。这个记录类型叫做TMsg，它在Windows单元中是这样声明的： type TMsg =

被这些修饰关键字修饰的函数，其参数都是从右向左通过堆栈传递的(__fastcall的前面部分由ecx,edx传)，　　函数调用在返回前要清理堆栈，但由调用者还是被调用者清理不一定。　　1、_stdcall是Pascal程序的缺省调用方式，通常用于Win32 Api中，函数采用从右到左的压栈方式，　　自己在退出时清空堆栈。VC将函数编译后会在函数名前面加上下划线前缀，在函数名后加上"@"和参数的字节

使用TSQLRestStorageInMemory 创建数据库的数据，增加10万数量大概400毫秒测试环境： delphi 10.2     moRMOT ： 1.18.2975unit Unit2;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, S