![]() |
|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
![]() |
|
Опции темы | Поиск в этой теме |
![]() |
#1 |
Регистрация: 21.04.2009
Сообщений: 7
|
![]()
Помогите пожалуйста. Мне нужно реализовать метод locate для поиска в базе данных. Как объявляется этот метод?
Я пишу код аналогично примеру в пособии: procedure TForm1.SpeedButton2Click(Sender: TObject); begin if TabControl1.TabIndex=0 then begin DataModule2.ADOTable1.locate('Рейс;[Дата,время];AirCompany',vararrayof([edit1.Text,edit2.Text,combobox1.Tex t]),[loPartialKey]); End; На данный момент выделяет ошибку на loPartialKey, ранее я что-то вписывал в объявления про locate - запускалось но не работало. |
![]() |
![]() |
![]() |
#2 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
uses DB прописано?
I'm learning to live...
|
![]() |
![]() |
![]() |
#3 |
Регистрация: 21.04.2009
Сообщений: 7
|
![]()
Прописано: это uses в начале посе interface. Запускается но поиск не работает.
|
![]() |
![]() |
![]() |
#4 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]()
Тогда советую проверять поля на поиск по отдельности. Сначала:
Код:
I'm learning to live...
|
![]() |
![]() |
![]() |
#5 |
Регистрация: 21.04.2009
Сообщений: 7
|
![]()
Спасибо.По первому полю работает:правильно ставит указатель - на искомую запись,а по другим не ставит. А разве он не должен ставить эту запись первой? Хотя может это из-за малого их количества.
Последний раз редактировалось Andr_zdes; 19.05.2009 в 12:39. |
![]() |
![]() |
![]() |
#6 | ||
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
![]() Цитата:
Цитата:
I'm learning to live...
|
||
![]() |
![]() |
![]() |
#7 |
Регистрация: 21.04.2009
Сообщений: 7
|
![]()
В смысле переместить эту запись в начало списка. Я вводил данные, которые есть в таблице. Поля Aircompany в таблице нет - оно подстановочное, т.е. отображает данные из поля Компания в таблице Тарифы.
Мне уже помогли осуществить поиск, но с помощью SQL: заменили бывший ADOTable на ADODataSet, заново сделали поля. Мне нужно сделать программу к локальной БД наподобие как в авиакассах для продажи билетов. У меня есть 5 таблиц в MSAccess: Рейсы (компонент ADODataSet), Пассажиры (ADOTable), Тарифы (ADOTable), Самолёты (ADOTable) и Архив (ADOTable). На главной форме TabControl1 c тремя вкладками: Рейсы, Пассажиры, Архив. Не могу разобраться почему при переходе на вкладку Пассажиры перестало работать переключение if TabControl1.TabIndex=1 then begin DBGrid1.DataSource:= DataModule2.DataSource2; ... end; и показырает на этой вкладке пустую сетку с полями которые должны быть при DBGrid1.DataSource:= DataModule2.DataSource1; хотя всё вроде как и было. Как-то с подстановочными полями это наверное связано... |
![]() |
![]() |
![]() |
![]() |
||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Метод locate при работе с бд | WinApi | Помощь студентам | 0 | 03.05.2009 16:08 |
Метод Монте-Карло литература или примеры программ на С++ или С | MIKI | Помощь студентам | 2 | 09.12.2008 13:33 |
Каким шаблоном лучше описывать деревья? | Иллидан | Общие вопросы C/C++ | 2 | 16.10.2008 08:14 |
метод Close для ADODataSet вызывает ошибку 'BOF или EOF имеет ...' (mdac 6.0) | jane | БД в Delphi | 1 | 16.07.2008 07:34 |
ошибка VBA при попытке использовать свойство или метод | chanchikela | Microsoft Office Access | 0 | 26.03.2008 23:17 |