Wolfgang Chien's Homepage | Delphi學習筆記 - 問答篇 |
小弟使用delphi 1.x & QuickReport v0.97b 撰寫一個DataBase程式,使用 DBase Ⅲ格式,我希望只印出符合查詢條件的資料,請問該如何著手? 敬請不吝指教,謝謝!!
ps.我對SQL語法不瞭解
您可以直接在 TQuickReport 的 OnFilter 事件中寫明條件判斷, OnFilter事件的引數中有一個以 var 宣告的 PrintRecord 布林型態變數, 將這個變數設為 True(預設值), 該筆記錄便會印出;反之, 設為False, 就不印出這筆記錄. e.g.
procedure TForm1.QuickReport1Filter(var PrintRecord: Boolean); begin PrintRecord := False; if YourTable.FieldByName('WantedField').AsInteger <= 100 then Exit; if YourTable.FieldByName('WantedField').AsInteger >= 150 then Exit; PrintRecord := True; end;
首頁 | 學習筆記 | 主題公園 | 軟體下載 | 關於本站 | 討論信群 | 相約下次 |