-
Delphi 定义鼠标ANI动画光标
ANI动画鼠标，为自己的鼠标定制了一个带笑脸动画的光标，类似于定义鼠标的样式，定义动画光标将改变鼠标默认的样式，这样定义的动画光标格式为ANI文件。
屏幕截图抓不到动画光标，这是神马情况？
- 2022-10-08 15:50:03下载
- 积分：1
-
用Delphi编写锁定电脑的程序
Delphi锁定计算机，锁定电脑，不允许别人可以操作，类似Windows自带的锁定程序，其实锁定是非常简单的，不几行代码就能实现：
procedure TForm1.SpeedButton1Click(Sender: TObject);
begin
LockWorkStation;
end;
若需要完整的源码，请下载本源码包。
- 2022-04-28 20:57:54下载
- 积分：1
-
Delphi 不使用标题栏移动窗体
Delphi 不使用标题栏移动窗体，意思是说，平时大家拖动Windows窗口的时候，都是鼠标放在窗口的标题栏上，按住鼠标左键拖动窗体，但本源码实现的功能是，不以标题栏为操作目标，那是怎么实现的窗口拖动呢？请下载参见本源码。
- 2022-10-18 04:15:03下载
- 积分：1
-
Delphi 钩子函数创建鼠标操作的演示
Delphi 钩子函数创建鼠标操作的演示，作者：冉林仓，测试内容包括三个：DemoRecord.dpr DemoPlayBack.dpr Hktest.dpr。
安装与调试说明：
如果制作的演示程序工作不正常,请注意修改HKPROC.PAS，JOURNALPLAYBACKHOOKHANDLER函数,主要是修改返回的RESULT值.
记录的消息序列与屏幕窗口位置、分辨率有很大的关系,哪怕是窗口位置和大小仅仅偏一点,你的回放就不一定正常,请你在使用时要反复调试，以获得比较理想的效果。
- 2023-09-02 14:55:03下载
- 积分：1
-
Delphi 与Java TCPIP通信的范例
这个Delphi例子我觉得值得看，用Java写了TCPIP通信的服务端，用Delphi写了客户端，两者在不同的语言环境下运行，并建立TCPIP通信，服务端的运行效果如示例截图所示。为了不发生消息乱码的现象，两者程序编码采用UTF8格式，用UTF-8格式发送出去，收到的UTF-8数据转成ANSI，这一部分的参考请参见util_utf8.pas文件，消息发送、服务器建立连接部分，请参见Unit1.pas文件。
- 2022-08-23 01:44:09下载
- 积分：1
-
Delphi 邮件短信发送自动通知系统
Delphi 邮件短信自动通知系统，并且支持邮件发送、邮件帐户管理、类似于微软Windows中的Outlook邮件客户端的功能，可添加邮箱帐户自动收集，并在有新邮件时提示用户登录查看。本程序可发送适合到用户手机来通知邮件情况，部分功能需要依赖于硬件支持。
程序可最小化到windows托盘处显示图标，通过定义好的右键菜单来调出主窗口，虽然是一个发邮件的小程序，但是暗含的Delphi技巧有很多哦，欢迎下载源码研究学习。
1.实现邮件检测功能：
（1）注册账号，注意正确添写POP3服务器，用户名，密码。
2.实现发送短信功能：
（1）在注册账号时要添写正确的手机号码，并选中发送到手机的复选框。
（2）跟据自己购买的GSM模块说明书设置串口参数，一般是“19200，n,8,1”。
（3）添写当地短信中心号码，前面的86可加可不加，如果没有写，系统在按“确定”后会自动加上。
（4）注意：如果短信中含有中文字符，则一定要设成Pdu模式，否则短信可能发送失败。
- 2023-07-27 17:40:06下载
- 积分：1
-
Delphi 播放指定avi-mid-wav文件
Delphi 播放指定avi-mid-wav文件,这几种都是音频格式，因此这个可以说是播放音频文件的例子，控制面板中包括了常用的播放控制按钮，在此基础上，可写出一个Delphi音乐播放器，当然本源码比较早了，适合学习一些简单的Delphi音频编程技巧。
procedure TForm1.N2Click(Sender: TObject);
begin
if OpenDialog1.Execute then
begin
with MediaPlayer1 do
begin
Filename := OpenDialog1.FileName ;
Open;
DisPlayrect := Rect(1,1,Panel2.Width ,Panel2.Height );
Notify := true;
end;
end;
end;
- 2023-05-08 02:15:02下载
- 积分：1
-
Delphi 如何定义自已的鼠标单击事件
Delphi 如何定义自已的鼠标单击事件，本程序定义了监测鼠标中轮的事件，当用户按下鼠标中轮时，将监测到运作类型，并弹出窗口返回结果。
- 2022-05-13 22:55:23下载
- 积分：1
-
Delphi 鼠标双击TStatusBar时判断是哪一个panels
Delphi 鼠标双击TStatusBar时判断是哪一个panels，这个是把窗口的状态栏分隔，每个隔断中显示不同的内容，用鼠标双击不同的隔断，程序将判断用户点击了哪个隔断，并获取到该栏中的文字内容显示出来。
- 2023-02-09 01:20:03下载
- 积分：1
-
delphi 获取网页源码
delphi 获取网页源码
- 2023-01-22 10:05:04下载
- 积分：1
