Wie kann ich das Ergebnis einer Anfrage nach dem Ausführen der Anfrage mit C++ Builder XE6 und Firebird erhalten?

Question

Nach dem Verbinden mit einer Firebird-Datenbank mit C++ Builder kann ich kein Ergebnis von einer einfachen Auswahlanforderung erhalten.

Ich habe einige Verwirrung über viele Mitglieder der Klassen:

void __fastcall TForm2::btn1Click(TObject *Sender) 
{ TSQLConnection co = new TSQLConnection(this); 
    Base_Firebird *fb = new Base_Firebird() ; 
    bool bl = fb->Connecter(co); 
    String sqlstring = "select nom_action from T_ACTION where CLE_ACTION=6 ";  
    if (bl)  
     TSQLQuery *req = new TSQLQuery(NULL) ;  
    req->SQLConnection = co ; 
    req->SQL->Add(sqlstring); 
    req->Open() ; 
    } 

Mein Problem ist hier nach dem TSQLQuery Öffnen, ich weiß nicht, wie ich das Ergebnis bekommen und den Befehl auszuführen.

Answer 1

Versuchen Sie das Ende Ihrer Unterprogramm zu so etwas wie dies zu ändern:

if (bl)  
{ /// you forgot compound operator here !!!!! 
     TSQLQuery *req = new TSQLQuery(this) ;  
    req->SQLConnection = co ; 
    req->SQL->Text = sqlstring; 
    req->Open() ; 

    int j = 0; 
    while(!req->EOF()) 
    { 
     ++j; 
     String Value = req->Fields[0]->AsString; 
     ShowMessageFmt("Row %d ==> Value: %s ", ARRAYOFCONST((j, Value))); 

     // String MSG = Format("Row %d ==> Value: %s ", ARRAYOFCONST((j, Value))); 
     // ShowMessage(MSG); 

    req -> Next(); 
    }; 
    req->Close(); 
    ShowMessage("Data over."); 
    } 
    req -> Free(); // maybe "delete req;" would work too, dunno 
} 

zu prüfen:

• http://docwiki.embarcadero.com/Libraries/Seattle/en/Vcl.Dialogs.ShowMessageFmt
• http://docwiki.embarcadero.com/Libraries/Seattle/en/System.SysUtils.Format
• https://osdn.net/projects/cc1101driver/scm/svn/blobs/head/trunk/VC_test/Cpp_builder_2009/Cpp_Builder_test/documents/JVC_20120502/jvcl/examples/JvProgressDialog/BCB/JvProgressDialogMain.cpp
• http://www.texttransformer.com/d2chelp/cbuilderarrayofconst.htm
• http://docwiki.embarcadero.com/RADStudio/Seattle/en/Open_Arrays#C.2B.2B_functions_that_take_open_array_arguments
• http://docwiki.embarcadero.com/RADStudio/Seattle/en/Support_for_Object_Pascal_Data_Types_and_Language_Concepts

Answer 2

lesen Embarcadero-Dokumentation. Es gibt ganze Kapitel, wie die SQL-Komponenten arbeiten, die Sie verwenden, einschließlich:

How To Perform Database Procedures

Navigating Datasets

Using dbExpress

Using dbExpress Components Index

Using TSQLQuery

Data.SqlExpr.TSQLQuery

Zum Beispiel:

void __fastcall TForm2::btn1Click(TObject *Sender) 
{ 
    TSQLConnection *co = new TSQLConnection(NULL); 
    Base_Firebird *fb = new Base_Firebird(); 
    if (fb->Connecter(co)) 
    { 
     TSQLQuery *req = new TSQLQuery(NULL); 
     req->SQLConnection = co; 
     req->SQL->Text = "select nom_action from T_ACTION where CLE_ACTION=6"; 
     req->Open(); 
     while (!req->Eof) 
     { 
      // use req->Fields as needed... 
      req->Next(); 
     } 
     delete req; 
    } 
    delete fb; 
    delete co; 
}