Поиск по базе

← →
pashaz (2004-12-06 14:50) [0]

Ситуация:

значение1 данные1
значение2 данные2
значение3 данные3

причём значение1=значение2-значение3, но данные1<>данные2<>данные3.

как сделать, чтобы после запроса выводились ВСЕ данные, а нетолько для первой найденной записи?

← →
Ega23 © (2004-12-06 14:56) [1]

А может у тебя только одна запись, подходящая под такое условие

← →
msguns © (2004-12-06 14:56) [2]

Соорудить отдельный запрос, выполнить его, а результат запихать куда-нить типа грида или листвьюхи. При перемещению по этому "гриду" делать локейт в основной НД по ид-ру.

← →
Johnmen © (2004-12-06 14:57) [3]

Так же, как и для первой...

← →
Sergey13 © (2004-12-06 15:02) [4]

2pashaz (06.12.04 14:50)
А 1,2,3 - это разные записи? Как ты тогда определяешь какая 1, какая 2? Приведи структуру таблицы.

← →
pashaz (2004-12-06 16:54) [5]

поле1 поле2
аббат йййййййййййййййй
аббат цццццццццццццццц
аббат уууууууууууууууу

Select * from Table where поле1 = аббат.

Memo1.Text:=ADOQuery2.Fields[1].AsString;

так вот нужно, чтобы в Мемо выводились все значения.

← →
msguns © (2004-12-06 17:01) [6]

>pashaz (06.12.04 16:54) [5]

;)))

with ADOQuery2,Memo1 do
begin
Lines.Clear;
if Active then Close;
Open;
while not Eof do
begin
Lines.Add(Fields[1].AsString);
Next;
end;
end;

← →
Sergey13 © (2004-12-06 17:03) [7]

Ну дык и пройдись циклом по всем значениям.

← →
pashaz (2004-12-06 17:31) [8]

to msguns

with ADOQuery2 do
begin
Active:=False;
SQL.Clear;
SQL.Add("select * from OZHEGOV where VOCAB = :a");
ParamCheck:=True;
Parameters.ParamByName("a").Value:=AdvEdit1.Text;
Open;
end;
Memo1.Text:=ADOQuery2.Fields[2].AsString;
with Memo2 do
begin
Lines.Clear;
while not Eof do
begin
Lines.Add(ADOQuery2.Fields[3].AsString);
Next;
end;
end;
// Memo2.Text:=ADOQuery2.Fields[3].AsString;
end;

не работает. ругается на while not Eof do - input ouput error

← →
pashaz (2004-12-06 17:35) [9]

ВСё, всем спасибо. Сам дурак. Дошло, наконец.

А все потому, что такое применение отступов в тексте не помогает, а мешает разобраться в конструкциях With .. do

Поиск по базе Найти похожие ветки