求Delphi大神解释一下代码的意思啊
一、求Delphi大神解释一下代码的意思啊
trim(edit1.Text),消除字符串两端的空格。
Pchar(trim(edit1.Text)),把字符串转换成以
Pchar(trim(edit1.Text)),把字符串转换成以\0结束的字符串。
结束的字符串。info:=pchar(trim(edit1.text));把Info指向上面的字符串。
GetFamInfo(info,flag),调用函数(大概GetFamInfo是自己定义的),返回指定的信息。
Memo1.Lines.Add(GetFamInfo(info,flag));把返回的信息,添加到Memo1中。
inttostr(flag),把整型转换成字符串
edit2.text:=inttostr(flag);然后,放到Edit2中。

二、求大神解释下这段代码的意思(Delphi上位机)?
这段代码的意思弹出对话框询问是否贴合鼓回命令,断开通讯,如果通讯异常或发送失败则提示错误。
三、求大神解释下这段代码的意思(Delphi上位机)?
ab plc ?这个要看完整的,应该有一个动态连接库的