如何存取jpeg,gif,avi,wav,bmp等媒体文件到数据库（pradadox)的blob字段(100分)

S

sunmeren

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #1

我欲打算把多媒体文件存到数据库的同一字段中，这可能有图片，声音，录象等格式的文件
，采用paradox数据库，如何实现。

 

O

only you

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #2

用MEMORYSREAM可以实现。
具体的实现方法可以到我回答的问题里找！

 

Y

yangkee

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-12

• #3

设置一个blob字段用来放文件，再设一个字段放文件及后缀名
要用到blobstream，具体方法搜索一下‘blob’

 

L

lcdjj

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-05-13

• #4

if OpenPictureDialog1.Execute then
begin
if not(Table1.State in [dsEdit, dsInsert]) then Table1.Edit;
(Table1.FieldByName('Zhaopian') as TBlobField).LoadFromFile(OpenPictureDialog1.FileName);
Table1.Post;
end;

 

M

micony

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-08

• #5

将bmp存到数据库的字段中:
BMP := TBitmap.Create;
stream := tMemoryStream.Create;
BMP.SaveToStream(MemoryStream);

...
//Blob Field
Table1.FieldByName("YourBlob").LoadFromStream(Stream);

 

T

txfzr

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2001-06-08

• #6

存取BMP的方法
procedure TForm6.OfficeButton1Click(Sender: TObject);
var
B: TBitmap;
begin
B := TBitmap.Create;
try
if opendialog1.Execute then
begin
B.LoadFromFile(opendialog1.FileName);
DBImage1.Picture.Assign(B);
end
finally
B.Free;
end;
end;

 

W

wjiachun

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2002-04-21

• #7

多人接受答案了。