Ошибка при поиске

[nikedeforest]

Почему так происходит?
Пишу клиент на Дельфи. Пишу поиск, использую компонент TQuery. В поиске задаются три параметра:
-имя таблицы
-имя поля
-ключ поиска (т.е. что ищем)
Поиск работает и выводит правильные значения, но есть одно "НО", жирное такое.
Дело в том, что поиск абсолютно не работает (вываливается ошибка SQL), если подставить в качестве второго параметра(имя поля) поле с типом Varchar в котором находятся символьные значения. Это очень важно, именно СИМВОЛЬНЫЕ ЗНАЧЕНИЯ, потому как, если указать поле типа Varchar, но в котором содержатся числа, то поиск работает просто на все 100%.
И шибка вываливается для меня (пусть в SQL я не особо сведующий ) непонятная. Ошибка вываливается типа такой:"Column unknown USA", при этом USA это условие поиска, т.е. искалось-то слово USA в поле, а получается что он не может найти поле USA, куда тогда вообще информация о поле которая должна быть делась, бред у меня в голове уже.
Я вообще как думаю, что информация о типе данных смысл должна терять, т.к. информацию о поле я получаю так Edit.text, т.е. в принципе из ЕДИТа я получаю уже символы.
Короче, очень надеюсь, что вопрос понятен, и никто не запутался в дебрях моих мыслей .

[nikedeforest]

вот, сам запрос:

Код:

temp{='select * from '+table +  ' t ' + 'where t.' +  Edit2_namecolumns.Text   + ' = ' +  Edit3_keysearch.Text   ;

IBQuery1.Active{=афдыу;
IBQuery1.SQL.Text{=temp;
IBQuery1.Active{=true;

[x77]

попробуй так:

Код:

temp{='select * from '+table +  ' t ' + 'where t."' +  Edit2_namecolumns.Text   + '" = ''' +  Edit3_keysearch.Text + '''';

просто интербейз строки требует заключать в одинарные кавычки, иначе он считает их наименованиями полей/переменных. а сами наименования полезно заключать в двойные. тогда никакой путаницы не будет.

и ещё. такие вещи лучше делать через параметры. т.е. запрос формировать вида SELECT * FROM <table> WHERE <fieldname> = :PARAM, а уже в коде перед открытием говорить IbQuery1.ParamByName ('Param').AsString := Edit1.Text. тогда никакого геморроя с кавычками не будет вообще.

[nikedeforest]

Вопрос еще такой. Как можно обратиться  к отдельной ячейки выведенной информации, мне тут советовали вот так IBQuery1.FieldByName('имя поля').asString (или Float и пр.), но это только к полю, а как еще к нужной строке.
Еще вопрос, есть какая-н. функция чтобы узнать выделенную ячейку и сней потом работать???

[nikedeforest]

Кстати на счет кавычек, я уже пробовал, не выходило, сейчас еще попробовал опять не вышло.
А вот второй способ, этот запрос, где требуется параметр, его в хранимую процедуру надо засовывать?

[x77]

если имеется в виду ячейка, выделенная в гриде - то у него есть свойство SelectedField. а для навигации по набору данных используются методы First, Prior, Next, Last, Locate, FindKey и т.д.

по второму вопросу - нет. обычная квери, просто в запросе вместо конкретного значения поля указываешь :<имя_параметра>. все названия после двоеточия считаются названиями параметров, и перед открытием квери они указываются в свойстве Params через индекс или имя. этот подход имеет ещё и тот плюс, что при прочих равных условиях параметрические запросы работают быстрее: поскольку фактический текст запроса остаётся тем же, сервер БД тратит меньше времени на обработку запроса при его повторном вызове.

[nikedeforest]

По второму вопросу понял.
А вот по-первому, Frst, Prior и т.д. разве это не для компонента TTable?
И неужели они жействуют  и для квери?

И вот еще вопрос, как можно узнать имя поля на которе щелкнули, имя записа я уже узнал как это IBQuery1.RecNo. А вот имя поля(или хотя бы номер) не нашел.

P.s. Я и на Дельфи не особо пишу, точнее вообще не пишу-это я пытаюсь вспомнить что знал и бодучить что пригодиться. На VC++ я не стал писать, потому как говорят геморрой просто необыкновенный.

[nikedeforest]

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

[x77]

First, Next и пр. работают для обеих компонентов.

когда ты щёлкаешь на поле в гриде, его имя ты как раз и узнаешь из TDbGrid.SelectedField. это обычное поле со всеми аттрибутами - FieldName, DisplayName, DataType, Size и т.д.

учти, что RecNo не возвращает физический номер записи в базе данных - это только номер записи в результирующем запросе. т.е. при разных запросах одна и та же запись может иметь разные номера.

[nikedeforest]

x77, Насчет RecNo это учту, спасибо.

[nikedeforest]

TDbGrid.SelectedField нет такого поля :?:  :?:  :?:

[x77]

Specifies the field component for the currently selected cell in the grid.

property SelectedField: TField;

Description

Set SelectedField to move focus to a particular field in the grid. Read SelectedField to obtain access to the field component for the currently selected cell. If there is not currently selected cell, SelectedField is nil. For example, when an entire row is selected, SelectedField is nil.

ты его часом не в инспекторе объектов ищещь? это run-time свовйство.

[nikedeforest]

ты его часом не в инспекторе объектов ищещь? это run-time свовйство.

Да нет, я его ручками набивал, т.е. как ты написал, так я его и набил.
При нажатии комбинации клавиш CTRL->Space выскакивает вариант нужной функции, свойства и пр. и среди вариантов SelectedField не было. Пишу на Дельфи7.
Где я не прав???

[x77]

это свойство грида, а не квери. на уровне потомков датасет нет такго понятия, как текущее поле, они оперируют с набором полей, т.е. - с записью.

[nikedeforest]

Не совсем понял последнее :oops:
И вот еще
 SELECT * FROM <table> WHERE <fieldname> = :PARAM
не выходит че-то у меня, делаю постаринки, примерчик нельзя кинуть, а то по-старинки оно как-то трудновато, в смысле ошибаюсь часто в чистописании

[nikedeforest]

Хотел бы пояснить последний пост. По поводу второго вопроса, мне не понятно как это в Дельфе сделать и связать со всеми этими компонентами, ине например также непонятно, можно ли в Дельфе как-нибудь хранимую процедуру заделать (но об этом не сейчас). Вопросы у меня с Дельфей здесь в основном, т.к. я на ней почти не пишу.

[x77]

Код:

IbQuery1.Sql.Text {= 'select * from table1 where field1 = {param1';
IbQuery1.ParamByName )'Param1':.AsString {= 'гы-гы-гы';
IbQuery1.Prepare;
IbQuery1.Open;

что именно непонятно по выделенному полю?

[nikedeforest]

Все понял по выделенному полю.
Можно еще разок со своим незнанием напрягу и спрошу, а хранимую процедуру как делать???
P.s. Заранее извеняюсь, уже чувствую раздражени е

[nikedeforest]

НЕ в смысле как на SQL, а в смысле вставлять ее также чтоли, используя IBQyery1, там ведь писать придется явно больше чем в обычном запросе.

[x77]

nikedeforest, нет, раздражения не было. по крайней мере, не в твой адрес. а вот то, что на 15 левеле с защитой под 60 инга меня выносит только в путь - вот это раздражает нефигово.

вставлять можно двумя способами.

1. через IbQuery

Код:

IbQuery1.Sql.Text {= 'select * from proc )a,b,c:';
IbQuery1.ExecSql;
res {= IbQuery1.Fields [0(.Value;

2. через IbStoredProc

Код:

IbStoredProc1.StoredProcName {= 'proc';
IbStoredPRoc1.ParamByName )'a':.Value {= a; // при необходимости, конечно
IbStoredProc1.ExecProc;
res {= IbStoredProc1.ParamByName )'a':.Value;

[nikedeforest]

Думаю последний волпрос и к сожалению, понимаю, что до утра мне на него никто не ответит, поэтому придется выкручиваться самому. Ну вот вопрос:
как в Дельфи сделать так , чтобы запрос заносил значения в переменную, а не выводил (т.е. типа select max(pn) from table into :znach)?Вот этот znach и интересует.

[nikedeforest]

Пока не поздно. Спасибо х77 за внимание, ценные советы и за возню со мной, с меня пиво .

[x77]

nikedeforest, а зачем? выполняй обычный запрос и считывай в переменную значения полей.

[nikedeforest]

Я знаю как можно обратиться ко всему полю
IBQuery1.FieldByName('NAME').AsString:=Edit3.Text;, при этом не знаю как считать с него,
я не знаю как обратиться к ячейке , поэтому начал пробовать миновать. Впридачу тут книжка попалась по Делфе и тут про ячейку тоже ничего, поэтому для меня пока это невозможно .
Я сколько не спрашивал у знакомых, так вразумительного ответа и не получал как можно считать значение из ячейки, а не из всего поля.

[x77]

Edit3.Text := IbQuery1.FieldByName ('Name').AsString;
Edit3.Text := IbQuery1.Fields [n].AsString;

[nikedeforest]

М-Да, если бы ты видел, как я обошелся без этого, обошелся-то удачно, но объемно. Спасибо за ответ.

[Dimka]

По поводу заключения строчек в кавычки при динамическом создании запроса. Перед подстановкой значения в строковой переменной все кавычки нужно продублировать, иначе будут: а) ошибки, б) потенциальная дыра в безопасности системы. Лучше всё же пользоваться параметрами.

[x77]

dimka, что за дыра?

[nikedeforest]

На счет кавычек, то я взапросе их не ставил, ну не получилось у меня, я их ставлю, когда заношу значение в Edit'e к примеру и все нормально работает. Это тоже являет дырой в безопасности, по-моему врятли, тюкю в случае если кавычки не поставить, то ошибка выскакивает, а запрос туда вроде как и не вкатать, а можно еще сделать граничение кол-ва вводимых символов, ИМХО.