ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('sp_databases'); ADOQuery1.Open; while not ADOQuery1.Eof do begin ShowMessage(ADOQuery1.Fields[0].AsString); ADOQuery1.Next; end; ADOQuery1.Close;
ADOStoredProc组件是专门用来调用存储过程 设好它的Connection和DataSource属性 With ADOStoredProc1 do begin Close; ParamByName('@percentage').AsInteger:=100;//@percentage'为存储过程的参数 Active:True; end;
也可以用 select * from master..sysdatabases 得到数据库名,suid<>1 为用户创建的数据库名。
上面有一个地方错了,ADOStoredProc组件是专门用来调用存储过程 设好它的Connection和procedurename属性 With ADOStoredProc1 do begin Close; ParamByName('@percentage').AsInteger:=100;//@percentage'为存储过程的参数 Active:True; end;
ADOQuery1.SQL.Add('sp_databases');
ADOQuery1.Open;
while not ADOQuery1.Eof do begin
ShowMessage(ADOQuery1.Fields[0].AsString);
ADOQuery1.Next;
end;
ADOQuery1.Close;
另外:Delphi中提供的ADOStoredProc组件能否实现以上功能,如何实现?俺是Delphi初学者望大虾们能够多多帮助,感激不尽!
设好它的Connection和DataSource属性
With ADOStoredProc1 do
begin
Close;
ParamByName('@percentage').AsInteger:=100;//@percentage'为存储过程的参数
Active:True;
end;
设好它的Connection和procedurename属性
With ADOStoredProc1 do
begin
Close;
ParamByName('@percentage').AsInteger:=100;//@percentage'为存储过程的参数
Active:True;
end;
能否就sp_databases给俺举个例子?多谢!