Помогите в составлении запроса!

[andreyvadimovich]

Помогите!! У меня очень большая загвоздка! в Программе есть строка (TEdit) в ней содержится строка вида (анальг/амп/10). Необходимо составить запрос SQL для выборки данных с параметром поиска строки. Например если стоит / - это значит что слова могут стоять а в обратной последовательности.
Например: в строке анальг/амп/10
Это значит что должно быть несколько запросов, 1-вый запрос: анальг%амп%10
2-ой: 10%анальг%амп
3-ый: 10%амп%анальг
4-ый: анальг%10%амп
и так далее.

Помогите составить сначала процедуру составления последовательностей, а потом уже и запрос.
Названия полей можете брать свои (это мало важно), я потом все буду переносить в свою программу.

Если можно то не затягивайте с ответом, уж очень нужно!

Заранее спасибо!! Андрей.

 

[BurcevD]

Попробуй воспользоваться этой функцией, может такое может заменить то, что тебе нужно?

function SplitByDev(a:string):String;
Var S:string;
R:string;
begin
R:='';
while (Pos('/',a)>0) do
begin
s:=Copy(a,1,Pos('/',a)-1);
a:=Copy(a,Pos('/',a)+1,Length(a));
r:=r+'(<Field> like '#39+'%'+s+'%'+#39')and';
end;
r:=r+'(<Field> like '#39+'%'+s+'%'+#39')and';
Result:=Copy(R,1,Length(r)-3);
end;