关于DTS数据转换过程中的Quertion,但凡会的请解答～


begin
    for i := 1 to pConn.ConnectionProperties.Count do
    begin
      sPropertyName := pConn.ConnectionProperties.item(i).Name;
      if sPropertyName = 'Mode' then
        pConn.ConnectionProperties.item(i).Value := iMode;
      if sPropertyName = 'Row Delimiter' then   //定义行分隔符为回车换行
        pConn.ConnectionProperties.item(i).Value := #13+#10;
      if sPropertyName = 'File Format' then
        pConn.ConnectionProperties.item(i).Value := 1;
      if sPropertyName = 'Column Delimiter' then //定义列分隔符为TAB键
        pConn.ConnectionProperties.item(i).Value := #9;
      if sPropertyName = 'File Type' then
        pConn.ConnectionProperties.item(i).Value := 1;
      if sPropertyName = 'Skip Rows' then
        pConn.ConnectionProperties.item(i).Value := 0;
      if sPropertyName = 'Text Qualifier' then
        pConn.ConnectionProperties.item(i).Value := '''';
      if sPropertyName = 'First Row Column Name' then
        pConn.ConnectionProperties.item(i).Value := false;
      if sPropertyName = 'Column Names' then
      dts_conn2.ConnectionProperties.item(i).Value := 'BrandCode,BrandName,BrandEName,Re';
      if sPropertyName = 'Number of Column' then
        pConn.ConnectionProperties.item(i).Value := iNumOfColumn;
      if sPropertyName = 'Text Qualifier Col Mask: 0=no, 1=yes, e.g. 0101' then
        pConn.ConnectionProperties.item(i).Value := '1111';
      if sPropertyName = 'Max characters per delimited column' then
        pConn.ConnectionProperties.item(i).Value := 8000;
      if sPropertyName = 'Blob Col Mask: 0=no, 1=yes, e.g. 0101' then
        pConn.ConnectionProperties.item(i).Value := '0000';
    end;
上面是文本格式定义，不知道少什么，爱新觉罗你看看吧，delphi定义的