sqz朋友,如果你把我提的‘人事档案管理系统问题 ’让我明白我给你200分,其它DFW只要解决我的问题,我把200分全给他,看着问题没人答,我现在很急的(100

  • 主题发起人 主题发起人 joness
  • 开始时间 开始时间
J

joness

Unregistered / Unconfirmed
GUEST, unregistred user!
sqz朋友,如果你把我提的‘人事档案管理系统问题 ’让我明白我给你200分,其它DFW只要解决我的问题,我把200分全给他,看着问题没人答,我现在很急的(100分)<br />to sqz:
你说的可以用文件方式也可以用字段的方式来处理
后者主要是流的处理,我想了一下,可以用openpicturedialog打开
一个图形文件到dbimage里在添加到库里,不知是否为你所说的那样
可是:
table1.FieldByName('picture')后面如何写呢!它的类型如何定呢?
(picture为我定义的graphic字段)
我只是周末休息在家用本地数据库是作实验,真真在公司写是用SQL建库
所以,可以将你的解答写详细写吗?

to dfw:
***************我的问题***************
我在作一个档案管理系统中遇到一个
问题,在查询模块要显示所查询人的
基本信息和一张照片,那么我在建库
是定义了一个graphic的字段,但我
不知道如何将扫描好的照片文件与
库建立一定的关系,使我能实现象
dbedit一样的在dbgrid里显示员工
的照片。
NO1:如果我使用本地数据库paradox
该如何实现;
NO2:如果我使用远程SQL SERVER建数
据库那么有该如何实现;
请将您的解答过程写详细写好吗?
***前者主要用文件-------如何写呢?思路或代码
***后者主要是流的处理-----如何写呢?代码


 
呵呵 活该我来捡分分 给你一篇文章应该可以了吧:)

在SQL Server数据库中存放类型任意文件
数据库SQL Server,存放文件的字段类型Image
Create Table MyTable
(
FileName VarChar(20),
FileSource Image
)
存放文件到数据库
var
FileName :String;
FileName := ExtractFileName(OpenDialog1.FileName);
with Query do
begin
Close;
Sql.Clear;
Sql.Add('INSERT INTO MyTable VALUES (:FileName,:FileSource)');
ParamByName('FileName').AsString := FileName;
ParamByName('FileSource').LoadFromFile(OpenDialog1.FileName,ftBolob);
ExecSQL;
end;

从数据库中取出文件
var
FileName :String;
begin
with Query do
begin
Close;
Sql.Clear;
Sql.Add('SELECT * FROM MyTable WHERE FileName = '?'');
Open;
FileName := 'c:/'+FieldByName('FileName').AsString;
(FieldByName('FileSource') AS TBlobField).SaveToFile(FileName);
end;
end;
 
建立一个表 包含员工ID和image字段,扫描了照片后存入image字段里面。

在程序中select一个记录后,将image读出给TImage组件显示。

至于本地或者远程这应该属于数据库连接问题吧!
 
的确是捡分,呵呵! 正是无聊 ~O~O~
 
我现在在本地数据库上一解决了我的问题
看拉丁宝申的文章我对远程数据库上的写法又
清晰了许多,谢谢丁宝申!


to taozhiyu,
'建立一个表 包含员工ID和image字段,扫描了照片后存入image字段里面。'
'扫描了照片后存入image字段里面'这一步我不明白呀,可以在谈谈具体如何作吗?
 
就是保存嘛!具体的再sqlserver中好像有个image的数据类型,你建立一个字段
让他的类型是image类型。
编程的时候对fieldbyname('image').value给值
就和一般字段一样的操作啦!

你也可以直接在sqlserver中加入阿!不过这种是手工的。很麻烦
 
删除呢?
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
后退
顶部