Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Почтовая рассылка

Подписчиков: -1
Последний выпуск: 19.06.2015

TADOTable - поиск записи

2.0K
23 октября 2003 года
laifik
37 / / 23.10.2003
В компоненте TTable работает такой код:
Table->IndexFieldNames="Data";
Table->SetKey();
Table->FieldByName("Data")->Value=Edit7->Text;
if (! Table->GotoKey())
ShowMessage ("Такая запись отсутствует!");

А для компонента TADOTable пишет:
'SetKey' is not a member of 'TADOTable' и для GotoKey тоже. Но в книге Архангельского пишется, что свойства этих двух компонентов одинаковы. Что же тогда используется для ADO?:angel:
348
23 октября 2003 года
Saris
389 / / 14.03.2003
Цитата:
Originally posted by laifik
В компоненте TTable работает такой код:
Table->IndexFieldNames="Data";
Table->SetKey();
Table->FieldByName("Data")->Value=Edit7->Text;
if (! Table->GotoKey())
ShowMessage ("Такая запись отсутствует!");

А для компонента TADOTable пишет:
'SetKey' is not a member of 'TADOTable' и для GotoKey тоже. Но в книге Архангельского пишется, что свойства этих двух компонентов одинаковы. Что же тогда используется для ADO?:angel:


Я всё время использую locate. Этот метод есть в Tdataset поэтому есть он везде.

2.0K
23 октября 2003 года
laifik
37 / / 23.10.2003
Цитата:
Originally posted by Saris

Я всё время использую locate. Этот метод есть в Tdataset поэтому есть он везде.



Просмотрела справку по Билдеру и примерчик. Честно говоря, ничего не поняла. Что у них и откуда берется. Может поможете перевести мой пример на ситуацию с ADO? Я была бы очень благодарна. Тем более, что метод locate еще нигде не использовала. Как-то нигде он не пригодился.

348
23 октября 2003 года
Saris
389 / / 14.03.2003
Цитата:
Originally posted by laifik


Просмотрела справку по Билдеру и примерчик. Честно говоря, ничего не поняла. Что у них и откуда берется. Может поможете перевести мой пример на ситуацию с ADO? Я была бы очень благодарна. Тем более, что метод locate еще нигде не использовала. Как-то нигде он не пригодился.


Должно быть что-то вроде этого:
if (table->locate("data",Edit7->Text,"параметры поиска")==false) ShowMessage ("Такая запись отсутствует!");
про параметры поиска посмотри в хелпе или Архангельском, там и пример на это дело есть.

2.0K
23 октября 2003 года
laifik
37 / / 23.10.2003
Цитата:
Originally posted by Saris

Должно быть что-то вроде этого:
if (table->locate("data",Edit7->Text,"параметры поиска")==false) ShowMessage ("Такая запись отсутствует!");
про параметры поиска посмотри в хелпе или Архангельском, там и пример на это дело есть.



Спасибо большое. В общем, я уже сама додумалась, посмотрев кучу примеров на Дельфи. У меня получилось так:
AnsiString ffield, fvalue;
TLocateOptions opts;

ffield = "Mesaz";
fvalue = Edit11->Text;
opts << loCaseInsensitive;
TestModule->ADOMesaz->Locate(ffield, fvalue, opts);
Это почти так же, как Вы написали. Вопрос решен.

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог