请教:关于Delphi调用其他程序 急啊!在线等,请高手指点! 小弟初学者,想请教一个问题,怎么样才能用delphi打开 别的软件,然后再把dbgridEh的数据传递过去?该软件用类似Excel的表格操作界面,用于数据分析。可以导入到处Excel文件。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 我用的是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; 您好,感谢你的帮忙,您可以再说下 delphi如何动态调用其他应用程序吗 怎样算是动态调用其他应用程序?winexec? GetActiveoleobject('Excel.Aplication');调用Excel可以这样写 这是在网上面找的 但是我吧'Excel'换成 我想调用的应用程序就是不行,请指点! WINEXEC(pchar('E:\ABC.EXE'),0);//方法1shellexecute(0,nil,pchar('E:\ABC.EXE'),nil,nil,sw_shownormal) ;//方法2 3q!了解!但是我还有个问题,就是打开程序后有什么办法能把Dbgrid里数据导到 应用程序里面呢。程序是Dps2000,类似Excel的数据分析软件。麻烦了! 请教一个delphi+report machine的问题,一直没想出个思路来 Halcn6db是属于哪个控件的?如何得到? 1点,又是1点 查询结果输出问题!! 大家看看这个文件操作,不知道错在哪,谢谢! 用sql查询时,如何设置与时间有关的条件语句? 如何将String变量赋给TTable变量中字段呢? 保存jpg文件的问题,在线等候! 关于类的问题。 三层或者多层应用,那么好吗? 用过vss的进.高分送 问个超复杂的问题,查找然后对比然后插入
导出我用的直接写
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;
调用Excel可以这样写 这是在网上面找的 但是我吧'Excel'换成 我想调用的应用程序就是不行,请指点!
WINEXEC(pchar('E:\ABC.EXE'),0);//方法1
shellexecute(0,nil,pchar('E:\ABC.EXE'),nil,nil,sw_shownormal) ;//方法2
但是我还有个问题,就是打开程序后有什么办法能把Dbgrid里数据导到 应用程序里面呢。程序是Dps2000,类似Excel的数据分析软件。
麻烦了!