TExternalList.Next
| TExternalList = class (TObject) | Interface de TExternalList | Exemples de TExternalList |
Fait pointer le curseur sur l'enregistrement suivant
Syntaxe
procedure Next()
Remarques
- La liste doit avoir été ouverte avec la méthode Open.
- Cette procédure ne vérifie pas qu'il existe des enregistrements après l'enregistrement courant. Il vous faut alors le vérifier en appelant la fonction EOF.
Exemples
var xl := TExternalList.Connect('ListeMatricules'); // Connexion à la liste externe 'ListeMatricules'
xl.Open('TKey=12'); // Filtre sur l'ensemble des enregistrements dont la clé tertiaire vaut 12
while not xl.EOF do begin
// Lecture de l'ensemble des enregistrements filtrés
xl.Next;
end;
xl.Close;
xl.Open('TKey=12'); // Filtre sur l'ensemble des enregistrements dont la clé tertiaire vaut 12
while not xl.EOF do begin
// Lecture de l'ensemble des enregistrements filtrés
xl.Next;
end;
xl.Close;