在线等--数据对齐？

Question

我已把数据写入文本文件了，现象把它报出来，数据如下：
序号    名称                符号      单位      计算公式及来源                          数值      
1       燃料低位发热量值    Qdw       KJ/Kg                                             18656     
2       冷空气温度          tlk       oC                                                20        
3       理论冷空气焓        Ilko      KJ/Kg     Vo(ct)k                                 114.10    
4       排烟温度            vpy       oC                                                165       
5       排烟焓              Ipy       KJ/Kg                                             1402.9795 
6       固体不完全燃烧损失  q4        %                                                 10        
7       气体不完全燃烧损失  q3        %                                                 1.0       
8       排烟损失            q2        %         (Ipy-apy*Ilko)*(100-q4)/Qdw             5.8998    
9       散热损失            q5        %                                                 1.0       
10      飞灰份额            afh                                                         0.2       
11      灰渣焓              Cvh       KJ/Kg                                             560.2     
12      灰渣物理热损失      q6        KJ/Kg      q6=Cvh*0.8*Aar/Qdw;                    0.8425    
13      锅炉总热损失        totalq    %         totalq=q2+q3+q4+q5+q6                   16.7422   
14      锅炉热损失          n         %          n=100-totalq                           83.2578   
15      过热蒸汽焓          igr       KJ/Kg                                             3238.3    
16      饱和水焓            ibs       KJ/Kg                                             981.2     
17      给水温度            tgs       oC                                                105       
18      给水焓              igs       KJ/Kg                                             441.65    
19      排污率              ppw       %                                                 3         
20      蒸汽湿度            W         %                                                 2         
21      气化潜热            r         KJ/Kg                                             1840.3    
22      锅炉蒸发量          D         Kg/s                                              9.73      
23      锅炉输出量          Q1        KW        Q1=Ds*(Igr-Igs)+D*ppw*(Ibs-Igs)/100     26832.2614
24      燃料消耗量          B         Kg/s       B=100*Q1/(Qdw*n                        1.7275    
25      计算燃料消耗量      Bj        Kg/s      Bj=B*(100-q4)/100                       1.5893    
26      保热系数            fi                  br=1-q5/(n+q5                           0.9881    
 在报表中不知怎样使之想这样齐？

Answer 1

我是这么写的：
  procedure TQuickReport2.QuickRepNeedData(Sender: TObject;
  var MoreData: Boolean);
    var
         source：string；
begin
   if not eof(infile) then
     begin
      readln(infile, source);
      MoreData:=true;     end
     else
      MoreData:=false;end;
 我不知怎样把一行分成几段？
请大家指教？