Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > БД в Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 13.07.2017, 16:56   #1
inferno100
Новичок
Джуниор
 
Регистрация: 13.07.2017
Сообщений: 2
По умолчанию Вывод результата FB LIST() в EhLib6.x

Собственно сам запрос выполняется, как в приложении так и в IBExpert-е, с той лишь разницей, что в "Эксперте он нормально выводит со склеиванием строк", а в Дэльфе в этом поле простой написано "Memo" и все (( собственно сам запрос
Код:
select q.poc_id,
       q.poc_name,
       q.poc_fname,
       q.poc_lname,
       q.adrc_name,
       q.adrs_name,
       q.poc_dberth,
       q.adro_home1,
       q.adro_home2,
       q.adro_home3,
List (cast(q.pr_date as varchar(20))|| ' -> ' ||cast(q.dia_name as varchar(300)), ',')

from (
    select
        pocient.poc_name,
        pocient.poc_fname,
        pocient.poc_lname,
        pocient.poc_id,
        pocient.poc_dberth,
        pocient.adro_home1,
        pocient.adro_home2,
        pocient.adro_home3,

        priem.pr_date,

        diagnoz_full.dia_name,

        adr_city.adrc_name,

        adr_street.adrs_name

    from priem
        left join pocient on (priem.poc_id = pocient.poc_id)
        inner join podrazdelenij on (priem.podr_id = podrazdelenij.podr_id)
        right join diagnoz_full on (priem.dia_id = diagnoz_full.dia_id)
        inner join diagnoz_mkb on (priem.diamkb_id = diagnoz_mkb.diamkb_id)
        inner join adr_city on (adr_city.adrc_id = pocient.adrc_id)
        inner join adr_street on (adr_street.adrs_id = pocient.adrs_id)
    where
     (
        (
             priem.pr_date > :pr_date
        )
     )
     order by pocient.poc_id
    ) as q

group by q.poc_id, q.poc_name,q.poc_fname,
         q.poc_lname, q.adrc_name, q.adrs_name,
         q.poc_dberth,
         q.adro_home1, q.adro_home2, q.adro_home3
inferno100 вне форума Ответить с цитированием
Старый 13.07.2017, 17:04   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от inferno100 Посмотреть сообщение
а в Дэльфе в этом поле простой написано "Memo"
есть такая беда.
мы когда-то использовали такой костыль - на сервере в самом запросе обрезали строку до 200 (или 190 не помню точно) символов.
Но в вашем случае, конечно, это не выход.

Но, насколько я помню, проблема возникала только с отображением содержимого данного поля в визуальных компонентах. Сама информация была доступна.
Попробуйте получить значение поля в строковую переменную и выведите эту строку. Должно помочь.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 13.07.2017, 17:06   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Попробуй в событии OnGetText поля датасета склеить строки Memo-поля для отображения в гриде. Или отображай его в DBMemo только для текущей строки грида
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 13.07.2017, 18:39   #4
inferno100
Новичок
Джуниор
 
Регистрация: 13.07.2017
Сообщений: 2
По умолчанию

сделал проще ))) DBMemo прикрутил к нему DS, что прикручет к гриду и все,, все заработало экспортируется в эксэль без заморочек ))
inferno100 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Вывод результата. Множество lalka123 Паскаль, Turbo Pascal, PascalABC.NET 2 01.07.2014 18:18
вывод результата DontStopMe! Паскаль, Turbo Pascal, PascalABC.NET 12 11.12.2013 16:43
Вывод результата! Аделинкка Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 29 09.05.2012 08:12
вывод результата Илья- Общие вопросы C/C++ 0 16.11.2011 17:29
Вывод результата блоками nervniy Паскаль, Turbo Pascal, PascalABC.NET 1 28.05.2011 20:26