Delphi 源码都有哪些后缀?
dpr 为工程文件
dfm 为窗体文件
pas 为单元文件
cfg 配置文件
dof 为项目选项文件(一般没用)
dcu compiled units文件 ,编译后的单元文件
res 资源文件
ddp 文件就是Delphi Diagram Portfolio简写,是用来保存Code Editor中的Diagram信息的.
一般一个项目要 dpr,dfm,pas文件即可,如果有cfg,res也要(后两个文件很少用到)
简单的delphi网络程序源码
问这位哥哥要一个
{********************************************************************}
{ LanScan: }
{ Author: dmzn dmzn@163.com 2005.5 }
{ Description: 多线程的局域网扫描组件 }
{********************************************************************}
delphi的 pas 文件是由哪些部分组成的
扩展名为 .pas 的文件是 delphi 的单元代码源文件，取名 pas 是缘于 delphi 是基于 Pascal 语言之上的扩展，其语法等使用的是 pascal 的语法。pas 文件的内容由以下几部分组成：//单元名称Unit unit1;//类型声明type TMyArray = array[0..19] of Byte;//接口部分//可定义常量、变量、函数、过程等。interface//接口部分的单元引用uses Windows, Messages,Controls, Forms, Dialogs;//实现部分implementation//实现部分的单元引用uses MyLib, Unit2; //初始化部分(可省略）initialization//最终结束部分（可省略）finalization//单元文件结尾（end后必须以句号结尾） end.以下是当新建一个工程时，自动生成的 unit.pas 常规内容：unit Unit1;interfaceuses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs;type TForm1 = class(TForm) private { Private declarations } public { Public declarations } end;var Form1: TForm1;implementation{$R *.dfm}end.
delphi中如何模拟最简单的键盘输入？
举个例子，模拟字符“a”的输入： keybd_event(65,0,0,0);
----------------------------------------------------------------
模拟键盘可以用Keybd_event这个api函数，模拟鼠标按键用mouse_event函数.
Keybd_event函数能触发一个按键事件，也就是会产生一个WM_KEYDOWN或WM_KEYUP消息,一般用这两个消息来模拟一
次按键(按键的过程是:按下,然后弹起)，但是没有直接用这个函数方便。
Keybd_event共有四个参数:
第一个为按键的虚拟键值，如回车键为 vk_return, tab键为vk_tab;
第二个参数为扫描码，一般不用设置，用0代替就行;
第三个参数为选项标志，如果为 keydown则置0即可，如果为keyup则设成“KEYEVENTF_KEYUP”;
第四个参数一般也是置0即可。
例如用以下代码即可实现模拟按下i键，其中的$49表示i键的虚拟键值：
keybd_event($49,0,0,0);
keybd_event($49,0,KEYEVENTF_KEYUP,0);
mouse_event最好配合setcursorpos(x,y)函数一起使用，先定位鼠标,再产生鼠标事件.
mouse_event有五个参数:
第一个为选项标志，为MOUSEEVENTF_LEFTDOWN时表示左键按下，为 MOUSEEVENTF_LEFTUP表示左键松开，向系统发送相应消息;
第二三个参数分别表示x,y相对位置，一般可设为0,0;
第四五个参数并不重要，一般也可设为0,0。
mouse_event的示例代码：
setcursorpos(20,132);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTDOWN,0,0,0,0);
mouse_event(MOUSEEVENTF_LEFTUP,0,0,0,0); ...
上面的代码表示鼠标的双击，若要表示单击，用两个mouse_event即可(一次放下，一次松开)。
注意
不管是模拟键盘还是鼠标事件，都要注意还原，即按完键要松开，一个keydown对应一个keyup；鼠标单击 完也要松开， 不然可能影响程序的功能。
例子1：模拟按下'A'键
keybd_event(65,0,0,0);
keybd_event(65,0,KEYEVENTF_KEYUP,0);
例子2：模拟按下'ALT+F4'键
keybd_event(18,0,0,0);
keybd_event(115,0,0,0);
keybd_event(115,0,KEYEVENTF_KEYUP,0);
keybd_event(18,0,KEYEVENTF_KEYUP,0);
附：常用模拟键的键值对照表。
键盘键与虚拟键码对照表
字母和数字键 数字小键盘的键 功能键 其它键
键 键码 键 键码 键 键码 键 键码
A 65 0 96 F1 112 Backspace 8
B 66 1 97 F2 113 Tab 9
C 67 2 98 F3 114 Clear 12
D 68 3 99 F4 115 Enter 13
E 69 4 100 F5 116 Shift 16
F 70 5 101 F6 117 Control 17
G 71 6 102 F7 118 Alt 18
H 72 7 103 F8 119 Caps Lock 20
I 73 8 104 F9 120 Esc 27
J 74 9 105 F10 121 Spacebar 32
K 75 * 106 F11 122 Page Up 33
L 76 + 107 F12 123 Page Down 34
M 77 Enter 108 -- -- End 35
N 78 - 109 -- -- Home 36
O 79 . 110 -- -- Left Arrow 37
P 80 / 111 -- -- Up Arrow 38
Q 81 -- -- -- -- Right Arrow 39
R 82 -- -- -- -- Down Arrow 40
S 83 -- -- -- -- Insert 45
T 84 -- -- -- -- Delete 46
U 85 -- -- -- -- Help 47
V 86 -- -- -- -- Num Lock 144
W 87
X 88
Y 89
Z 90
0 48
1 49
2 50
3 51
4 52
5 53
6 54
7 55
8 56
9 57
