L Lfish Unregistered / Unconfirmed GUEST, unregistred user! 2001-10-12 #3 给个思路 var bookmarklist:Tbookmarklist; bookmar:TbookmarkStr; begin bookmarklist:=DBGrid1.SelectRows; for i:=0 to BookmarkList.count-1 do begin Table1.bookmark:=BookmarkList; 用stringlist 把纪录的关键词保存,在打印时 再查询打印 end; end.
给个思路 var bookmarklist:Tbookmarklist; bookmar:TbookmarkStr; begin bookmarklist:=DBGrid1.SelectRows; for i:=0 to BookmarkList.count-1 do begin Table1.bookmark:=BookmarkList; 用stringlist 把纪录的关键词保存,在打印时 再查询打印 end; end.