Иллюстрированный самоучитель по Tirbo Pascal


           

TStringLookupValidator


Этот объект порожден от TLookupValidator и сравнивает введенную пользователем строку с набором допустимых строк, хранящихся в отсортированной коллекции. Чтобы объект осуществлял сравнение с нужным набором строк, он инициируется следующим образом:

var

MyCollection: PStringCollection; MyStrVal: PStringLookupValidator; 

begin

{Создаем коллекцию строк} 

MyCollection := New(PStringCollection,Init(1,1));

{Наполняем коллекцию - размещаем строки в куче} 

MyCollection.Insert(NewStr('Турбо')); 

MyCollection.Insert(NewStr('Паскаль')) ;

{Создаем объект-контролер}

MyStrCol := New(PStringLookupValidator,Init(MyCollection))

end;



Содержание  Назад  Вперед





Forekc.ru
Рефераты, дипломы, курсовые, выпускные и квалификационные работы, диссертации, учебники, учебные пособия, лекции, методические пособия и рекомендации, программы и курсы обучения, публикации из профильных изданий