Discussion :

[Zacheus]

Bonjour,

Sous FMX, ma Grid et mon FDQuery sont liés par LB.
Je voudrais associer le click sur un entête d'une colonne de la grille (correpondant à un champ indexé de table) au tri sur la colonne, le tout en préservant la sélection. Y a-t-il moyen de faire cela en utilisant au maximum le LB donc avec un minimum de code dans l'événement OnClick, voire en paramétrant le LB, la Grid et le FDQuery pour rendre cela automatique ?

Merci. Zac.

[SergioMaster]

Bonjour,

tu parles (hélas) de la Grid fourni avec Delphi et pas de celle de TMS ?

[Zacheus]

Oui au départ. Mais en réalité je cherchais comment on liait par code une grid à son dataset par LB quand on utilisait un LB par défaut ou comment on réalise un LB personnalisé permettant ce type d'écriture (si nécessaire), un peu l'équivalent d'un myGrid.DataSource.DataSet en Lazarus.

En TMS, hormis la déconnexion "par défaut" de certaines colonnes, un code usuel sur le dataset suffit : il n'y a pratiquement rien à faire (le tri s'effectue proprement, la sélection est maintenue et le repositionnement [sélection visible dans la Grid] aussi).

Mais j'aurais aimé aussi, plutôt que d'écrire MySQL, trouver l'écriture par le LB : With TMSFMXLiveGrid1.xxx?

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
procedure TForm1.TMSFMXLiveGrid1CanSortColumn(Sender: TObject; ACol: Integer;
  var Allow: Boolean);
begin
{ Pas de tri sur le Champ tePRENOM }
  if aCol =3 then Allow := False;
end;
 
procedure TForm1.TMSFMXLiveGrid1CellSortClick(Sender: TObject; ACol,
  ARow: Integer; Cell: TFmxObject);
begin
  with mySQLQuery do
  begin
    case Acol of
      1: if IndexFieldNames = 'teID' then
          IndexFieldNames := 'teID:D'
        else
          IndexFieldNames := 'teID';
      2: if IndexFieldNames = 'teNOM;tePRENOM' then
          IndexFieldNames := 'teNOM:D;tePRENOM'
      else
          IndexFieldNames := 'teNOM;tePRENOM';
    end;
  end;
end;

[SergioMaster]

Re,

Ah, d'accord je vois où tu veux en venir : une liaison entre la grid et la propriété IndexName ou IndexFieldName de la Query (je viens de vérifier, c'est liable, pour peu de l'indiquer comme tel) par contre je ne vois pas trop comment récupérer le texte(Nom de index ou des IndexFieldName) à part dans une liste et non simplement en cliquant

je n'en suis encore qu'au match d'entrainement avec LiveBindings et je perds souvent même en mode facile un simple CustomParse avec deux champs me pose des problèmes dés que je déclare ces derniers, je ne comprends pas ! (petit détail, il s'agit d'une FDMemTable c'est peut être pour ça )

[Zacheus]

Bonjour,

j'avance un peu à mes moments de détente mais très lentement : du LB en code sans passer par le "visuel" ? Using LiveBinding Programatically
Si quelqu'un a des adresses complémentaires, je suis preneur.

Merci. Zac.

[SergioMaster]

Bonjour,

beaucoup de questions peu de réponses http://stackoverflow.com/questions/tagged/livebindings
je commence à peine à entrevoir la lueur de sortie
les autres points que j'ai consultés sont les équivalents fonctionnalité du mardi de Embarcadero que l'on peut trouver ici (Skill Sprints)