1 2 3 4 5 6 7 8 9 下一页 如果你在开发图形或多媒体应用程序,你可能正在为如何不使用窗体的标题栏而移动窗体发愁。其实只需用鼠标拖动窗体的客户区就可以了。 方法一 以下是完成上述功能最普通的方法:在窗体的private声明部分加入以下过程声明:procedure WMNCHitTest(...

2008-02-23 07:19:36

unit Unit1; interface uses Windows Messages SysUtils Classes Graphics Controls Forms Dialogs StdCtrls; type TForm1 = class(TForm) Label1: TLabel; Label2: TLabel; Label3: TLabel; Label4: TLabel; Label5: TLabel; procedure FormCreate(Sender: TObject);...

2008-02-23 07:19:35

这是本人自己制作的替换字符串中子串的函数,他可以从字符串中找出指定子串,并替换为另一子串。 function replacing(S,source,target:string):string; var site,StrLen:integer; begin {source在S中出现的位置} site:=pos(source,s); {source的长度} StrLen:=length(sou...

2008-02-23 07:19:33

1 2 3 下一页 摘 要：本文通过使用Delphi和Web Services技术开发短信应用程序的实例详细的介绍了如何在Delphi中开发基于Web Services技术的应用程序。 关键字：Delphi；Web Service；短信应用程序开发 一提起基于Web Services技术的应用程序开发，一般人首先想到的开发...

2008-02-23 07:19:33

如果一个TOPMOST窗口不是MainForm的话，那么即将将它设为总在顶端，它也会随着主窗口的前摆而前摆，后摆而后摆。那么怎么解决这个问题呢？ 先将窗口的BorderStyle设为bsNone,FormStyle设为fsStayOnTop。 procedure TForm3.CreateParams(var Params:TCreateParams); beg...

2008-02-23 07:19:31

1 2 下一页 Winamp的用户都知道,Winamp的播放列表或均衡器在被移动的时候,仿佛会受到一股磁力,每当靠近主窗口时就一下子被“吸附”过去,自动沿边对齐。我想让我的Winamp插件也具备这种奇妙特性,于是琢磨出了一 种“磁化”窗口的方法。该法适用于Delphi的各个版本。为了...

2008-02-23 07:19:31

在你的应用程序中,你可能会希望将应用程序的标题栏进行闪动,以提醒用户进行某种操作,本文介绍了如何使一个窗口的标题栏进行闪动。 闪动一个窗口的标题栏意味着改变它的标题栏的外观,例如它从活动变为不活动,或是从不活动变为活动等等。只要你能在Delphi 或者 C Builder...

2008-02-23 07:19:29

//串口初始化 procedure TForm1.BitBtn3Click(Sender: TObject); begin comm1.startcomm; end; //关闭串口 procedure TForm1.BitBtn4Click(Sender: TObject); begin comm1.StopComm; end; //发送数据 procedure TForm1.BitBtn1Click(Sender: TObject);{var str:string;...

2008-02-23 07:19:29

1 2 下一页 一、Win2000服务简介 服务程序（Service Application）是一种运行于WinNT的后台程序，每个服务程序（Service Application）中可能包含若干个服务（Service），每个服务就是其中的一个线程（该服务也可以创建多个子线程）。采用服务，应用程序可以获得特殊的...

2008-02-23 07:19:27

1 2 下一页 在Windows中提供了一个控制面板窗口，一个控制面板窗口就象Windows的控制中心。在窗口中有诸如 “系统”、“多媒体”图标，通过双击这些不同的图标，就可以打开不同的控制面板程序查看系统状况和对系统进行设置了。 如何在控制面板中添加自己的控制面板程序...

2008-02-23 07:19:28