Discussion :

[naproc]

Bonjour;

Je viens vous expliquer mon problème parce que je sèche et que google et les sujets de discussion de ce forum ne mon pas révélé la solution

Alors voila j'ai un DBgrid et une requete IBquery (TIBQuery) qui fonctionne correctement et quand je double click sur mon DBgrid j'ouvre un nouveau form pour afficher plus en détail les données de la ligne.

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
procedure TFormliste.DBgridDblClick(Sender: TObject);
 
begin
  inherited;
 
  main.xnumcde:= IBquery2.FieldByName('NUMCDE').AsString;
 
  if trim(main.xappel) = '' then
     exit;
 
  FormFicheLitige.ShowModal;
 
  IBQuery2.Open;  
 
end;

Mon souci vient du faite que lorsque je revient sur le form de départ je n'ai pas trouvé de solution pour afficher les données en sélectionnant la ligne que l'utilisateur vient de regarder. Pour moi le souci vient de cette ligne.

Code :

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

IBQuery2.Open;

Cela Ré-exécute la requête mais je n'ai pas trouvé le moyen d'afficher à nouveau les résultat sans le faire.

j'ai bien essayer de récupérer le numéro de la ligne et de faire ceci :

Code :

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

1
2
3
4
5
6
7
  colonne := TDrawGrid(DBgrid).Row;
  dbgrid.DataSource.DataSet.First;
   for i:=1 to colonne-1 do 
    begin
      dbgrid.DataSource.DataSet.Next;
    end;
    dbgrid.SelectedRows.CurrentRowSelected := true;

Mais cela ne fonctionne que pour un nombre limiter d'enregistrement. (32 le nombre max que j'affiche dans la dbgrid si on descend avec le curseur il ne compte plus les premier)

Il me faudrait donc soit une technique pour afficher le résultat de la requête sans la ré-exécuter (pas sur que ce soit faisable). soit m'aider pour que je puisse récupérer la valeur de mon 1er champ pour que je puisse faire une comparaison et une moulinette comme avec le numéro de colonne.


Merci

[ShaiLeTroll]

inherited;dans le doucle clic est curieux !
Tu as un héritage de Form ?

Sinon, Locate, FindFirst ... du IBQuery

[naproc]

merci pour ta réponse ShaiLeTroll.

j'ai utilise locate et ça fonctionne impeccable

pour le inherited oui dans l'apply que je modifie (c'est pas moi qui l'ai dev à la base) il y a de l’héritage de form toute les form ont la même tête.