Hi,

Je n'arrive pas à récupérer la valeur @@Identity à partir de Delphi. La valeur inexorablement retournée est 0 alors que des enregistrements ont bien été ajoutés dans ma table.

Environnement : MySQL 5.1 (tables InnoDB), composants dbExpress, application multi-niveaux.

Voici mon code :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
Function TfrmCtrClient.RecupAutoInc: Integer;
begin
  with SQLQuery do begin
    Close;
    with SQL do begin
      Clear;
      Add('SELECT @@Identity');
    end;
    Open;
    RecupAutoInc:=FieldByName('@@Identity').AsInteger;
  end;
end;
Une solution ?

Merci.



JJE