Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.05.2008, 19:16   #1
Lady_olga
Пользователь
 
Регистрация: 16.03.2008
Сообщений: 23
По умолчанию Поиск в DBTable

Помогите, пожалуйста!
Мне нужно сделать поиск по TTable, но вот функция Locate ищет до первого совпадения. Я хочу, чтобы по нажатии кнопки, продолжался поиск по таблице.
У меня таблица Paradox. Пробовала в цикле while not eof банально сверять данные из нужного поля с искомым текстом, затем перемещать указатель на следующую запись, если запись не подошла. Но у меня все зациклилось.
Заранее спасибо
Lady_olga вне форума Ответить с цитированием
Старый 17.05.2008, 20:36   #2
Veiron
Форумчанин
 
Аватар для Veiron
 
Регистрация: 01.12.2007
Сообщений: 346
По умолчанию

Метод Lookup не перемещает курсор в соответствующую строку, а только возвращает её значение. Lookup возвращает массив переменных, содержащих значения из полей, указанных в разделённом точкой с запятой списке имён, значения которых должны быть возвращены из интересующей нас строки. Если соответствующих нашему запросу строк не найдено, то Lookup вернёт пустую (Null) переменную.
Win 10 x64 | VS 2015 | MSSQL 2014
autovestitv.ru
Veiron вне форума Ответить с цитированием
Старый 17.05.2008, 20:57   #3
Lady_olga
Пользователь
 
Регистрация: 16.03.2008
Сообщений: 23
По умолчанию

Тогда возникает вопрос - какие параметры у метода Lookup?
Lady_olga вне форума Ответить с цитированием
Старый 17.05.2008, 21:07   #4
Veiron
Форумчанин
 
Аватар для Veiron
 
Регистрация: 01.12.2007
Сообщений: 346
По умолчанию

Следующий пример заполняет заполняет массив переменных LookupRes

Код:
var LookupRes: Variant; 

LookupRes := ADOTable1.Lookup 
  ('Name', 'Zoom', 'Author; Description'); 

if not VarIsNull(LookupRes) then 
 ShowMessage(VarToStr(LookupRes[0])) //имя автора
Win 10 x64 | VS 2015 | MSSQL 2014
autovestitv.ru
Veiron вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
поиск Азамат Microsoft Office Excel 7 18.06.2008 13:44
ПОИСК FIIR БД в Delphi 3 16.06.2008 16:06
Поиск В бД Старик_Романыч БД в Delphi 5 29.04.2008 21:12
Поиск по FTP Averss PHP 4 04.09.2007 20:37
Поиск Andr Microsoft Office Excel 2 18.07.2007 11:49