|
#1
|
|||
|
|||
поиск по БД
такая ситуация..
Есть Edit1 и кнопка... Нужно реалтзовать поиск по БД методом Lookup по полю F В Table1 - F В Table2 - No Dg D As Цитата:begin LookupResult := Table1.Lookup('F',Edit1.Text, 'No;Dg;D;As'); if VarType(LookupResult)=varNull then ShowMessage('Íåò ') else if VarIsArray(LookupResult) then begin s.Caption := LookupResult[0]; s.Caption := LookupResult[1]; s.Caption := LookupResult[2]; s.Caption := LookupResult[3]; end else .... при значении которого нет в бд все ок, выдает месачж что нет.. но када вводиш правельное значение выдает ошибку типа не может найти No Dg D As.... Собственна как искать в другой таблице? Table2.No и Table2No - некатят.... |
#2
|
|||
|
|||
Твоя задача поставлена не верно или ты непонятно написал.
LookUp выдает поля только из текущей таблицы по которой ищешь. То есть, если делаешь Table1.LookUp(''F',Edit1.Text,Field2) то поле Field2 должно быть в таблице Table1. Если хочешь получить значения полей No Dg D As из таблицы Table2, то по какому полю надо искать? Например Table2.Lookup('No',Edit1.Text,'No;Dg;D;As'). |