delphi 提取txt文件中的数据流形成曲线图
delphi 提取txt文件中的数据流形成曲线图

之前提取excel，但这个excel有问题，问了厂家的人才知道它们生成的其实不是excel文件，它们也是提取txt文件来生成曲线图的。请问大家这个txt文件提取要怎么做啊？不会啊！！

2.00000000000000E+0002 4.07915590655671E+0004 0.00000000000000E+0000 0.00000000000000E+0000 0.00000000000000E+0000
2.37000000000000E+0002 2.50000000000000E-0004 0.00000000000000E+0000 6.71000000000000E-0003 -4.00000000000000E+0000 4.70000000000000E+0001
2.42000000000000E+0002 1.25000000000000E-0004 0.00000000000000E+0000 6.71000000000000E-0003 -4.00000000000000E+0000 9.40000000000000E+0001
2.44500000000000E+0002 1.25000000000000E-0004 0.00000000000000E+0000 1.06750000000000E-0002 -4.00000000000000E+0000 1.56000000000000E+0002
2.51500000000000E+0002 1.25000000000000E-0004 0.00000000000000E+0000 1.46400000000000E-0002 -3.00000000000000E+0001 2.19000000000000E+0002
2.78500000000000E+0002 1.25000000000000E-0004 0.00000000000000E+0000 1.86050000000000E-0002 -3.00000000000000E+0001 2.81000000000000E+0002
3.14500000000000E+0002 1.25000000000000E-0004 0.00000000000000E+0000 3.38550000000000E-0002 -3.00000000000000E+0001 3.28000000000000E+0002


里面的数据是这样的，我对照excel那个文件倒是能分辨出应该取几位。
2370.0002500.00671-447
2420.00012500.00671-494
244.50.00012500.010675-4156
251.50.00012500.01464-30219
278.50.00012500.018605-30281
314.50.00012500.033855-30328
前六条数据是这样的

[解决办法]
那不是以空格分开吗，那就读出每一行，以空格分隔（TStringList可以干），然后计算到界面点坐标
[解决办法]
为啥用adoconnection和adoquery？
直接读txt不就成了？
[解决办法]
两个问题：1.取得数据 2.画图，画图可以用TChart
[解决办法]
procedure TForm1.Button1Click(Sender: TObject);
var
f: TextFile;
FileN: String;
Data1, Data2, Data3,Data4,Data5,Data6: Double;
begin
FileN := ExtractFilePath(Application.ExeName) + '数据文件.txt';
if FileExists(FileN) then
begin
AssignFile(f, FileN);
Reset(f);
while not Eof(f) do
begin
ReadLn(f, Data1, Data2, Data3,Data4,Data5,Data6);
//用chart画曲线
chart1.Series[0].AddXY( Data2, Data1,'',clBlack);

end;
CloseFile(f);
end;
end;