![]() |
|
#6
|
|||
|
|||
![]() Вопрос... почему выдаёт только одно слово в мемо??? хотя их должно быть много.
если меняю Fields[0] на Fields[1] выдаёт ошибку... не понимаю, объясните пожалуйста. Код:
procedure TfMain.Button1Click(Sender: TObject); var lostS,f: string; begin Memo1.Clear; lostS:=Edit1.Text; f:=lostS; begin with fMain.ADOQuery1 do begin Close; SQL.Clear; SQL.Add('SELECT Name'); SQL.Add('FROM WORDS'); SQL.Add(Format('WHERE Name LIKE %s',[QuotedStr('%'+f+'%')])); Open; Memo1.Lines.Add(fMain.ADOQuery1.Fields[0].AsString) end; end; end; |