Discussion :

[paradise]

Bonjour,
Pour faciliter la navigation dans une looongue liste (affichée dans un DBGrid donc) j'ai mis en place un accès rapide : un clic sur une lettre, un Locate dans le Dataset et il se positionne sur le 1er enregistrement commençant par la lettre choisie.
Ce que je voudrais maintenant c'est afficher cet enregistrement en haut de la liste (et ainsi voir les suivants), car par défaut il se positionne tout en bas.
J'ai essayé un peu à base de :

Code :

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

1
2
if DataSet.Locate(myField, LetterToLocate, [loCaseInsensitive, loPartialKey]) then      
  myDBGrid.Perform(WM_SYSCOMMAND, SC_VSCROLL, 0);

..mais ça provoque une violation d'accès "dans le module uxtheme.dll".

L'idéal serait de faire un scroll en connaissant le nombre de lignes affichées et la hauteur de chacune, mais sans aller jusque là un scroll sur un nombre de lignes arbitraire serait déjà très bien !
Des pistes svp ?

[Lung]

A la place du Locate (qui n'est pas fiable à 100%), peut-être que les BookMark pouraient servir à ça.
A creuser ...

[ShaiLeTroll]

Locate pas fiable ???
ça c'est uniquement lors d'une combinaison Locate + Filter où il arrivait que l'on sorte du Filter en cours, sur une position totalement fausse !

Le Problème n'est pas le positionnement logique mais le positionnement visuel sur lequel on a pas le contrôle ! Il est vrai que Locate se positionne sur l'enregistrement demandé, le DBGrid lui ne se charge que de l'afficher mais pas forcément à l'endroit voulu !

j'aurais plutôt écrit ceci

Code :

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

myDBGrid.Perform(WM_VSCROLL, SB_BOTTOM, 0);

Jouer avec SB_BOTTOM ou SB_TOP

Sinon (en pseudo code, je le laisse voir avec BookMark, BookMarkStr, GetBookMark, GotoBookMark et FreeBookMark )

Code :

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

1
2
3
4
5
6
7
if DataSet.Locate(myField, LetterToLocate, [loCaseInsensitive, loPartialKey]) then      
begin
  tmpBookMark := DataSet.BookMark;
  myDBGrid.Perform(WM_KEYDOWN, VK_NEXT, 0);
  myDBGrid.Perform(WM_KEYUP, VK_NEXT, 0);
  DataSet.BookMark:= tmpBookMark ;
end;

Avec un peu de chance, comme il est obligé de remonter d'une ligne après le Page Down, il l'a mettra en haut !

tu peux jouer avec LeftCol avec le Hack des Private d'une TCustomGrid !

[paradise]

Le Problème n'est pas le positionnement logique mais le positionnement visuel sur lequel on a pas le contrôle ! Il est vrai que Locate se positionne sur l'enregistrement demandé, le DBGrid lui ne se charge que de l'afficher mais pas forcément à l'endroit voulu !

Tout à fait, le Locate fonctionne très bien il s'agit juste de positionnement dans la grille.

j'aurais plutôt écrit ceci

Code :

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

myDBGrid.Perform(WM_VSCROLL, SB_BOTTOM, 0);

Ha oui bien vu je vais en effet essayer avec WM_VSCROLL plutôt que WM_SYSCOMMAND ! Ces messages Windows je m'y perds toujours

[paradise]

Bon cela fonctionne avec les 2 méthodes (WM_VSCROLL ou WM_KEYDOWN/UP avec un VK_NEXT).

Par contre il y a un comportement que je ne comprends pas ; si j'utilise par exemple le WM_VSCROLL avec ou sans les 2 lignes de bookmark ci-dessous :

Code :

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

1
2
3
4
5
6
ABookmark := DM.DataSet.Bookmark;
 
myDBGrid.Perform(WM_VSCROLL, SB_PAGEDOWN, 0); 
myDBGrid.Perform(WM_VSCROLL, SB_PAGEUP, 0);
 
DM.DataSet.Bookmark := ABookmark

Tout d'abord sans le bookmark, si je recherche :
la lettre "N" > le 1er enregistrement commençant par "N" est en 1ère ligne de la grille (très bien) ET est sélectionné (très bien aussi). Là où ça foire c'est pour un Locate sur les dernières lettres.
la lettre "Z" > bon j'ai 1 seul enregistrement en "Z", il est forcément en dernière ligne mais l'enregistrement sélectionné est toujours celui de la 1ère ligne de la grille (pas bien mais normal ; d'où le bookmark).

Maintenant avec le bookmark, l'enregistrement sélectionné est toujours le bon (cad le 1er commençant par la lettre ...) mais il se trouve localisé en plein milieu de la grille !! (dans la mesure du possible évidemment, pas le Z). Et ça je ne comprends pas, pourquoi une affectation de bookmark scrolle pile poil d'une 1/2 grille ?

(c'est juste par curiosité alors je mets "résolu", merci à vous)

[ShaiLeTroll]

Je pense que la différence vient du fait que dans un cas on descend alors que dans l'autre on remonte !

Je t'avoue que je n'ai jamais trop cherché à modifier le comportement, déjà il trouve l'enregistrement, c'est déjà pas mal, après les utilisateurs s'habituent (ou ne savent même pas que c'est possible )

Le plus souvent, par défaut, dans mes précédents projets, les grilles sont vides, il y a un outil de recherche qui te fourni de quoi filtrer les enregistrements (tu en récupère un centaine sur un bon million)

Si le volume de données n'est pas prévu pour être trop grand et que l'execution reste locale, j'affiche la grille au complet mais au lieu d'un locate, j'utilise un WHERE sans le SELECT pour limiter le nombre de ligne affichée, c'est souvent plus facile à comprendre pour un utilisateur !

[Lung]

Locate pas fiable ???

Apparement, je ne suis pas le seul.
On en parlait ici : http://www.developpez.net/forums/d10...d/#post5647633

[Rayek]

Apparement, je ne suis pas le seul.
On en parlait ici : http://www.developpez.net/forums/d10...d/#post5647633

Sauf que celui qui a dit que le locate n'était pas fiable c'était toi
redoran ne faisait que te citer

http://www.developpez.net/forums/d10...d/#post5636596

[Lung]

Sauf que celui qui a dit que le locate n'était pas fiable c'était toi
redoran ne faisait que te citer

http://www.developpez.net/forums/d10...d/#post5636596

Oui, mais Redoran dit qu'il a rencontré le même problème.
Après, si personne d'autre ne rencontre le même problème, tant mieux.
Je ne faisais que remonter mon retour d'expérience.