Discussion :

[adelcrb]

bonsoir,

je vous donne un exemple pour mieux expliqué la situation :

sur ma base de données j'ai une table du genre :


nom prénom age sexe métier

x y 20 H Plombier
e k 23 H Maçon
d o 40 F Pharmacienne
t i 36 H Maçon
e p 35 F Pharmacienne
p s 47 H Plombier
k p 47 H Maçon



je cherche un composant qui peut me faire ça (groupement par métier):

Plombier
x
p
Maçon
e
t
k
Pharmacienne
d
e

avec un tutoriel si c'est possible .voila merci d'avance.

[alheuredudejeuner]

bonjour

C'est le listview

cordialement

[SergioMaster]

Bonjour,
Je suis d'accord le listview est LE composant,
cependant passer par une requête améliorera le processus

Code SQL :

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

SELECT METIER,NOM FROM TABLE ORDER BY METIER

la vidéo étant longue et en anglais voici le principe
1-poser la Query et définir les champs
2-poser la listview
3- lier le champ nom a Item.text, le champ metier a ItemHeaderBreak et ItemHeaderText
et voilà c'est tout : voilà le résultat avec la base de données employees, sans "fioritures"

Code SQL :

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

SELECT DEPARTMENT,NOM FROM Employee ORDER BY DEPARTMENT

[adelcrb]

Bonjour,

merci pour votre aide et ça marche impeccablement, mais comme j'ai une base volumineuse, la liste est très grande donc je cherche a amélioré:
A- ma liste pour plus d'accessibilité .

exemple :

1 -première vue : tous les métiers sont regroupé (je ne veut pas afficher les personnes),

Plombier
Maçon
Pharmacienne

2- dès que j'appuis sur un métier ,les personnes affilier apparaît (dans ce cas les maçons) :


Plombier
Maçon
e
t
k
Pharmacienne


B- Encore pour plus d'accessibilité je cherche a intégrer une zone de recherche a ma liste (j'ai vus que ça existe sur Tlistbox) ,je ne sais pas s'il y a une possibilité pour le faire.

merci .

[SergioMaster]

Bonjour,

pour améliorer le tout : 2 requêtes au lieu d'une
1 - SELECT DISTINCT METIER FROM <Table> ORDER BY METIER
2 - SELECT NOM FROM <Table> WHERE METIER=:METIER

voici une solution :
Poser un multiview
dans la partie gauche (panneau ancré) un ListView (align alclient) lié à la Query1 avec synchronisation
dans la partie droite un listview lié à la Query2

Quant au point B , il suffit sur une listview de cocher la propriété SearchVisible
Attention la recherche par défaut est non sensible à la casse et sous la forme "contient le texte" pour changer le comportement en 'Commençant par' il faut utiliser l'évènement OnFilter

Code :

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

1
2
3
4
5
procedure TForm1.ListView1Filter(Sender: TObject; const AFilter,
  AValue: string; var Accept: Boolean);
begin
Accept:=AValue.StartsWith(AFilter,true) OR (Length(AFilter)=0);
end;

[adelcrb]

Bonjour,

dans la partie gauche (panneau ancré) un ListView (align alclient) lié à la Query1 avec synchronisation
dans la partie droite un listview lié à la Query2

dans l’événement OnChange du Premier ListView j'ai exécuter un filtre sur ma table (j'ai utiliser une table parce-que le query ne s'affiche pas quand j'exécute une requête paramétrer )

c'est ce que tu veut dire par avec synchronisation?

merci.