目录
1.数据类型
2.申明API
3.流程
4.组件的使用
下一步研究方向(1.源码调试方法的整理 2.代码风格的优化(全局变量 局部变量的命令规则) 3.Delphi DLL的写法 4.自用函数的封装
5.其他组件的用法(学习Delphi就是学习Delphi组件的用法))
********************数据类型********************
整型
integer 有符号整型 长度4字节 -2147483648-2147483647
(鄙视很多编译器 什么句柄型 布尔型什么的 按照罗云彬的说法 汇编只有整型
句柄就是一个整型数 BOOL型就是一字节的1或者0 把简单的问题搞复杂而已)
Cardinal 无符号整型 长度4字节 0-4294967295
longword 长字型 长度4字节 0-4294967295
(这个最接近汇编的申明办法 汇编一般申明 dword（长度4字节） Delphi申明longworld 呵呵
(一个汇编的dword整型 Delphi有三种申明办法 呵呵）
smallInt 小整型 长度2字节 -32768-32767
Word 无符号小整型 长度2字节 0-65535
shortInt 短整型 长度1字节 -128-127
Byte 无符号短整型 长度1 字节 0-255
好吧 写到这里我好象懂了 byte(1字节) word(字) longworld（双字)
可以和汇编对应
----------------------------------------------------
逻辑型
Boolean 逻辑型 1 False(假)0/True(真)1
-----------------------------------------------------
文本型
string 文本型 2的31次方的字符
Char 字符串 1个字符
例如 a:array[0..5]of char 申明 内存模型为 00 01 02 03 04 05的字符串
----------------------------------------------------
数组
定义一个静态结构数组
a:array[0..6]of Byte 申明 内存模型为 00 01 02 03 04 05 06的字节集 静态数组
你也可以自己定义一个结构 创建一个结构数组
自己定义的结构
type
Snapshot32=record //记录类型的名称
A1:Integer;
A2:Integer;
end;
a:array[0..6]of Snapshot32;
定义一个动态结构数组
a:arry of integer; 或者 a:arry of Snapshot32
注意:动态定义以后 要用数组前一定要用
setlength(数组名,数组个数) 申明数组大小
附:length(数组名) 返回数组个数
******************申明API*****************
例如1
自定义名 参数一 参数二传址 反回值
function getthpid(jubing:Integer;var lpid: Integer ): Integer;
stdcall; external 'user32.dll' name 'GetWindowThreadProcessId';
调用方式 在哪个DLL 本名
例如2
参数自己定义结构传址
自己定义的结构
type
Snapshot32=record //记录类型的名称
A1:Integer;
A2:Integer;
A3:Integer;
A4:Integer;
A5:Integer;
A6:Integer;
A7:Integer;
A8:Integer;
A9:Integer;
A10:array[0..259]of char;
end;
参数二自己定义结构传址
function Process32First(x:Integer;VAR y: Snapshot32): Integer;
stdcall; external 'kernel32.dll' name 'Process32First';
**********************流程********************
if then 顺序结构
if then else 选择结构
for 小 to 大 do 计次循环(小到大)
for 大 dwonto 小 do 计次循环(大到小)
while 条件 do 判断循环()
repeat
until(条件) 循环判断()
break 跳出循环
continue 到循环尾
流程没什么好说 很简单
******************组件的使用***************
listview 超级列表框
增加列表
var newitem:TListItem //定义TListItem类的一个变量
如果是循环增加 特别是第一项放到循环体里增加
newitem:=listview.Items.Add;
newitem.Caption:='增加标题';
newitem.SubItems.Add('增加列2');列1是标题
ListView.Items.count总数<>0 ListView.Selected现行选中项<>nil
ListView.Selected.Caption 现行选中项标题
ListView.Selected.SubItems.Strings[0]); 现行选中项列2 列1是标题
ListView.Selected.SubItems.Strings[1]); 现行选中项列3 列1是标题
ListView.Selected.Delete()删除选中项
ListView.Items[0].caption 第一行标题
ListView.Items[0].SubItems.strings[0] 第1行第2列数据 列1是标题
ListView.Items[0].Delete() 删除第一行
