如何在存取 binary 檔案進入 db

[tim]

db 欄位: image
可以使用 TBLOBField 來 casting 欄位使用 LoadFromFile 與 SaveToFile 來進行!!
注意 SaveToFile 時, 其 TQuery 元件拉出 db 中的資料時, 其 TDataBase 中的屬性Blob Size 所設定的 k 數為其拉出資料的上限.
其他就是使用 TBlobField 的相關存取檔案的函式:
TBlobField(Query1.FieldByName('file_content')).LoadFromFile(Edit1.Text);
TBlobField(Query3.FieldByName('file_content')).SaveToFile(SaveDialog1.Filename);