wrapper for Sqlite 3

http://www.itwriting.com/blog/articles/a-simple-delphi-wrapper-for-sqlite-3

我目標是要把舊系統上的程式轉換成新的，
舊系統用 Delphi 7 的元件 ，包括
TADOconn, TADOQuery, TDataBase, TQuery, TTable, BatchMove
把 Oracle 上的 8 個 Table ，批次轉成 paradox 或 dbf 檔,
這些 Table 的資料筆數最多的約 30萬 筆
但後來因為這些資料庫的密碼太容易破解, 加密會使資料量變大,
只好試著轉換到 SQLite ，密碼難破解，資料筆數上限也比較大，
但我用一筆筆 insert 1個Table 的30萬資料，就花了約 25分鐘，
舊系統 8 個 Table 只花了約20分鐘，而且要每週排程自動作3次，
實在太久了，而舊系統的 TTable 元件，Table type 沒有支援 SQLite ，沒辦法用，
現在我只能找有無方法可以從 oracle 批次 轉到 SQLite ，且是全程式自動，
不是用手動匯出資料再匯進去，不然我每週作3次會累死的，
懇請各位高手提供一下好方法。