请问delphi中是否可以将任意格式的文本文件读入到数据库中？（实现不知道文本文件的具体格式）

Question

小弟现有一个文本文件，其内容为：
   1      87.500      -7.500      87.500       7.500    101489
   2      87.500      -7.500      87.500      -7.500     71101
   3      87.500       7.500      87.500       7.500     42029
   4      87.500       7.500      87.500      -7.500     19755
   5      87.500       7.500      42.500      -7.500      9846
   6      87.500      -7.500      42.500      -7.500      7960
现在我希望将以上文件内容读入到数据库文件中（不知道文本文件的具体格式），以便于进行数据操作，请问如何读入？

Answer 1

应该有办法，好象我以前用别的工具做过，是用odbc吧？odbc好象有一种文本格式的。

Answer 2

只要你愿意当然没有什么不可一，但是这格式要你自己分析。
算法要自己写的。delphi还没有智能到那个地步。

Answer 3

如果实在没有办法，不妨采用以下最基本的办法，
肯定好用，但不一定有效率。
思路：
一、想办法把
  1      87.500      -7.500      87.500       7.500    101489
　　变为
  1,     87.500,     -7.500,     87.500,      7.500,   101489
  1)通过EXCEL转换
  2)自己通过代码转换，应该不难
二、把文本文件读入TStringList中，这总可以做到吧。
  这样TStringList.strings[i]就对应每一行。
  vS := Trim(TStringList.strings[i]);
  vS := StringReplace(vS,',',#13#10,参数); // 意即把逗号换成回车换行
  vS := Trim(vS);
  另建一个TStringList,SL2
  SL2.add(vS);
  这样SL2中的每一行即是你所要的每一个字段的内容。
  fieldvalue[i] := SL2[i];
三、结束。
  

Answer 4

回fmj(fmjstone) 将1      87.500      -7.500      87.500       7.500    101489
　　变为
  1,     87.500,     -7.500,     87.500,      7.500,   101489
的格式后用数据库中的批处理就可以很方便的处理了。但是关键就是怎么将格式变为
1,     87.500,     -7.500,     87.500,      7.500,   101489。请指教！！！