怎么将文本转化到数据库中去！！ （在线等候！）

Question

你是想保存整个文本还是把文本中的数据提取倒入到数据库中
前者可以把文件保存到blob型中
后者如果是规则文本的话可以采取逐行操作文本倒入数据库
不规则就得处理了

Answer 1

将文本文件内容读入，然后保存到数据库，可参考Delphi5开发人员指南第12章。

Answer 2

既然你的格式固定，如果文件不大的话，那么先读入到stringlist再insert到数据库中去var t:TStrings;
    i,j: integer;
t:=TStringList.Create;
t.loadfromfile('1.txt')
j:=t.count div 3;
for i:=0 to j do
begin
  //插入数据库....
end;

Answer 3

如果.txt的格式有不同，比如用“Tab”或“，”或“”隔开的，在导入表中的时候要做什么相应当处理吗？－－前提是表结构符合！

Answer 4

使用blob字段，读入时候用TBlobStream来进行读写操作：
读取：
var AStream : TBlobStream;
YourData:integer;AStream := TBlobStream.Create(TBlobField(YourBlobField));
AStream.Read(YourData,SizeOf(YourData));
AStream.Free;
存入：
var AStream : TBlobStream;
YourData:integer;AStream := TBlobStream.Create(TBlobField(YourBlobField));
AStream.write(YourData,SizeOf(YourData));
AStream.Free;