-
这是一个单词测试!
this is a word test!
- 2022-01-26 04:53:34下载
- 积分:1
-
Windows 剪贴板高级编程-Delphi源码实例
Windows 剪贴板高级编程-Delphi源码实例,其实也不是什么高级编程,挺基础的剪贴板应用。学习如何在Delphi环境下读取Windows剪贴板的内容。在编写一些系统辅助类的软件中,可使用到这些小技巧。以下代码:将剪贴板内容读取出来,在代码的执行放入一个按钮事件中:
procedure TForm1.Button2Click(Sender: TObject);
var
DataRec: TDataRecord;
Data: THandle;
PData: Pointer;
begin
Data := Clipboard.GetAsHandle(CF_CUSTOMFORMAT);
if Data = 0 then Exit;
PData := GlobalLock(Data);
Move(PData^, DataRec, GlobalSize(Data));
GlobalUnlock(Data);
with DataRec do
ShowMessage(Name + #13#10 + Sex + #13#10 + Hobby);
end;
- 2022-04-22 08:40:48下载
- 积分:1
-
带源程序的免费软件 通过ECP端口在两台电脑间高速传送文件的程序。速度可达到600K/S....
带源程序的免费软件 通过ECP端口在两台电脑间高速传送文件的程序。速度可达到600K/S.-source with the adoption of free software in the ECP port high-speed computer-to-computer transmission of documents procedures. Speeds up to 600K/S.
- 2022-04-29 06:32:18下载
- 积分:1
-
设计的微控制字体的字符位图的应用设计
application for design character bitmap useful for designing fonts in micro controllers or LCD.
Source code in delphi7
- 2022-04-23 00:27:24下载
- 积分:1
-
指导,这是所有非常基础的研究,打算看看朋友。
delphi教程,内容很全,十分基础,有意学习delphi 的朋友看一看。-Guide, which is all very foundation delphi study intends to look at the friends.
- 2022-10-16 22:20:03下载
- 积分:1
-
Test
领航插件,用于获取领航数据。并显示在软件里。主要是为了取数据方便(Pilot plug-in)
- 2014-02-07 00:06:36下载
- 积分:1
-
paintapk
说明: paint application new image editor
- 2019-09-19 16:09:19下载
- 积分:1
-
串口通讯,主要针对单板机进行开发
串口通讯,主要针对单板机进行开发-serial communications, mainly for the development of F14
- 2022-12-16 00:15:03下载
- 积分:1
-
Delphi 打印图形(图片)
Delphi 打印图形,把图片打印出来,通过这个例子,你可以学习到:
strect:Trect;//定义打印输出矩形框的大小
temhi,temwd:integer;
begin
if DIGPrint.execute then
begin
temhi:=imgpic.picture.height;
temwd:=imgpic.picture.width;
while (temhi = printer.pageheight div 2)and
//将图形放大到打印页面的1/2大小
(temwd = printer.pagewidth div 2) do
begin
temhi:=temhi+temhi;
temwd:=temwd+temwd;
end;
with strect do //定义图形在页面上的中心位置输出
begin
left := (printer.pagewidth -temwd) div 2;
top := (printer.pageheight-temhi) div 2;
right := left+temwd;
bottom := top+temhi;
end;
with printer do
begin
begindoc;
canvas.stretchdraw(strect,imgpic.picture.graphic);
enddoc;
end;
end;
- 2022-10-24 23:35:04下载
- 积分:1
-
DelphiPcap
PCap网络组件接口Dephi源码 (PCap network components Delphi source interface)
- 2007-09-24 20:29:34下载
- 积分:1