Создать расчётное поле в запросе adoquery

@maybeTM · Регистрация: 30.10.2014

Author24 — интернет-сервис помощи студентам

Есть MSAccess, adoquery, запрос и dbgrid.
Нужно что бы запрос отображал значение двух полей из запроса в одном.
Я попробовал сделать расчётное поле в самом аксесе и отобразить его в запросе, но в гриде отображает "WIDEMEMO)".
Хотя в самой субд написано, что тип данных у поля "Короткий текст".
Погуглил на эту тему и нашёл:

Delphi

procedure TForm7.DBGrid1DrawColumnCell(Sender: TObject; const Rect: TRect;
  DataCol: Integer; Column: TColumn; State: TGridDrawState);
begin
if Assigned(Column) then
  begin
   DBGrid1.Canvas.FillRect(Rect);
   DBGrid1.Canvas.TextRect(Rect, Rect.Left, Rect.Top, ' '+Column.Field.AsString);
  end;
end;

Тогда если на поле в дбгриде не кликать, то отображается всё как надо. Но в выделенном состоянии запись двоится и видно "WIDEMEMO)". Выглядит это ужасно.

Я вижу два варианта, как сделать приблизительно то, что мне нужно. Объединить поле "Наименование группы" и "курс" в одно поле или создать просто еще одно поле и извращаться, заполнять его в цикле перед тем как отобразить. Или попытаться использовать стринггрид, но я им никогда не пользовался.
Как же всё таки это реализовать ?)
З.Ы. Возможности покупать компоненты не имею, так как это просто курсовая.

@qwertehok · 10.02.2016, 19:52

или напишите запрос в котором объедините эти столбцы
или обычный запрос, но при выводе объединить столбцы в один (но придется использовать StringGrid)

@maybeTM · 10.02.2016, 19:58 **[ТС]**

qwertehok, А как будет выглядеть такой запрос? И для того что бы объединить поля, необходимо создавать новое поле заранее?

@qwertehok · 10.02.2016, 20:15

Сообщение от maybeTM

А как будет выглядеть такой запрос?

если написать вот так, то вроде поля должны объединиться в самом запросе

SQL

1	SELECT a &" "& b

а если так

SQL

1	SELECT a,b FROM TABLE

то их можно будет объединить в момент обработки

@maybeTM · 10.02.2016, 20:31 **[ТС]**

qwertehok, Спасибо огромное, первый вариант то что нужно.

Добавлено через 7 минут
qwertehok, а нет, я пошутил. В аксесе запрос работает нормально а в делфи выдаёт "(WIDEMEMO)".
А второй вариант не очень понял как использовать, этот запрос же просто поля выдаёт.

@qwertehok · 10.02.2016, 20:52

Сообщение от maybeTM

а в делфи выдаёт "(WIDEMEMO)".

эта ошибка как-то решается, поищите в инете (я давно отошел от аксесса)

Сообщение от maybeTM

А второй вариант не очень понял как использовать, этот запрос же просто поля выдаёт.

я обычно вывожу так
query.fields[0].asstring+''+query.fields[1].asstring

эта конструкция объединяет поля в постобработке

@maybeTM · 10.02.2016, 21:21 **[ТС]**

сколько читаю, везде ругаются на размеры полей, но я размеры у полей везде явно указал, даже не представляю почему так)
На сколько я понял, объединённые поля преобразуются в формат длинного текста и из-за этого грид их не может отобразить..

@qwertehok 5571 / 4422 / 1079 Регистрация: 29.08.2013 Сообщений: 27,663 Записей в блоге: 3
	10.02.2016, 19:52	2
	или напишите запрос в котором объедините эти столбцы или обычный запрос, но при выводе объединить столбцы в один (но придется использовать StringGrid) 0

@maybeTM 16 / 15 / 4 Регистрация: 30.10.2014 Сообщений: 175
	10.02.2016, 19:58 [ТС]	3
	qwertehok, А как будет выглядеть такой запрос? И для того что бы объединить поля, необходимо создавать новое поле заранее? 0

@maybeTM 16 / 15 / 4 Регистрация: 30.10.2014 Сообщений: 175
	10.02.2016, 20:31 [ТС]	5
	qwertehok, Спасибо огромное, первый вариант то что нужно. Добавлено через 7 минут qwertehok, а нет, я пошутил. В аксесе запрос работает нормально а в делфи выдаёт "(WIDEMEMO)". А второй вариант не очень понял как использовать, этот запрос же просто поля выдаёт. 0

@qwertehok 5571 / 4422 / 1079 Регистрация: 29.08.2013 Сообщений: 27,663 Записей в блоге: 3
	10.02.2016, 20:52	6
	Сообщение от maybeTM а в делфи выдаёт "(WIDEMEMO)". эта ошибка как-то решается, поищите в инете (я давно отошел от аксесса) Сообщение от maybeTM А второй вариант не очень понял как использовать, этот запрос же просто поля выдаёт. я обычно вывожу так query.fields[0].asstring+''+query.fields[1].asstring эта конструкция объединяет поля в постобработке 0

@maybeTM 16 / 15 / 4 Регистрация: 30.10.2014 Сообщений: 175
	10.02.2016, 21:21 [ТС]	7
	сколько читаю, везде ругаются на размеры полей, но я размеры у полей везде явно указал, даже не представляю почему так) На сколько я понял, объединённые поля преобразуются в формат длинного текста и из-за этого грид их не может отобразить.. 0