Указать критерии поиска?

[фЁдОр]

Здравствуйте, уважаемые программисты!
Подскажите, пожалуйста, как мне сделать следующий поиск: нужно, к примеру, найти товар от 5 до 15 р., т.е. в edit1 я ввожу цену от..., а в edit2 я ввожу цену до...
В справочниках и в книгах, которые у меня есть - ничего ненахожу, да и врятли про это будет где-либо написано, тут нужно как-то самому домыслить, но пока не представляю как это сделать(ни LIKE, ни LOCATE не получается).

[Alex21]

Полагаю речь идет о динамических SQL-запросах.

[фЁдОр]

Сообщение от Alex21

Полагаю речь идет о динамических SQL-запросах.

Alex21, спасибо за ссылку! Толком там ничего ненаписано, но идею вроде уловил.

[nataly_ukr]

Здесь в Edit принимается дата


Form32.Query1.Close;
Form32.Query1.Sql.Clear;

DateStart := StrToDate(Form32.MaskEdit1.Text);
DateEnd := StrToDate(Form32.MaskEdit2.Text);

// DateStart := StrToDate('01.07.2007');
// DateEnd := StrToDate('31.07.2007');

Form32.Query1.SQL.Add('Select * From '+imjm+' where ddok BETWEEN :D1 and :D2 order by ddok');

Form32.Query1.ParamByName('d1').AsD ate := DateStart;
Form32.Query1.ParamByName('d2').AsD ate := DateEnd;

Form32.Query1.Open;

[mihali4]

Можно и фильтром датасета:
cena>=FloatToStr(Edit1.Text) and cena<=FloatToStr(Edit2.Text)
прямо в режиме редактора все и отработает, не забудьте только выставить свойство FILTERED в TRUE.
Ну, опечатался... Не FloatToStr, а StrToFloat...

[фЁдОр]

Очевидно, что я чего-то недопонимаю, но почему я не могу edit1 преобразовать в числовой тип, т.е. не получается выполнить FloatToStr(edit1.text)?

[Alex21]

Потому, что надо StrToFloat(Edit1.Text)

[фЁдОр]

написал вот эту строчку:

form1.ADOQuery1.FieldByName('cena')>=StrToFloat(edit1.Text) and form1.ADOQuery1.FieldByName('cena')<StrToFloat(edit2.Text);

, а компилятор ругается. Из-за чего?

[Alex21]

Похоже скобок маловато.. FieldByName(( , и в конце еще одну.

Почему не делать по аналогии, предложенной nataly_ukr?

[nataly_ukr]

form1.ADOQuery1.FieldByName('cena') .AsFloat