可以这样解决:
create procedure sum_student
(@Vid int)
AS
DECLARE @sum int
SELECT @Vsum=sum(成绩) FROM 学生表 WHERE 学号=@Vid
REURN @Vsum在DELPHI中
begin
with storeproc1 do
begin
parameters.parambyname('@Vid').value:=StrToInt(edit1.text);
execproc;
end;
eidt2.text:=IntToStr(params.parambyname('@Return_Value').value);
end;
create procedure sum_student
(@Vid int)
AS
DECLARE @sum int
SELECT @Vsum=sum(成绩) FROM 学生表 WHERE 学号=@Vid
REURN @Vsum在DELPHI中
begin
with storeproc1 do
begin
parameters.parambyname('@Vid').value:=StrToInt(edit1.text);
execproc;
end;
eidt2.text:=IntToStr(params.parambyname('@Return_Value').value);
end;
解决方案 »
- 在Memo中显示字符不正常呢/
- delphi7.0中能否定义treeview的节点数组啊
- 怎么会这样高手们来看看我郁闷阿
- 弱弱地问,怎样显示一个窗体?
- 郁闷!!!装了sp2后xp不能使用IE打开本地XML文件
- 在button前面怎么加图片??
- 新手做报表,在线急!
- 上标的处理?急...
- Report Builder、FastReport、ReportMachine等报表工具中,谁实现过固定标题和列,类似Excel中那样?
- 为什么在预览报表的时候会先跳出装载报表控件的窗体,然后才能预览报表?是什么错误造成的?
- listview的简单问题?
- 如何将StringGrid中的数据读取到DBGrid中?
create procedure sum_student
(@Vid int)
AS
DECLARE @sum int
SELECT @Vsum=sum(成绩) FROM 学生表 WHERE 学号=@Vid
REURN(@Vsum)在DELPHI中
begin
with storeproc1 do
begin
parameters.parambyname('@Vid').value:=StrToInt(edit1.text);
execproc;
end;
eidt2.text:=IntToStr(params.parambyname('@Return_Value').value);
end;
sql('declear @sum int')
sql('exec @sum=存储过程名 参数')
sql('select sum=@sum')
....
sum=query1.FieldByName('sum').asinteger;