Discussion :

[sebyo]

Bonjour je débute a peine en delphi et j'ai un tri a faire sur une base de donnée. le tri s'effectue juste sur les elements selectionnés dans la base de donnée.

Le module de tri sur une colone entiere existe déjà.

A savoir si il existe une fonction a inserrer pour prendre en compte que les elements selectionnés.

merci d'avance pour les réponses

Seb®

[chh2008]

Bonjour
on peut afficher n'importe quel table de la base de donnée avec le composant DBGrid, on peut aussi faire un filtre de cette table comme on peut aussi trier les colonnes de cette dernier.
Exemple avec le SGBD interbase :
pour l'affichage on utilise ces composant IBTable , Datasource et DBGrid.
pour le filtre il existe la propriété Filter du composant IBTable.
pour le trie je te file le code suivant :

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
 
procedure TPrincipal.DBGrid1TitleClick(Column: TColumn);
begin
  // si l'index n'est pas vide donc la table a déjà un index 
  //en cours d'utilisation 
  if Table.IndexFieldNames <> '' then
     // on récupére la couleur de la colonne fixe 
     //et on la transmet à la colonne à trier 
     DBGrid1.Columns[data.Personnel.FieldByName(
     Table.IndexFieldNames).Index].Title.Color :=
     DBGrid1.fixedColor;
  // si le type de champ à trier et autre que Blob ou Memo, 
  //logique non pas de tri sur des memo et blob
  if not (Column.Field.DataType in [ftBlob,ftMemo]) then
    begin
      // index en cours doit être la colonne à trier
      Table.IndexFieldNames := Column.FieldName;
    end;
end;

[sebyo]

Merci pour la réponse apporté a ma question.


J'ai pas totalement cerner le fait de trier que les éléments selectionnés (je précise le pascal est un langage que je n'ai pas eu l'occasion de manipuler encore je développe en C et C++ d'habitude, je m'aclimate peu a peu a se nouveau langage mais quelques points restent a éclaircir tout de même)


vous remerciant d'avance de tous les conseils apporté pour cette question


Seb®