小弟初学者,想请教一个问题,怎么样才能用delphi打开 别的软件,然后再把dbgridEh的数据传递过去?该软件用类似Excel的表格操作界面,用于数据分析。可以导入到处Excel文件。

解决方案 »

  1.   

    我用的是excel的svs格式,和文本文件一样大小
    导出我用的直接写
      for iii:=0 to KKK do
         begin
         write(tf,adoqueryA.fields[iii].Displaylabel);
         write(tf,',');
         end;
    导入也是,用的insert
    先找到路径再insert
      sss,rrr1,rrr2: string;
      iii,jjj:integer;
    begin
      sss:=paths;
      iii:=length(sss);
      jjj:=length(StrRScan(PChar(sss), '\'));
    rrr1:=copy(sss,1,iii-jjj);
    rrr2:=copy(sss,iii-jjj+2,jjj-1);
    sss:=' [Text;database='+rrr1+'].'+rrr2;
        try
          adoqueryA.Close;
          adoqueryA.SQL.Clear;
          adoqueryA.Parameters.Clear;
          adoqueryA.ParamCheck := false;
          adoqueryA.SQL.Text :='insert into '+TTT+' select * from '+sss;
          adoqueryA.Execsql;
          MessageDlg('导入成功',mtConfirmation,[mbYes],0);
        except
          MessageDlg('导入失败',mtConfirmation,[mbYes],0);
         end;
      

  2.   

    您好,感谢你的帮忙,您可以再说下 delphi如何动态调用其他应用程序吗
      

  3.   

    怎样算是动态调用其他应用程序?winexec?
      

  4.   

    GetActiveoleobject('Excel.Aplication');
    调用Excel可以这样写 这是在网上面找的 但是我吧'Excel'换成 我想调用的应用程序就是不行,请指点!
      

  5.   


    WINEXEC(pchar('E:\ABC.EXE'),0);//方法1
    shellexecute(0,nil,pchar('E:\ABC.EXE'),nil,nil,sw_shownormal) ;//方法2
      

  6.   

    3q!了解!
    但是我还有个问题,就是打开程序后有什么办法能把Dbgrid里数据导到 应用程序里面呢。程序是Dps2000,类似Excel的数据分析软件。
    麻烦了!