Discussion :

[SergioMaster]

Bonjour,

J'ai créé un helper (voir zip du projet) sur les grilles dans le but de pouvoir trier les données



Seulement il y a certaines conditions nécessaires :
Utilisation de Firedac pour la source de données.
Utilisation de Livebindings (cela étant en FMX c'est la seule solution pour remplir une grille sans passer par le "manuel".
Déclaration des colonnes dans la liaison.

Je me demandai si l'utilisation de asserts pouvait obliger ces conditions et si oui comment ?
J'ai bien vu quelques trucs du genre mais pour des composants est-ce possible pour un helper ?

en attendant une répose de votre part, je vais me pencher sur le visuel de l'indicateur de tri comme ébauché ici

[Andnotor]

Je ne vois pas de limite à utiliser les assertions qui finalement ne font que soulever une exception EAssertionFailed.

Je ne me prononce pas sur LiveBinding que je n'ai jamais utilisé mais pour FireDac ce serait Assert(DataSet is TFDDataSet, 'Utilisation de FireDac obligatoire').

[ShaiLeTroll]

Les Assertions sont conçues pour alerter le développeur, normalement visible en config DEBUG mais masqué en config RELEASE.
En DEBUG, donc le développeur verra l'exception
En RELEASE, si le développeur n'a pas compris l'assertion , cela plantera surement plus loin ... si ce cas se produit, le développeur devrait songer à changer de métier

En tout cas, je les utilises dans ce contexte, pour prévenir le développeur de corriger l'erreur, souvent mauvaises déclarations détectables au RunTime.

[SergioMaster]

Bonjour,
Voilà ma nouvelle version (pièce jointe)
démo

Il reste un petit hic niveau glyphe si vous faites très attention au milieu du déroulement lorsque le tri de la première colonne est annulé, le glyphe ne redevient pas rond tout de suite mais après déplacement de la souris (phénomène déjà constaté dans ce sujet

[SergioMaster]

Je suis , vert de rage, trois jours que je galère à découvrir la cause de ce petit bogue sans succès.
Une petite souris, qui se reconnaitra si elle lit ça, m'a suggéré de tester sous D11 et là, plus de bogue. Différence : l'appel de la procedure OnDrawColumnHeader est beaucoup plus fréquente (3 fois plus, sans parler l'appel lors des mouvements de souris)
Donc 12.1, en apportant une réduction des appels me flanque un

tel Rocky je suis mitigé remonter sur le ring pour trouver un contournement ou me plaindre à la fédération Embarcadero en posant un rapport de bogue ?

Sonné, je vais "dormir" dessus en passant à l'écriture du composant, le problème lié au fait qu'une colonne liée est une TLinkGridtoDataSourceColumn (unité différente de FMX.Grid) ne va pas faciliter les choses.

[SergioMaster]

Finalement, j'ai résolu le problème en ajoutant un appel à l'évènement OnDrawHeaderClick car je n'ai pas trouvé d'autres choix
dans mon helper j'ai ajouté

Code :

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

1
2
3
4
5
6
7
{ TGridHelper }
 
procedure TGridHelper.column_headerclick(aColumn: TColumn);
begin
  if Assigned(Self.OnDrawColumnHeader)
    then Self.OnDrawColumnHeader(aColumn,aColumn.Canvas,aColumn,aColumn.AbsoluteRect);
end;

pour plus de lisibilité et du coup mon code devient

Code :

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

1
2
3
4
5
6
7
procedure TForm1.Grid1HeaderClick(Column: TColumn);
begin
  var s := Grid1.Get_ColumnField(Grid1.get_componentbinding, Column);
  var sort:=Grid1.set_sort(s);
  FDMemTable1.IndexFieldNames :=sort;
  Grid1.column_headerclick(Column);  // appel à onDrawColumnHeader
end;