Discussion :

[tarmo57]

salut tous j'ai un petit et je ne trouve pas d'astuce pour améliorer mon petit programme.Je vous explique
form1 j'ai un DBgrid alimenter par un Query
Form2 je modifie les données de mon Query je valide sur un bouton qui me ferme la Form2 Je fais aussi

Code :

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

1
2
Query.active:=true
Query.active false

mise a jour de mon query ok
mais dans ma form1 j'aimerais si possible avoir la sélection sur mon DBgrid de l'enregistrement que je viens de modifier .Une idée ??
je ne sais pas comment faire.Car forcement la form1 se réactive mon query est alimenté par un requête Du style

Code :

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

Select * from matable Order by Nom ASC

la selection de mon DBgrid et sur Mr AAAAA le premier de ma table. Merci de votre aide

[SergioMaster]

c'est tout a fait le genre de cas où il faut utiliser le TBookmark

un canevas de solution :

Code :

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

1
2
3
4
5
6
7
8
9
10
 
var B : TBookmark;
begin
B:=Query1.GetBookMark
DBGrid.DisableControls;
Query1.Active:=False;
// appel de Form2 etc...
Query1.Active:=True;
Query1.GotoBookmark(B);
DBGRid.EnableControls;

[Montor]

juste qu'il faut ajoute un try finally

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
var B : TBookmark;
begin
B:=Query1.BookMark;
Query1.DisableControls;
try
   Query1.Active:=False;
   // appel de Form2 etc...
   Query1.Active:=True;
finally
   Query1.Bookmark:=B;
   Query1.EnableControls;
end;

[Lung]

c'est tout a fait le genre de cas où il faut utiliser le TBookmark

Pas bête !
Moi, j'utilisais le Locate.

[ShaiLeTroll]

Idem, j'utilise le Locate surtout que le BookMark peut ne plus être valide entre Close et le Open !
Surtout dans le cas d'accès concurrentiels où des lignes peuvent être supprimées ou insérées !

Faudrait pas oublier FreeBookmark aussi !

[tarmo57]

Supers les gars sa marche super bien Merci.

Je vais profiter de votre savoir et de votre sympathie.
la c nickel je tombe dans mon DBGrid sur le nom que je demande.la ligne du DBGrig et sélectionné .
Maintnant serait il possible de créer un clic de la souris pour activé la sélection.
car dans l'événement OnCellClick du DBRid j'affiche les données de la ligne de mon client.Possible ?

[Jeankiki]

Salut tarmo57,

il suffit de faire un

Code :

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

1
2
 
 DBGridCellClick(nil);

Etant donné que ta query ou ton locate va se positionner sur le bon enregistrement, il va simuler le click sur le bon enregistrement.

Jeankiki

[tarmo57]

Salut tarmo57,

il suffit de faire un

Code :

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

1
2
 
 DBGridCellClick(nil);

Etant donné que ta query ou ton locate va se positionner sur le bon enregistrement, il va simuler le click sur le bon enregistrement.

Jeankiki

Super grand merci à tous

[Montor]

Faudrait pas oublier FreeBookmark aussi !

en réalité il s agit d'un TBookmarkStr
Le code et efficace avec les operation de genre

Code :

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

1
2
while not Dataset.Eof do
   Dataset.Next()