-
Delphi 文件拖放获取路径实例
Delphi 文件拖放获取路径实例，用文件拖放的方式打开文件，本实例中虽然没有打开文件，但是获取到了文件路径，因此你就可以依此功能扩展成打开文件的功能。
实现方法使用了shellAPI,将Form1注册为文件拖放接收控件，说请请下载该源码。
- 2022-09-12 19:45:03下载
- 积分：1
-
形象的电子表-Delphi程序
Delphi编写制作一款形象的电子表（钟表）效果，模拟时钟，界面方面做成了圆形，看不见窗口的边框，像是透明的窗口，各个指针会走动，关于各个指针的移动及计算方法，有兴趣可参考：
vh := Hour/12.0*2*Pi;
vm := Min/60.0*2*Pi;
vs := Sec/60.0*2*Pi;
with Canvas do
begin
Pen.Width:=4;
Pen.Color := clBlack;
MoveTo(60,60);
LineTo(60+Round(25*Sin(vh)),60-Round(25*Cos(vh)));
Pen.Width:=2;
Pen.Color := clBlack;
MoveTo(60,60);
LineTo(60+Round(45*Sin(vm)),60-Round(45*Cos(vm)));
Pen.Width:=1;
Pen.Color := clRed;
MoveTo(60,60);
LineTo(60+Round(55*Sin(vs)),60-Round(55*Cos(vs)));
end;
窗体方面：这个圆盘窗口要是能移动就好了，不支持右键菜单，也不能关闭，关闭窗口需要按键盘上的ALT+F4。
- 2022-01-27 12:29:32下载
- 积分：1
-
Delphi创建透明图像效果的窗体
Delphi创建透明图像效果的窗体，这个示例实际是演示调用透明图片并显示的效果，用此制作成一个无边框且透明的窗口，制作时需要把此窗口设为Desktop型的。图片最好是BMP或PNG透明格式的，这样当图片显示时，会显示为一个无边框的透明窗口，没有图像的部分会显示窗口下层的内容，演示了一种制作透明窗口的方法。
- 2022-02-25 21:57:42下载
- 积分：1
-
Delphi 静音 左右声道音量控制
Delphi控制系统静音，两个声道均不发出声音，同时若在非静态状态下，可控制左、右声道的音量大小，在代码中@表示指向变量v的指针（32位），调用此函数的用意就是得到右声道的值，在调节左声道的时候，不改变右声道}数字前面加＄表示是十六进制数字，(t shl 8)表示t左移8位，部分参数设置代码如下：
procedure TForm1.FormCreate(Sender: TObject);
var
v:longint;
begin
waveoutgetvolume(0,@v);//得到现在音量，@v表示指向变量v的指针（32位）
trackbar1.Position:=hi(v);//设置左滑块的正确位置
trackbar2.Position:=hi(v shr 16);//设置右声道滑块的正确位置
end;
- 2022-06-02 00:55:40下载
- 积分：1
-
Delphi 实现窗体的全屏显示效果
Delphi 实现窗体的全屏显示效果，单击按钮后即可全屏。
- 2023-03-25 11:25:03下载
- 积分：1
-
圆角的窗体-Delphi代码实现方法
Delphi实现圆角的窗体效果，将矩形的窗口效果修饰为圆角的风格，如示例截图所示的效果，核心的几行代码如下：
begin
hr:=createroundrectrgn(0,0,width,height,20,20);//定义园角矩形(win API函数)
setwindowrgn(handle,hr,true); //设置园角窗口
end;
- 2022-08-18 21:29:53下载
- 积分：1
-
Delphi 使用Word作为自动化服务器
这个程序演示了使用Word作为自动化服务器，Delphi地自动化控制器是如何将一个查询结果插入到word文档中，返回应用参数.这个调用在英文和法文版的 Word中相同。对德文版的Word，这个过程名是翻译后的。如果这个过程不存在，存在一个不同的Word翻译版本，还可以插入中文Word，运行效果如图所示。
- 2022-04-29 13:18:27下载
- 积分：1
-
delphi 获取网页源码
delphi 获取网页源码
- 2023-01-22 10:05:04下载
- 积分：1
-
Delphi 隐藏或显示鼠标指针
Delphi 隐藏或显示鼠标指针，在编译后运行本程序生成的Exe程序，在窗口中单击鼠标左键，鼠标会消失，被隐藏了，再次单击后鼠标重现，很好的演示了在Delphi中如何显示或隐藏鼠标的操作。
- 2022-01-26 04:41:31下载
- 积分：1
-
Delphi 使DBGrid支持鼠标滚轮
Delphi 使DBGrid支持鼠标滚轮，测试前请确保程序已连接好数据库，否则会有很长一段时间反应，读取的数据会显示在DBGrid控件中，请在DBGrid组件中滚动鼠标滚轮，可将整个列表上下滚动，便于浏览数据，这个功能在一些软件中经常会遇到，具体编写思路请下载源码研究。
- 2022-04-12 01:26:52下载
- 积分：1
