Discussion :

[SmileSoft]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[sat83]

Code pascal :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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).

[SmileSoft]

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

[sat83]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

En supposant que ta classe s'appelle TForm1:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
//Dans ton cpp
int TForm1::NouvelID(AnsiString Table, AnsiString Clef) 
{
//
}

Ou sinon, autre solution moins "propre" :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

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 ) ;
}

[SmileSoft]

Merci beaucoup sat83 c'est bien résolu