Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Добавление колонки в DBgrid, основа DBGrid - query 
:(
    Опции темы
funkster
Дата 25.9.2005, 20:01 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Есть в таблице строковое поле, в котором данные хранятся через разделитель (этого не изменить). Мне надо эти данные отобразить в отдельных колонках DBGrid.

Колонки я создать могу, но не могу заполнить их данными. Подскажите, что делать. Если можно, то с примерами кода.
  Вверх
Alex
Дата 25.9.2005, 22:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162



Я думаю самым нормальным будет использовать StringGrid


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Vet
Дата 25.9.2005, 23:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 101
Регистрация: 24.2.2005

Репутация: нет
Всего: нет



Конечно, заполнить ты их не сможешь, т.к. с одной колонкой DBGrid'a должно быть связано 1 поле TTable или TQuery. А у тебя 1 поле и несколько колонок. Создай несколько полей, по количеству равное максимальному количеству разделителей
PM MAIL   Вверх
Alex
Дата 25.9.2005, 23:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162



Цитата(Vet @ 26.9.2005, 00:16)
Создай несколько полей, по количеству равное максимальному количеству разделителей

Никогда! так не делайте и другим не советуйте.


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Vet
Дата 26.9.2005, 01:07 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Шустрый
*


Профиль
Группа: Участник
Сообщений: 101
Регистрация: 24.2.2005

Репутация: нет
Всего: нет



Хотел сказать - не в таблице, а в запросе
PM MAIL   Вверх
Guest
Дата 26.9.2005, 07:05 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Я не могу определить максимальное количество колонок. В том-то и проблема, что формировать мне их надо уже после запроса к БД.
Можно ли сделать это через dataset ?
  Вверх
~FoX~
Дата 26.9.2005, 08:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


НЕ рыжий!!!
****


Профиль
Группа: Участник Клуба
Сообщений: 2819
Регистрация: 8.10.2003
Где: Зеленоград

Репутация: 13
Всего: 68



А разделители какие?
Может можно их преобразовать в запятые и обрабатывать как файл *.CSV....Jet очень хорошо их проглатывает.


--------------------
user posted image
…множественность никогда не следует полагать без необходимости…
PM MAIL WWW ICQ Jabber   Вверх
Alex
Дата 26.9.2005, 08:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Экс. модератор
Сообщений: 4147
Регистрация: 25.3.2002
Где: Москва

Репутация: 80
Всего: 162



Цитата(Guest @ 26.9.2005, 08:05)
Можно ли сделать это через dataset ?

Можно, все. Вопрос только в том, что вы захотите дальше с этими данными сделать? Если только отображать, то особых проблем нет, а если редактировать, то я бы вам настоятельно советывал использовать StringGrid


--------------------
Написать можно все - главное четко представлять, что ты хочешь получить в конце. 
PM Skype   Вверх
Akella
Дата 26.9.2005, 09:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329



Создаёшь lookup-поля, а в событии onGetText каждого поля обрабатываешь

типа этого (пишу навскидку только для примера)
Код

//для первого поля вырезаешь первые 5 символов
if Text <> ''
then Text := Copy (Text, 1,5);


Код

для второго поля вырезаешь остальное
if Length(Text) > 5
then Text := Copy (Text, 6,Length(Text)-6);//что-то вроде этого


Это сообщение отредактировал(а) dsergey - 26.9.2005, 09:42
PM MAIL   Вверх
funkster
Дата 26.9.2005, 15:15 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Мне надо эти данные не только отобразить, но и обсчитать в итоговом столбце.
В этом-то все и дело.

А если идти через stringgrid, то в чем отличия от грида ?

dsergey, это хорошо, но как мне эти данные вывести в несколько столбцов ?
  Вверх
Akella
  Дата 27.9.2005, 09:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Творец
****


Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 36
Всего: 329



Цитата(funkster @ 26.9.2005, 15:15)
dsergey, это хорошо, но как мне эти данные вывести в несколько столбцов ?

ты так ничего и не понял, или не хочешь думать smile

Допустим, что данные физически хранятся в поле с именем pole1. Тебе этот столбец нужно разделить и вывести содержимое поля pole1 в два разных столбца.

1. В компоненте TTable (к примеру) открываем редактор полей и добавляем два новых поля, см. рисунок, и сделай эти поля Calculated.
2. В событии таблицы (TTable) OnCalcFields напиши что типа такого

Код

  Table1Pole2.asString := Copy (Table1Pole1.asString, 1,5);
  Table1Pole3.asString := Copy (Table1Pole1.asString, 6,Length(Table1Pole1.asString)-6);//короче остальные символы




Присоединённый файл ( Кол-во скачиваний: 2 )
Присоединённый файл  12.gif 9,21 Kb
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0578 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.