- 博客(6)
- 资源 (5)
- 收藏
- 关注
RSS订阅转载 Dlephi 选择文件夹目录保存
Windows目录对话框是一个标准的WindowsUI控件，其可以列出一个目录列表，并且可以显示新增按钮。由于Delphi中并没有提供对于该控件的封装，所以打开它是个问题。网上有多种方法，试举几例：1、使用Win31目录下的DriverList、DirectoryList、FileList和FileFilterList四个控件进行组合来获取当前目录，操作复杂，也不美观，对程序EXE体积影响
2018-01-26 10:17:36
399
转载 几个获取windows系统信息的程序
本文所有的窗体界面略去，读者可根据程序自行添加各窗口组件。1、获取windows版本信息可以通过Windows API函数GetVersionEx来获得。具体程序如下：Procedure Tform1.Button1Click(sender:TObject); Var OSVI:OSVERSIONINFO; begin OSVI.dwOSversio
2018-01-25 09:06:23
799
转载 Delphi数据集与记录
1.1Delphi数据库应用程序的层次结构Delphi数据库应用程序通过数据存取构件对数据库进行访问，通过可视的数据构件(Data Control)将数据呈现给用户，并与用户进行交互。Delphi数据库应用程序的结构如下图： 图 2‑1 Delphi数据库应用程序结构图Delphi访问数据库可以分为三级：(1)、由ADO(Active Data Object)对象及底层数据库
2018-01-05 17:47:11
3268
转载 Delphi UDp控件
DELPHI中有两个UDP控件：TIdUDPServer和TIdUDPClient控件，可用于传输UDP数据；用法都很简单，主要是一些细微的特性，弄清楚了对正确使用这两种控件有很大的好处；下面分别介绍：一、 TIdUDPServer：代表一个UDP的服务端，接收UDP客户端发过来的数据；在FORM上放置一个TIdUDPServer控件，命名为UDPSvr，在FormC
2018-01-05 17:45:37
1942
原创 Delphi 实现图片上下翻转
SrcR := Rect(0, 0, imgTran.Width, imgTran.Height); DesR := Rect(0, imgTran.Height, imgTran.Width, 0); imgEnd.Repaint; imgEnd.Canvas.CopyRect(DesR, imgTran.Canvas, SrcR);把imgTran的图片反转复制到imgEnd上。
2018-01-05 17:41:25
1087
原创 窗体锁定在屏幕内 不可超出桌面屏幕边缘
procedure WMWindowPosChanging(var Message: TWMWindowPosChanging); message WM_WINDOWPOSCHANGING;procedure TFmBack.WMWindowPosChanging(var Message: TWMWindowPosChanging);begin inherited; if (Messa
2018-01-02 15:04:29
1378
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人