如何将，.TEXT的文本文件写入数据库中？

Question

假设已经在string1中
按照你自己所说的特征，以；为分割符，可以方便的得到每个记录对应的值：）

Answer 1

你先将文本文件按换行符的分开读到一个字符窜变量中去，
比如：str1:='张某；19；一(1)',然后就分解这个字符窜，将他逐个加到数据库中去呀
name:=copy(str1,0,4),加到数据库中去呀。  
      

Answer 2

pure_cmh(不死鸟):
我比较菜；您能否把如何得到每个记录对应的值以例子形式赐给我？先谢了

Answer 3

补充：）用pos获取；所在位置，要不然三个字的名字不就惨了：）

Answer 4

summer1978(夏)：
我的悟性比较低；我还是不明白
1.文本件里肯定不止四条（行），有可能上万行，我如何读，又如何分解字符窜；
2。能以一个例子，将全过程给我？　

Answer 5

用Readln把文件中的第一行读到一个字符串中，再把这个字符串按“；”号分解成名字、年龄、班级三部分，再把这三部分写入数据库中；接着读文件中的第二行。第三行。。
整个过程可用 While 循环语句。

Answer 6

看看帮助啦！几个用得到的命令都已经提示了，多看help才可以多学点：）pos
copy
再就是数据库的SQL语言了

Answer 7

Apollo47(阿波罗):
恳求您把“再把这个字符串按“；”号分解成名字、年龄、班级三部”具体如何分解说详细一些
最好能用例子赐教！　

Answer 8

procedure TForm1.Button1Click(Sender: TObject);
var s:string;
    i:integer;
    Strs:TStringList;
begin
  s:='aaa;bbb;ccc';
  Strs:=TStringList.Create;
  while pos(';',s)<>0 do
    begin
      i:=pos(';',s);
      Strs.Add(copy(s,1,i-1));
      Delete(s,1,i);
    end;
 Strs.Add(s);
end;