Discussion :

[hamza_java]

Bonjour,
J'ai un problème pour séléctionner une ligne dans DBGRID que je viens d'insérer dans la base (CAD: Quand je fais le refresh dans dataset/dbgrid, alors, il récupère toutes les lignes enregistrées dans la base et puis, je veux qu'il point sur la ligne que je viens d'insérer.
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
13
14
15
16
17
18
19
20
21
22
23
24
25
26
 
procedure TForm3.BitBtn1Click(Sender: TObject);
begin
with IBquery2 do
begin
 IBQuery2.SQL.Clear;
 IBQuery2.sql.add('insert into MATAB (N, Nom, Prnom) values (:p1, :p2, :p3) ');
 
 IBQuery2.parambyname('p1').value := edit1.text;
 IBQuery2.parambyname('p2').value := edit2.text;
 IBQuery2.parambyname('p3').value := edit3.text;
 
  try execSQL;
  except  showmessage('erreur');
  end;
 
  IBQuery3.SQL.Clear; //Efface le contenu de la stringlist
  IBQuery3.SQL.Add('SELECT * from MATAB order by N');
  IBQuery3.Open; //Active la requête
 
edit1.Clear;
edit2.Clear;
edit3.Clear;
edit1.SetFocus;
end;
end;

[ShaiLeTroll]

Faudrait faire un Locate

Si N est ton ID unique, tu fais un locate sur N

Si N n'est pas ton ID unique, regarde si ton INSERT INTO est capable de retourner l'ID (@@IDENTITY, RETURNING ... INTO)
tu pourrais retrouver la ligne facilement

Enfin, si tu n'a pas d'ID unique, refaire un Locate (N, Nom, Prnom) avec les risques de doublon


J'espère que tu n'affiches pas des milliers de ligne dans une grille depuis MATAB, cela sera contre-performant

[hamza_java]

Faudrait faire un Locate

Si N est ton ID unique, tu fais un locate sur N

Si N n'est pas ton ID unique, regarde si ton INSERT INTO est capable de retourner l'ID (@@IDENTITY, RETURNING ... INTO)
tu pourrais retrouver la ligne facilement

Enfin, si tu n'a pas d'ID unique, refaire un Locate (N, Nom, Prnom) avec les risques de doublon


J'espère que tu n'affiches pas des milliers de ligne dans une grille depuis MATAB, cela sera contre-performant

MERCI ça a marché avec :

Code :

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

1
2
 
 IBQuery3.Locate('N',VarArrayOf([Edit1.Text]),[]) ;