使用MyDAC执行进程

Question

我在使用c++ Builder2010中的dac组件在MySQL服务器上执行简单程序时遇到了问题。

我在delphi中找到了一个示例，但我更喜欢在c++ http://stackoverflow.com/questions/3704173/return-value-of-stored-functions-in-mydac中看到一个示例

求求你，我需要你的帮助！我需要一个在c++中执行存储过程的简单示例，也欢迎生成器链接！

Answer 1

以下是使用MyDAC执行存储过程的示例：

void __fastcall TForm1::BitBtn1Click(TObject *Sender) {
  TMyConnection* con = new TMyConnection(this);
  con->Server = "servername";
  con->Port = 3306;
  con->Username = "username";
  con->Password = "password";
  con->LoginPrompt = False;
  con->Database = "databasename";

  // you should comment this code after the first execution
  TMyQuery* qr = new TMyQuery(this);
  qr->Connection = con;
  qr->SQL->Clear();
  qr->SQL->Add("CREATE PROCEDURE SumTwoInts(IN Num1 INT, IN Num2 INT, OUT Num3 INT)");
  qr->SQL->Add("BEGIN");
  qr->SQL->Add("SET Num3 = Num1 + Num2;");
  qr->SQL->Add("END");
  qr->Execute();

  TMyStoredProc* sp = new TMyStoredProc(this);
  sp->Connection = con;
  sp->StoredProcName = "SumTwoInts";
  sp->PrepareSQL();
  sp->ParamByName("Num1")->AsInteger = 2;
  sp->ParamByName("Num2")->AsInteger = 3;
  sp->Execute();
  ShowMessage(IntToStr(sp->ParamByName("Num3")->AsInteger));
}

您可以通过以下方式使用TMyQuery组件执行存储过程：

void __fastcall TForm1::BitBtn1Click(TObject *Sender) {
TMyConnection* con = new TMyConnection(this);
con->Server = "servername";
con->Port = 3306;
con->Username = "username";
con->Password = "password";
con->LoginPrompt = False;
con->Database = "databasename";

TMyQuery* qr = new TMyQuery(this);
qr->Connection = con;
qr->SQL->Text = "CALL SumTwoInts(:Num1, :Num2, @Num3); SELECT CAST(@Num3 AS SIGNED) AS '@Num3'";
qr->ParamByName("Num1")->AsInteger = 2;
qr->ParamByName("Num2")->AsInteger = 3;
qr->Open();
ShowMessage(IntToStr(qr->Fields->Fields[0]->AsInteger));
}

但是我们建议您使用TMyStoredProc组件来执行存储过程。