1.日志打印方法
mmoLog.Lines.Append();
例如。
mmoLog.Lines.Append(‘已完成打标:’ + mmoReadyMark.Lines[i]);
2.提示信息框
2.1MessageBox
例如。
MessageBox(0, ‘是否确定完成打标?不可撤销!’, ‘提示’, MB_OKCANCEL) = mrOK
2.2ShowMessage
例如。
ShowMessage(‘更新打标记录到平台失败!请检查后台服务是否运行!’);
3.idtcpclient的使用
3.1读取
IdTCPClient1.IOHandler.ReadBytes(TBytes(dat), -1, False);
3.2写入
IdTCPClient1.IOHandler.Write(UTF8Encode(msg));
3.3打开和关闭连接
IdTCPClient1.Connected;
IdTCPClient1.Disconnect;
4.长度
4.1获取长度
Length(edtImei.Text)
4.2设置长度
SetLength(dat, 0);
5.CLEAR 和free方法
1.第一个是指对象的clear,
2.Free方法是释放一个对象实例所占用的内存空间
6.与 或 非
And or not
7.StrToIntDE函数
要判断一个文本框里输入的字符串能不能转换为integer类型,如果能,则返回转换后的整型数据,如果不能,则返回整数0
8.清空内存
zeromemory(@rbuf, 2048);//清空内存
9.“^”和“@”的使用
比如
var
i:integer;
p:^integer; //表示p是一个指向整型变量的指针
p:=@i;
@i则是取i的内存地址,并放入指针变量p中。
^integer,表示整型指针.
p^ 则是从 指针p 中取出值i
10.Ord
ord函数返回的是某个有序类型值在有序类型集合中的序号
11.函数IntToHex
该函数用于将“十进制”转换成“十六进制”。该函数有二个参数。第一个参数为要转换的十进制数据,第二个参数是指定使用多少位来显示十六进制数据。
12.串口校验方式(even,odd,none,space,mark)
- even 每个字节传送整个过程中bit为1的个数是偶数个(校验位调整个数)
- odd 每个字节穿送整个过程中bit为1的个数是奇数个(校验位调整个数)
- noparity没有校验位
- space 校验位总为0
- mark 校验位总为1
13.Inc自增函数,dec自减函数
13.1 Inc
inc有两种用法:
1.一个是inc(integer),就是加1
2.另一个是inc(integer,integer)就是加n
13.2 Dec
dec有两种用法:
1.一个是dec(integer),就是减1
2.另一个是dec(integer,integer)就是减n
14.copy函数的用法举例:
1、str := “123456”;str1 := Copy(Str,2,3);
2、结果是 str1 等于234。
3、Copy有3个参数,第一个是要处理的字符串,第二个是要截取的开始位置,第三个是截取位数。
4、当第三个参数大于字符长度,那么效果就是取开始位置 后的所有字符。str1 := Copy(Str,2,10); 结果就是str1 等于 23456。