Delphi adodataset1 call the Stored Procedure Method

Delphi adodataset1 call the Stored Procedure Method

Special usage of adodataset1

Stored Procedure

Create procedure adddata @ name nvarchar (20), @ MM nvarchar (20), @ DDD nvarchar (30), @ RDATA nvarchar (30) asinsert into table (name, mm, DDD) values (@ name, @ MM, @ DDD) set @ redata = 'Operation successfully'; select @ redata as redatareturn 1go

DelphiCodeFragment

Procedure tform1.bitbtn1click (Sender: tobject); vartstr: string; begintstr: = '000000'; adodataset1.close; adodataset1.commandtext: = 'adddata a, a, '+ tstr; // write the Stored Procedure showmessage (adodataset1.commandtext); adodataset1.open; showmessage (adodataset1.fieldbyname ('redata '). asstring); // The returned value end;