Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Словари для таблицы из массива 
:(
    Опции темы
Dmitriy84s
Дата 18.8.2008, 18:50 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Задача:
 в mysql таблице хранятся данные ввиде индексов (только цифры)
 все словари находятся в массиве 
 
Код

a[1]:='Куплю';
a[2]:='Продам';
a[3]:='Обменяю';
a[4]:='Сдам';

Как сделать так чтобы в ДБГриде вместо цифр появились значения из этого массива.
PM MAIL   Вверх
KotBegemotKlg
Дата 18.8.2008, 22:32 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Для начала надо понять, как связать массив и таблицу БД. Один из вариантов - создать двумерный массив, в первом столбце которого будут ID из базы а во втором - твои названия.
Затем, для каждой записи из базы нужно произвести поиск в первом столбце массива и вернуть значение второго столбца, которое и отобразить в гриде (например как calculated поле датасета).
PM MAIL   Вверх
Poseidon
Дата 19.8.2008, 12:01 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Delphi developer
****


Профиль
Группа: Комодератор
Сообщений: 5273
Регистрация: 4.2.2005
Где: Гомель, Беларусь

Репутация: 3
Всего: 133
Цитата(Dmitriy84s @  18.8.2008,  18:50 Найти цитируемый пост)
Как сделать так чтобы в ДБГриде вместо цифр появились значения из этого массива.
В ДБГриде - никак. Можешь использовать обычный СтрингГрид. Получать данные из базы, "конвертировать" в слова при помощи массива и выводить в грид.



--------------------
Если хочешь, что бы что-то работало - используй написанное, 
если хочешь что-то понять - пиши сам...
PM MAIL ICQ   Вверх
morpheyushka
Дата 19.8.2008, 13:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зеленый человек
**


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

Репутация: нет
Всего: 8
Ага, по скольку это словарь, то 10 000 записей в таблице вполне может быть.
Интересно, пользователь не уснет пока ему все это выведут smile 


--------------------
user posted image
Спасибо делается вот так!!!
PM MAIL WWW   Вверх
Dmitriy84s
Дата 19.8.2008, 16:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
Вообще возможно массив в dll кинуть и потом из проги вызывать его, а то уж больно код здоровый выходит....

Это сообщение отредактировал(а) Dmitriy84s - 19.8.2008, 16:27
PM MAIL   Вверх
remax
Дата 20.8.2008, 02:51 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доцент
**


Профиль
Группа: Участник Клуба
Сообщений: 686
Регистрация: 7.4.2002
Где: Украина, Харьков

Репутация: нет
Всего: 5
в датасет добавить "вычисляемое поле", в котором определить метод gettext. в дб грид выводить именно вычисляемое поле (исходное - можно выводить, но лучше спрятать).


но, лучше всего этот селект сделать средствами СУБД, а не клиентской проги. хотя, если массив маленький, то и так сойдет.

например
kod - поле с кодом из базы
yyy - вычисляемое поле

тогда, в примитиве, без проверок будет выглядеть так:
Код

procedure TForm1.Table1yyyGetText(Sender: TField; var Text: String;
  DisplayText: Boolean);
begin
   text:=a[table1kod.asinteger];
end;


Это сообщение отредактировал(а) remax - 20.8.2008, 02:58


--------------------
Как бы ты не старался быть хорошим и правильным человеком с принципами и уважительным отношением к другим, всегда найдется кто-то, кто бросит в тебя какашку
PM MAIL ICQ Skype   Вверх
Dmitriy84s
Дата 20.8.2008, 09:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
нужна помощь.....этот массив нужно кинуть в dll...кто-нить знает как это сделать?

Код

var
    //A:array[1..4] of string[7];//Вид операций
    s:integer;

Type
    AA=array[1..5] of string[8];
    Const A:AA=('Продадим','Купим','Снимем','Сдадим','Обмен');  
begin
         { a[1]:='Куплю';
          a[2]:='Продам';
          a[3]:='Обменяю';
          a[4]:='Сдам'; }
          myquery1.ReadOnly:=false;
          s:=strtoint(myquery1.Fields.FieldByName('operation_type').AsString);
          myquery1.Fields.FieldByName('operation').Value:=A[s];
end;


Это сообщение отредактировал(а) Dmitriy84s - 20.8.2008, 09:54
PM MAIL   Вверх
remax
Дата 20.8.2008, 11:31 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Доцент
**


Профиль
Группа: Участник Клуба
Сообщений: 686
Регистрация: 7.4.2002
Где: Украина, Харьков

Репутация: нет
Всего: 5
Цитата(Dmitriy84s @ 20.8.2008,  09:53)
.....этот массив нужно кинуть в dll...

а зачем?


--------------------
Как бы ты не старался быть хорошим и правильным человеком с принципами и уважительным отношением к другим, всегда найдется кто-то, кто бросит в тебя какашку
PM MAIL ICQ Skype   Вверх
Dmitriy84s
Дата 20.8.2008, 11:37 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



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

Репутация: нет
Всего: нет
эт только маленькая часть огромного массива...чтобы все не хранить в запуском файле......размер меньше будет
PM MAIL   Вверх
morpheyushka
Дата 20.8.2008, 18:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Зеленый человек
**


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

Репутация: нет
Всего: 8
Зачем dll. Если куда нибудь хочешь запихнуть свой массив и если он не изменяется, то добавь в проект модуль *.pas, обзови его типа MyConst.pas и засунь в него свой массив. По крайней мере ничего таскать за программой не придется smile 


--------------------
user posted image
Спасибо делается вот так!!!
PM MAIL WWW   Вверх
  
 Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Базы данных и репортинг"
Vit
Петрович

Запрещено:

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

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


Обязательно указание:

1. Базы данных (Paradox, Oracle и т.п.)

2. Способа доступа (ADO, BDE и т.д.)


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

FAQ раздела лежит здесь!

Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович.
 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема »

Подписаться на тему | Подписка на этот форум | Скачать/Распечатать тему


 




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


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

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