[glivera]

При попытке взять текст из таблицы в базее данных, появляется ошибка: ""Project Project1.exe raised exception class EOleException with messages "несоответствие типов данных в выражении условия отбора".""
Где может быть ошибка?

Код:

procedure TForm1.Button1Click(Sender: TObject);
begin
     if radiobutton1.Checked then
     begin
        adoquery1.SQL.Clear;
        adoquery1.SQL.Add('select Text from Table where id=1');
        adoquery1.Open;
        a:=adoquery1.Fields[0].AsString;
        DBmemo1.text:= a;
    end;

[Страдалецъ]

Вроде все правильно, но если так попробовать?

Код:

DBmemo1.Text := AdoQuery1.FieldByName('Text').AsString;

Какого типа у вас пременная а ?

[Aristarh Dark]

ИМХО, ошибка таки в запросе.

[glivera]

Спасибо! Ошибка была в базе данных. Там поле id стояло текстового типа