怎么用Delphi把图片存入Oracle数据库？

Question

用Delhpi开发客户端应用程序，用户要把本机上的图片存入服务器上的Oracle数据库，以便其他客户机调用。请问该如何实现图片存入？多谢

Answer 1

[Access] [SQL Server] [Oracle]
表 
TVImage    
      ID     Integer  Int          Number(10,0)
      Name   Text(50) Varchar      Char(10)
      Image  OLE对象  Image        BLOBTVVideo
      ID     Integer  Int          Number(10,0)
      Name   Text(50) Varchar      Char(10)
      Video  OLE对象  Image        BLOB
-----------------------------------------------------------读写方式下的代码：
     TBlobField *field;//:Write
     field=(TBlobField *)(ClientDataSet2->FieldByName("Video"));
     field->LoadFromFile(OpenDialog1->FileName);//:Read
     field=(TBlobField *)(ClientDataSet2->FieldByName("Video"));
     field->SaveToFile(fileName);