|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
Как настроить "частичный поиск" в DBGrid?
У меня база данных(Paradox) Видеотека называется. и как бы так сделать -чтобы вводишь слово - и прога выводит тебе строки где встретилось это слово (только столбец уже задан!)
|
#2
|
|||
|
|||
OnFilterRecord тебе поможет.
|
#3
|
|||
|
|||
Есть вот такой способ, но он не идеальный
Код:
procedure TForm1.Edit1Change(Sender: TObject); begin With Table1 Do Begin Filtered := False; FilterOptions := [foCaseInsensitive]; Filter := '[Name]=''' + Edit1.Text + '*'''; Filtered := True; End; end; |
#4
|
|||
|
|||
Агам...ну там разобралась! спасибо)! а как сделать если у меня диапазон: то есть нужно вывести только с такого-то по такой-то год!??
|
#5
|
|||
|
|||
Тогда просто совмещаешь условия, например, имя=вася год с 1993 по 2010, то будет так: Filter := 'name=Вася AND year => 1993 AND year <= 2010';
|
#6
|
||||
|
||||
А это зависит от того как вы эти данные храните. Если Год у вас как число хранится то можно так:
... Код:
Filter := '[Year] between ' + Edit1.Text + ' and ' + Edit2.Text; Жизнь такова какова она есть и больше никакова. Помогаю за спасибо. |
#7
|
|||
|
|||
Воооооооооооооооот это тооо что мне наааадо!!! спасибо огромное!
|
#8
|
|||
|
|||
Спасибо) тоже помогло)
|
#9
|
|||
|
|||
Всем привет! А как сделать так чтобы поле выбиралось, и желательно 2 поля. ну и значение поиска вводилось с Edit. Пробую так, но не работает:
Код:
procedure TForm1.ADOTable2FilterRecord(DataSet: TDataSet; var Accept: Boolean); var FieldVal: String; begin case Combobox2.ItemIndex of 0: FieldVal := DataSet['Xozyaistvo']; FilterOptions := [foCaseInsensitive]; // это тоже не работает((( Accept:=FieldVal[1]=Edit2.text; // ругается на знак ";", вот текст ошибки: "Constant expressions expected" end; end; Помогите пожалуйста Последний раз редактировалось Admin, 19.06.2011 в 15:13. |
#10
|
|||
|
|||
Хм, поясни толком задание, я помогу
|