我要在成绩表中插入成绩(ID,SCORE,STUDENT),在插入之前进行判断,就是选定一条记录后再判断其他的列是否与输入的相同(在插入时可能会重复插入,这样只有对选定的记录的属性全部判断),下面的程序只能进行一个列的判断,怎样进行全部判断啊?还请指教
if not adotable1.Locate('STUDENT',Edit1.Text,[]) then
begin
adotable1.AppendRecord([Edit1.Text,DBText1.Field,user_login.Edit1.Text]);
end
else
showmessage('已存在,请重新输入');
if not adotable1.Locate('STUDENT',Edit1.Text,[]) then
begin
adotable1.AppendRecord([Edit1.Text,DBText1.Field,user_login.Edit1.Text]);
end
else
showmessage('已存在,请重新输入');
adotable1.AppendRecord([Edit1.Text,DBText1.Field,user_login.Edit1.Text]);
else
if (adotable1.FieldByName('SCORE').AsInteger = StrToInt(DBText1.Field)) and
(adotable1.FieldByName('ID').AsString = user_login.Edit1.Text) then
showmessage('已存在,请重新输入')
else
adotable1.AppendRecord([Edit1.Text,DBText1.Field,user_login.Edit1.Text]);