Форум: "Базы";
Текущий архив: 2003.05.19;
Скачать: [xml.tar.bz2];
Вниз
Хелп с фильтрацией Найти похожие ветки
← →
Morgan (2003-04-28 07:44) [0]Мастера, требуется хелп.
Есть процедура
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.
Я в фирме вебдизайнер и с делфи знаком ОЧЕНЬ поверхностно. Вчера шеф сказал: "Чтоб к утру
було! Ты типа компьютерщик и ни чего не знаю". Ни какие мои аргументы не принемались.
Помогите плиззз!!!!
← →
BoxTer (2003-04-28 08:04) [1]ты не имеешь права изменять фильтЭр, кады свойство Filtered установлено в True. Попробуй поменять 1 и 3ю строчки кода в своей процедурке... еси не получиться бум думать далее
← →
BoxTer (2003-04-28 08:08) [2]table.findnearest("""+edit1.text+""")
значение поиска указывается в апострофах
← →
sniknik (2003-04-28 08:24) [3]> dm.table.Filter := " № сертификата="""+sertedit.Text+""""
вот прямо так поле и называется? по аглицки надо и жел. в одно слово и чтоб не зарезервированное....
поменяй при случае, а пока поставь в скобки может поможет, вот так
[№ сертификата]
← →
Morgan (2003-04-28 09:22) [4]Написал просто "сертификат" и все заработало:))) А table.findnearest("""+edit1.text+""") все равно не работает, пишет анкноун идентифир findnearest и все тут. Может чего юзез надо, а?
← →
sniknik (2003-04-28 10:37) [5]> анкноун идентифир 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) к примеру. Это в очередной раз к тому, что в вопросе надо указывать чем пользуешся (даже если не понимаеш зачем это нужно).
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2003.05.19;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c
