ADOTable mit Access (*.mdb) Datenbank durchsuchen

[kingflo]

mein Button Click event sieht erstmal so aus:

Delphi-Quellcode:

procedure TformImportEuL.Button1Click(Sender: TObject);
var s: String;
begin
 dmAdoImportEuL.ADOQuery.close;
 dmAdoImportEuL.ADOQuery.SQL.Text:='SELECT FieldValue FROM CWD_Text WHERE FieldID=602959;';
 dmAdoImportEuL.ADOQuery.Open;


 if not dmAdoImportEuL.ADOQuery.Eof then begin
 s:= dmAdoImportEuL.ADOQuery.FieldByName('FieldValue').AsString;
 showMessage(s);
 end;
end;