UC知道delphi 中这段代码什么意思
来源：百度知道 编辑：UC知道 时间：2024/05/26 10:30:55
if recordcount=0 then
begin
showmessage('对不起，此用户ID于用户名不符！请输入用户ID和用户名！');
edit8.text:='';
combobox2.text:='';
edit1.text:='';
edit2.text:='';
edit3.text:='';
edit4.text:='';
edit5.text:='';
edit6.text:='';
edit7.text:='';
Memo1.Text:='';
edit9.text:='';
edit10.text:='';
edit11.text:='';
end
else
begin
showmessage('对不起，此用户ID于用户名不符！请输入用户ID和用户名！');
edit8.text:='';
combobox2.text:='';
edit1.text:='';
edit2.text:='';
edit3.text:='';
edit4.text:='';
edit5.text:='';
edit6.text:='';
edit7.text:='';
Memo1.Text:='';
edit9.text:='';
edit10.text:='';
edit11.text:='';
end
else
recordcount=0 意思就没有找到与数据库中相符的记录，
edit8.text:='';后面这里的意思就是把这些控件的值清空！
这段代码主要用于进入系统时的登录窗口，作用是根据用户输入的用户名判断该用户的ID是否存在，这段代码显示了该用户ID不存在，先提示用户输入错误的用户名，随后对之前输入的内容都做了清除动作。
recordcount:是你用于判断“用户ID”而定义的一个整型变量；
showmessage:一个用于显示提示对话框的函数，用于告诉用户发生了什么情况；
edit8:一个编辑框控件,edit8.text是这个控件的用于显示编辑框内字符的值，如你在这个编辑框内输入了"123456"，则edit8.text="123456"。edit8.text=""即让编辑内的字符为空；
combobox2:这是一个下拉框控件，同样也有一个text属性，使用方法同edit是一样的；
memo1:这是一个多行编辑框控件，用于在要输入多行文本的地方，使用方法同以上一样；
看你是个初学者，应该了解 if then begin else end 等关键词的用法吧，如果还不会的话最好去看看有关介绍Delphi基础语法的书籍吧.
够详细了吧
recordcount=0 是用ADOQUERY（插件）时读取数据库时，对预先想搜寻的数据查找后返回的数据行数，如果返回是0则表示无数据，那么所有置空