Discussion :

[pierrot67]

Bonjour


j'ai une table avec des noms et je voudrais faire une boucle de Paul à Vivien
Comment dois-je procéder? j'ai essayé avec une boucle for en convertissant
le string en integer mais ça ne marche pas auriez vous une idée?

Merci d'avance.

[PadawanDuDelphi]

Bonjour,

Pourrais-tu être plus précis sur le genre de table?

Parceque en SQL j'aurais utilisé:
1)Positionner mon Dataset sur Paul.
2)Utiliser "Next" jusqu'à Vivien.

Ou alors j'aurais créer un champs clé (integer). En m'assurant que ma Table soit classer par nom alphabétique.

@+.

[pierrot67]

c'est une Table paradox

[PadawanDuDelphi]

Bon alors, mes deux méthodes devraient marcher.
Personnellement j'aurais déclarer mon champs nom en clé (primaire ou secondaire) pour classer la table par ordre alphabétique, et j'aurais défini un champs integer à coté, pour récuperer l'indice de ce classement...

Ensuite il te suffit de récupérer les indices de Pierre et Vivien et de faire une boucle for.

@+.

[pierrot67]

Ca marche pas du fait que le champ cle n'est pas incrémenté.

[PadawanDuDelphi]

Oui, je vois le problème, ma méthode n'est pas adapté...Désolé.

Alors il reste la méthode:
1)Positionner ton Dataset sur Paul (tu peut le faire avec une fonction).
2)Parcourir ta table jusqu'à Vivien en réalisant au passage tes traitements.

Ou alors autre idée : tu créer un tableau de string dans lequel tu stock tes noms, et après tu utilise les indices du tableau pour tes boucles.

[TicTacToe]

Tu peux utiliser les SetRange

1. Tu créés un index 'Prenom' sur ta table se nommant 'IndexPrenom'
2. Tu utilise cet Index sur un Table:TTable

Code :

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

Table.IndexName := 'IndexPrenom';

3. tu effectues

Code :

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

Table.SetRange( [ 'Paul' ] , [ 'Vivien' ] );

4. tu parcours ta tables

Code :

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

1
2
3
4
5
Table.First;
while not Table.Eof do
  try
  ShowMessage( Table.FieldByName( 'Prenom' ).AsString ); // traitement
  finally Table.Next; end;