Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Хелп с фильтрацией [D6, Access]


Morgan ©   (2003-04-28 07:44:00) 

Мастера, требуется хелп.
Есть процедура

procedure TForm1.serteditChange(Sender: TObject);//edit
begin
if length(sertedit.Text) > 0 then dm.table.Filtered := true
else dm.table.Filtered := false;
dm.table.Filter := "№ сертификата="""+sertedit.Text+"""";
end;


Выдается мат: "Arguments are of wrong type, are out of acceptable range, or are in conflict

with one another".

Фильтрующееся поле таблицы стринговое. Пример ввода такой: А-0001-123-3. Такие же процедуры

есть на других полях и все они работают нормально (там вводятся просто слова). База

аксессовая, в аксесе фильтруется без проблем.

И еще я не могу сделать следующее: table.findnearest(edit1.text); Пищет анкноун идентифир findnearest.

Я в фирме вебдизайнер и с делфи знаком ОЧЕНЬ поверхностно. Вчера шеф сказал: "Чтоб к утру

було! Ты типа компьютерщик и ни чего не знаю". Ни какие мои аргументы не принемались.

Помогите плиззз!!!!


sniknik   (2003-04-28 10:37:00) [1]

> анкноун идентифир findnearest
сказки расказываеш, есть такое

TTable.FindNearest
Moves the cursor to the record that most closely matches a specified set of key values.
procedure FindNearest(const KeyValues: array of const);

а здается мне мил человек, что table у тебя не типа TTable, а какогонибудь другого (TADOTable) к примеру. Это в очередной раз к тому, что в вопросе надо указывать чем пользуешся (даже если не понимаеш зачем это нужно).


Morgan   (2003-04-28 09:22:00) [2]

Написал просто "сертификат" и все заработало:))) А table.findnearest("""+edit1.text+""") все равно не работает, пишет анкноун идентифир findnearest и все тут. Может чего юзез надо, а?



sniknik   (2003-04-28 08:24:00) [3]

> dm.table.Filter := " № сертификата="""+sertedit.Text+""""

вот прямо так поле и называется? по аглицки надо и жел. в одно слово и чтоб не зарезервированное....
поменяй при случае, а пока поставь в скобки может поможет, вот так
[№ сертификата]


BoxTer   (2003-04-28 08:08:00) [4]

table.findnearest("""+edit1.text+""")
значение поиска указывается в апострофах


BoxTer   (2003-04-28 08:04:00) [5]

ты не имеешь права изменять фильтЭр, кады свойство Filtered установлено в True. Попробуй поменять 1 и 3ю строчки кода в своей процедурке... еси не получиться бум думать далее


Наверх

Титульная страница Поиск, карта сайта Написать письмо