Traduire ce bout de code Delphi

Bonjour,

j'ai un petit bout de code que je n'arrive pas à tous traduire en c++ Builder.
je mets en commentaire les instructions que j'ai pu traduire à l'aveuglette mais ça n'a pas marché!

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19

function NouvelID(Table, Clef: String): Integer; // int NouvelID(TTable Table, String Clef) begin   with SQLRequeteID do //SQLRequeteID étant le nom du composant TQury begin Close; SQL.Clear; //SQLRequeteID->SQL->Clear(); SQL.Add('select max(' + Clef + ') from ' + Table); //SQLRequeteID->SQL->Add('select max(' + Clef + ') from ' + Table); ExecQuery; //SQLRequeteID->ExecSQL(); Result := Fields[0].AsInteger + 1; //Result = Fields[0]->AsInteger + 1; Close; end; end;

---

est ce que vous pouvez m'aider là dessus ?

Merci d'avance :)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

function NouvelID(Table, Clef: String): Integer; begin with SQLRequeteID do //ici SQLRequeteID n'est pas un TQUery begin Close; SQL.Clear; SQL.Add('select max(' + Clef + ') from ' + Table); ExecQuery; Result := Fields[0].AsInteger + 1; Close; end; end;

---

Ce qui donne en utilisant un TQuery:

Code:

---

1 2 3 4 5 6 7 8 9 10 11

int NouvelID(AnsiString Table, AnsiString Clef) {   SQLRequeteID->Close(); // ou SQLRequeteID->Active = false; SQLRequeteID->SQL->Clear(); SQLRequeteID->SQL->Add("select max(" + Clef + ") as MAX_VALUE from " + Table ); SQLRequeteID->Open(); // ou SQLRequeteID->Active = true; int result = SQLRequeteID->FieldByName( "MAX_VALUE")->AsInteger + 1; SQLRequeteID->Close(); // ou SQLRequeteID->Active = false; return( result ) ; }

---

J'ai pas BCB sous la main, mais ca devrait fonctionner comme ça...

A noter qu'avec un TQuery, lorsque tu fais un SELECT tu ne dois pas utiliser ExecSQL mais Open (ou Active=true).

merci sat83 pour la solution et les précisions, j'ai une erreur: SQLRequeteID non défini, pourtant je l'ai bien renseigné dans la propriété Name du composant TQury

C'est que ta fonction n'est pas déclaré dans la même classe que ton composant TQuery.
Il faut ajouter la déclaration de la fonction dans ton *.h, et indiquer dans ton *.cpp que la fonction appartient à la classe :

Code:

---

1 2	//Dans la partie private de ton *.h int NouvelID(AnsiString Table, AnsiString Clef) ;

---

En supposant que ta classe s'appelle TForm1:

Code:

---

1 2 3 4 5

//Dans ton cpp int TForm1::NouvelID(AnsiString Table, AnsiString Clef) { // }

---

Ou sinon, autre solution moins "propre" :

Code:

---

1 2 3 4 5 6 7 8 9 10

int NouvelID(AnsiString Table, AnsiString Clef) { Form1->SQLRequeteID->Close(); // ou SQLRequeteID->Active = false; Form1->SQLRequeteID->SQL->Clear(); Form1->SQLRequeteID->SQL->Add("select max(" + Clef + ") as MAX_VALUE from " + Table ); Form1->SQLRequeteID->Open(); // ou SQLRequeteID->Active = true; int result = Form1->SQLRequeteID->FieldByName( "MAX_VALUE")->AsInteger + 1; Form1->SQLRequeteID->Close(); // ou SQLRequeteID->Active = false; return( result ) ; }

---

Merci beaucoup sat83 c'est bien résolu :ccool: