powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / как лучше вывести результат запроса
6 сообщений из 6, страница 1 из 1
как лучше вывести результат запроса
    #32502993
woodoo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
выполняю следющий запрос:

SELECT personadddiagnos.add_ds_id, COMMENT, C_P,
ADD_DIAGNOS.ADD_DS_NAME
FROM ADD_DIAGNOS, PERSONADDDIAGNOS
WHERE
PERSONADDDIAGNOS.ADD_DS_ID = ADD_DIAGNOS.ADD_DS_ID
AND
PERSON_ID = some value


в результате получаю несколько величин в поле ADD_DS_NAME
и их все мне необходимо вывести в поле TMemo

я говорю:

MainForm.LungsFrame1.PersonAdddiagnosOthersMemo.Text:=
MainForm.IBQuery1.FieldValues[ADD_DS_NAME];

разумеется я получаю в поле TMemo только одну строку необходимых
мне параметров, а вот как остальные вытащить я не знаю

для доступа к базе использую компоненты IBX :)

P.S.
я такой же вопрос еще на форуме по Delphi выложил, может еще и там ответят
заранее спасибо
...
Рейтинг: 0 / 0
как лучше вывести результат запроса
    #32503034
FreemanZAV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Надо полагать, что ты получаешь несколько записей и тебе их надо вывести в Memo в несколько строк?
...
Рейтинг: 0 / 0
как лучше вывести результат запроса
    #32503050
woodoo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
да, собственно это мне бы очень хотелось
...
Рейтинг: 0 / 0
как лучше вывести результат запроса
    #32503064
FreemanZAV
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А циклом по записям пробежаться?
...
Рейтинг: 0 / 0
как лучше вывести результат запроса
    #32503072
woodoo
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
спасибо! но решение найдено:

в делфовом форуме ответили



MainForm.LungsFrame1.PersonAdddiagnosOthersMemo.Clear;

while not MainForm.IBQuery1.Eof do begin

MainForm.LungsFrame1.PersonAdddiagnosOthersMemo.Lines.append(

MainForm.IBQuery1.FieldValues[ADD_DS_NAME])

MainForm.IBQuery1.Next;

end
...
Рейтинг: 0 / 0
как лучше вывести результат запроса
    #32503087
Фотография Dnico
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
FreemanZAV Не успел ...

Best regards,
Dnico.
...
Рейтинг: 0 / 0
6 сообщений из 6, страница 1 из 1
Форумы / Firebird, InterBase [игнор отключен] [закрыт для гостей] / как лучше вывести результат запроса
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]