1000_____________________________________________ 15

 TList, TStringList, TStrings


 TList:

int   fastcall IndexOf(void * Item);

 TStrings  TStringList:

virtual int   fastcall IndexOf(const System::AnsiString S) ;



 IndexOf        -
  ( Item  TList   S  TStringList  TStrings^.
    (    ).   -
   ,  -1.



    ,     , -
      Editl.

TStringList *LPerson = new TStringList;

if (LPerson->IndexOf(Editl->Text) < 0)

ShowMessage(" " + Editl->Text + "   ");

Insert

       
 TList, TStringList, TStrings


 TList:

void   fastcall Insert(int Index, void * Item) ;

 TStrings  TStringList:

virtual void _fastcall Insert(int Index, const System::AnsiString S);



 Insert   ( Item   S)   
,     Index.   Index = 0, 
   .        -
  ,    Index, , ..   -
  1.

  ,   Insert    
EListError.       Add.

   TStringList  TStrings   ,   -
,    Insert    InsertObject.

Invalidate

 Windows      
,       Windows

 TControl



virtual void   fastcall Invalidate(void);