if chk1.Checked then
  str:=str+'and bk_name='''+edt10.Text +''' ';
  if chk2.Checked then
  str:=str+'and bk_writer='''+edt11.Text +'''';
  if chk3.Checked then
  str:=str+'and ISBN='''+edt12.Text +'''';
  Delete(str,1,4);


为什么是4，删除字符串delete（str,1,4）我定义字符串为空字符串

设置断点，单步运行调试，可以很清楚的看到结果啊！

呃..还没明白你的意思...

Delete(str,1,4);
括号中为什么是4？