查询库存软件

Question

现已在SQL内建立一个名为"EXPBOM"存储过程
此存储过程为ERP系统内以BOM查询库存所用
现想用Delphi写一个查询软件
即在Edit1中输入任一数字
然后点击Button1按键
在本窗口中显示所有符合EXPBOM存储过程数据
并且需将所显示的数据能导出为Excel档
请高手帮忙
谢谢!

Answer 1

--方法很多,我随手写一个
procedure Tformbutton1click(Sender:TObject)
var
  str:string;
begin
  str:='select * from openrowset(''sqloledb'',''ip'';''sa'';''password'',''set fmtonly off; exec 数据库..过程名(参数)'')';
  with adoquery1 do
    begin
      close;
      sql.clear;
      sql.add(str);
      execsql;
    end;end;

Answer 2

楼主要是不习惯adoquery的话，可以用adostoreproc这个控件，设置好相关属性就可以了

Answer 3

SP1:   TADOStoredProc; SP1.Close;   
SP1.ProcedureName   :=   'adduserpoint';   
SP1.Parameters.Refresh; 
SP1.Parameters.ParamByName('@uid').Value   :=   1; 
SP1.Parameters.ParamByName('@aid').Value   :=   2; 
SP1.Parameters.ParamByName('@time').Value   :=   3; 
sp1.ExecProc;

Answer 4

EXPBOM为SQL数据库新立的存储过程名称
BOM为以下附图中所标名的任一数字怎么去做这个软件
代码应该怎样去写
并且写好这个软件都需要那些控件