G
gamei
Unregistered / Unconfirmed
GUEST, unregistred user!
我刚学delphi ,最近做一个图书管的管理系统,可在还书这个模块,须检测学生编号,和借阅书号
是否吻合,写了以下语句
我还要检查“归还日期”,定义的是文本型,我现在要查到“归还日期”为空时,
写下以下语句,为什么不能执行?
问题就出在条件“归还日期”上。
var
empty:string;
.....
enpty:='';
if form1.ADOTable2.Locate('书号;学生编号;归还日期',Vararrayof([edit4.Text,edit3.Text,empty]),[])=false then showmessage('学生编号,图书书号输入不匹配,或者该书还没有归还')
...
这种还不行
if form1.ADOTable2.Locate('书号;学生编号;归还日期',Vararrayof([edit4.Text,edit3.Text,'']),[])=false then showmessage('学生编号,图书书号输入不匹配,或者该书还没有归还')
为什么?
是否吻合,写了以下语句
我还要检查“归还日期”,定义的是文本型,我现在要查到“归还日期”为空时,
写下以下语句,为什么不能执行?
问题就出在条件“归还日期”上。
var
empty:string;
.....
enpty:='';
if form1.ADOTable2.Locate('书号;学生编号;归还日期',Vararrayof([edit4.Text,edit3.Text,empty]),[])=false then showmessage('学生编号,图书书号输入不匹配,或者该书还没有归还')
...
这种还不行
if form1.ADOTable2.Locate('书号;学生编号;归还日期',Vararrayof([edit4.Text,edit3.Text,'']),[])=false then showmessage('学生编号,图书书号输入不匹配,或者该书还没有归还')
为什么?