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

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

Поиск подстроки в строкие для поля БД [D6, dBase, FoxPro]


Older22 ©   (2004-06-15 03:02:00) 

Доброе время суток!
Я на дельфях только начинаю.
Подскажите пож. как вырезать из строки подстроку.
Другими словами есть база данных в ней поле 'Name_organ' на форме
Edit1 строка для поиска и кнопка поиск.
Если в базе данных Хранится 'ООО КДМ Организация' а в Edit1 ввели только 'КДМ' как осуществить такой поиск


sniknik   (2004-06-15 11:10:00) [1]

вообщето будет ошибка, кавычки ограничивающие строку забыли. (хотя тут ни слова о движке, может и есть такой, который из контекста понимает что все что внутри %% строка)


Соловьев   (2004-06-15 11:05:00) [2]


> ADOQuery.SQL.Text = Format('SELECT * FROM Table WHERE Name_organ
> LIKE %%s%;', [Edit1.Text]);

ADOQuery.SQL.Text = Format('SELECT * FROM Table WHERE Name_organ
LIKE %%%s%%', [Edit1.Text]);
или
ADOQuery.SQL.Text = Format('SELECT * FROM Table WHERE Name_organ
LIKE %s', ['%'+Edit1.Text]+'%');


Slider007   (2004-06-15 11:00:00) [3]

А вот так можно ?

ADOQuery.SQL.Text = Format('SELECT * FROM Table WHERE Name_organ LIKE %%s%;', [Edit1.Text]);
ADOQuery.Active = True;

Поправьте меня если я допустил ошибку


Соловьев   (2004-06-15 10:04:00) [4]

LocalSQL.hlp+Like+F1


Ильш   (2004-06-15 08:16:00) [5]

Locate
а вот
> как вырезать из строки подстроку.
тут ваще ни при чем !!!

а еще лучше Яндекс :) для общего развития тоже помогает


Наверх

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