API:Data.DB.TFieldDefList.Find

De RAD Studio API Documentation
Aller à : navigation, rechercher

Delphi

function Find(const Name: string): TFieldDef; reintroduce;

C++

HIDESBASE TFieldDef* __fastcall Find(const System::UnicodeString Name);

Propriétés

Type Visibilité  Source Unité  Parent
function public
Data.DB.pas
Data.DB.hpp
Data.DB TFieldDefList

Description

Recherche l'index d'une chaîne dans une liste triée et indique si une chaîne ayant cette valeur existe déjà dans la liste.

Data.DB.TFieldDefList.Find hérite de System.Classes.TStringList.Find. Tout le contenu en-dessous de cette ligne se réfère à System.Classes.TStringList.Find.

Recherche l'index d'une chaîne dans une liste triée et indique si une chaîne ayant cette valeur existe déjà dans la liste.

La méthode Find permet d'obtenir l'index auquel la chaîne S serait ajoutée dans une liste triée. Si la chaîne S, ou une chaîne qui diffère de S uniquement par la casse alors que CaseSensitive a la valeur false, existe déjà dans la liste, Find renvoie true. Si la liste ne contient pas de chaîne correspondant à S, Find renvoie false. L'index qu'aurait S est renvoyé dans le paramètre Index. Index est un index de base zéro, la première chaîne a l'index 0, la seconde l'index 1, etc.

Remarque : N'utilisez Find qu'avec les listes triées. Pour une liste non triée, utilisez à la place la méthode IndexOf.

Conseil : Si la chaîne S n'est pas trouvée (la valeur de retour de Find est False), Index est défini sur l'index de la première chaîne de la liste qui est triée immédiatement avant ou après S.

var
  Index: Integer;
  LStringList: TStringList;

begin
  LStringList := TStringList.Create;
  LStringList.Add('first string');
  LStringList.Add('second string');

  LStringList.Find('first string', Index); // Index = 0 because 'first string' is at index 0
  LStringList.Find('third string', Index); // Index = 2 because 'third string' sorts after 'second string'
  LStringList.Find('great string', Index); // Index = 1 because 'great string' would sort after 'first string', if it existed

  LStringList.Free;
end;

Voir aussi

Exemples de code