初学Delphi与sql server的存储过程

--修改存储过程
1 alter proc SelectAddr
    --增加一个入参
2   @addr varchar(50)
3 as
4 begin
5   select * from MTable t where t.Addr = @addr 
6 end

点击执行，就可以才数据库-可编程性-存储过程下看到新建的SelectAddr这个存储过程了

2、在Delphi设计好的界面双击Button按钮

1 procedure TForm4.Button1Click(Sender: TObject);
2 var
3   sSqlText:string;
4 begin
5   sSqlText := Format(‘exec SelectAddr %s‘,[‘3606163310030817‘]);
6   ADOQuery1.SQL.Clear;
7   ADOQuery1.SQL.Add(sSqlText);
8   ADOQuery1.Open;
9 end;

编译，结果如下图，查询出Addr的一条记录：

初学Delphi与sql server的存储过程

标签：exec   char   地址   初学   点击   col   存储过程   bsp   login