下面是delphi编的，要转换成builder，哪位帮帮我呢？
function  TMainForm.ExportToExcel(DSet:TDataSet):Integer; 
  var 
      i,j:integer; 
      f:TextFile; 
      sl:TStringList; 
  begin 
      Result  :=  1; 
      with  DSet  do 
      begin 
          if  (not  DSet.Active)  then 
              Exit; 
   
          if  (not  SaveDialog.Execute)  then 
              Exit; 
   
          AssignFile(f,SaveDialog.FileName); 
          try 
              Rewrite(f); 
          except 
              ShowInfo('保存文件失败！'); 
              WriteErrorLog('保存文件失败:'  +  SaveDialog.FileName); 
              CloseFile(f); 
              Exit; 
          end; 
   
          Screen.Cursor  :=  crHourGlass; 
          DisableControls; 
          sl  :=  TStringList.Create; 
          sl.Clear; 
          for  i:=0  to  FieldCount-1  do 
          begin 
              if  (Fields[i].Visible)  then 
                  sl.Add(Fields[i].DisplayLabel); 
          end; 
          writeln(f,sl.CommaText); 
   
          First; 
          for  j:=0  to  RecordCount-1  do 
          begin 
              sl.Clear; 
              for  i:=0  to  FieldCount-1  do 
              begin 
                  if  (Fields[i].Visible)  then 
                      sl.Add(VarToStr(Fields[i].Value)); 
              end; 
              writeln(f,sl.CommaText); 
              Next; 
          end; 
   
          sl.Free; 
          CloseFile(f); 
          EnableControls; 
          Screen.Cursor  :=  crDefault; 
      end; 
      Result  :=  0; 
  end;

同意

同意上面3位
步骤是这样的
1、选择Projet|Add to Project
2、从Add to Project对话框中选择CPP、C、PAS、RES、LIB或OBJ。对于Delphi单元，选择PAS。
3、浏览目录并选择加入项目所需要的文件。
4、找到所需的文件后，单击Open完成。无须以任何方式进一步处理Pascal文件。

直接加到工程中不就好了。