sql求助(100分)

为何执行不了
procedure TQueryForm.Button2Click(Sender: TObject);
begin
with query1 do
begin
close;
sql.Clear;
sql.Add('select bookno,bookname,backdate');
sql.Add( ' from lend a, book b');
sql.Add('where a.readerno=:maskedit1.text and b.bookno=a.bookno ');
parambyname('num').asstring:=maskedit1.text;
open;
end;
dbgrid2.Columns[0].FieldName:='bookno';
dbgrid2.Columns[1].FieldName:='bookname';
dbgrid2.Columns[2].FieldName:='backdate';

end;

sql.Add('select a.或b.bookno,a.或b.bookname,a.或b.backdate');
sql.Add( ' from lend a, book b');
sql.Add('where a.readerno=:num and b.bookno=a.bookno ');
parambyname('num').asstring:=maskedit1.text;

sql.Add('select bookno,bookname,backdate');
sql.Add( ' from lend a, book b');
sql.Add('where a.readerno='''+maskedit1.text+''' and b.bookno=a.bookno ');
open;
用'''+变量名+'''可以直接引用字符串变量

这句显然错了：
sql.Add('where a.readerno=:maskedit1.text and b.bookno=a.bookno ');
看上下文，应该是
sql.add('where a.readerno=:num and b.bookno=a.bookno');
这句也不行
sql.Add('select bookno,bookname,backdate');
a,b中都有bookno

同意doud的意见

多人接受答案了。