-
Delphi 记录文件的读写
Delphi 记录文件的读写，这个程序非数据库程序，实际上也不是文件读写程序，只是使用主窗口、子窗口在这之间传值。在子窗口中输入数据，确定后，会将数据添加到主窗口的StringGrid中，然后通过修改命令，从StringGrid中再读取出数据，进行修改保存，演示了文件内容的读取和写入的操作过程 。
- 2022-02-12 09:49:41下载
- 积分：1
-
Delphi 设定Windows屏幕分辨率的方法和示例代码
Delphi 设定Windows屏幕分辨率的方法和示例代码：
function TForm1.DynamicResolution(X, Y: word): BOOL;
var
lpDevMode: TDeviceMode;
begin
Result := EnumDisplaySettings(nil, 0, lpDevMode);
if Result then
begin
lpDevMode.dmFields := DM_PELSWIDTH Or DM_PELSHEIGHT;
lpDevMode.dmPelsWidth := X;
lpDevMode.dmPelsHeight := Y;
Result := ChangeDisplaySettings(lpDevMode, 0) = DISP_CHANGE_SUCCESSFUL;
end
- 2023-04-22 01:05:03下载
- 积分：1
-
Delphi 定制自己的幽灵程序
Delphi 定制自己的幽灵程序，这个程序在Windows托盘处显示图标，而且退出后在进程中仍会运行，像幽灵一样，托盘处可右键弹出菜单，本程序主要是图标和菜单的一些操作，属于UI界面的范畴吧，这是我个人认为的，部分代码摘录：
NormalIcon,DisabledIcon:TIcon;
//正常和失效两种情况下的图标
Status:Boolean;
//标志"允许使用"还是"禁止使用"
procedure InstallIcon;
procedure ChangeIcon(s:Boolean);
procedure UnInstallIcon;
procedure IconOnClick(var message:TMessage); message MI_ICONEVENT;
//捕捉自定义消息MI_ICONEVENT的过程IconOnClick的声明
- 2023-04-07 01:50:03下载
- 积分：1
-
Delphi 实现的窗体下拉动画效果
Delphi 实现的窗体下拉动画效果，以下拉动画的方式显示一个窗口，关闭时同样有动画效果，只不过是上拉效果，让窗体变生成了，传统的窗口打开方式的确会让人觉得不新奇了，关于下拉和上拉，关键代码先帖上来，完整实例请下载本源码：
begin
AnimateWindow(Self.Handle, 250, AW_VER_NEGATIVE or AW_HIDE);
end;
procedure TForm1.FormShow(Sender: TObject);
begin
AnimateWindow(Self.Handle, 250, AW_VER_POSITIVE);
end;
- 2022-02-22 05:35:01下载
- 积分：1
-
Delphi+Interbase-Code-汽配进销存源码-源代码全-使用手册-钻石精品
(R)-Delphi+Interbase-Code-龙邦汽配进销存源码-源代码全-使用手册-钻石精品
- 2022-03-16 11:47:13下载
- 积分：1
-
Delphi 判断字符串是否为日期或时间
Delphi 判断字符串是否为日期或时间，检查用户输入的时间格式是否正确，判断用户输入的是否是时间字符串，这个虽然麻烦些，不过这个例子将问题简单化，有兴趣的参考源码。
- 2022-08-24 16:56:14下载
- 积分：1
-
Visual C# 调用声音控制对话框
Visual C# 调用声音控制对话框，在windows Xp下表现挺好，在Windows7有些问题，调用的面板并不会显示出来，这是为何呢？windows调用 声音对话框的实例 ，基于Delphi7源码实现。
- 2022-03-10 20:40:03下载
- 积分：1
-
方格变换的Delphi图像显示，类似于马赛克
方格变换的Delphi图像显示，类似于那种动态的马赛克效果，电视上经常见到这种图像切换的效果，当然网页上的一些焦点图切换也会常见到这种图像转场的过渡效果，相比直来直去的切换，增加了一些视觉效果，不至于那么单调。
本效果适用的图像格式了BMP位图，其它图片格式未做测试。
- 2022-07-18 02:39:41下载
- 积分：1
-
Delphi开发的模型飞机测控平台 附源代码
Delphi开发的模型飞机测控平台 附源代码，里面主要涉及多线程操作、GPS、传感器、端口操作等一系列系统控制的技巧，还包括了许多操作函数，比如绘制飞行轨迹的函数、绘制坐标刻度的函数、用户界面读取发送数据指令的函数、还有线程的同步、线程互斥等。
由于有调试目的，如果要求发送字符格式的数据，就直接发送用户输入的字符串，其他情况下，都是发送打包好的数据矩阵。
调用其它函数实现发送串口数据的功能。注意函数GetData还没有实现线程的互斥，目的是把发送的数据保存在各个线程中。
在此提示： 由于传输系统总会有一定的吴码率，那么为了避免轨迹图出现问题，例如坐标范围过大需要除去粗大误差，考虑到模型飞机的飞行速度不会超过10m/s，考虑到数子传输系统的下传速度，设定如果位置变化超过20m就去掉。
- 2022-08-16 19:54:45下载
- 积分：1
-
Delphi 实现窗体的全屏显示效果
Delphi 实现窗体的全屏显示效果，单击按钮后即可全屏。
- 2023-03-25 11:25:03下载
- 积分：1
