你要删两个表吗?adoquery.sql.text:='delete orderlist where assno='''+edit1.text+'''
delete partlist where assno='''+edit2.text+'''';