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

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

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 21.12.2010, 01:33   #1
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
Восклицание Хранение данных StringGrid в программе

Доброго времени суток!
Есть таблица, примерно 30х9. Таблица с числами. По ней будет производиться поиск коэффициентов по заданным параметрам или, если нужно, будут производиться вычисления. так вот в чем вопрос: можно ли данные этой таблицы хранить внутри программы, чтобы не тягать за ней файл?
googl вне форума Ответить с цитированием
Старый 21.12.2010, 01:42   #2
ArtGrek
DelphiProger
Участник клуба
 
Аватар для ArtGrek
 
Регистрация: 14.11.2010
Сообщений: 1,023
По умолчанию

а какие могут быть числа в таблице, можно их в цикл занести?
VirusN13
ArtGrek вне форума Ответить с цитированием
Старый 21.12.2010, 05:37   #3
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

Создай константу
Код:
const
  _TABLE: array [0..8, 0..29] of Integer = (
    (1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (2, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (3, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (4, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (5, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (6, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (7, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (8, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30),
    (9, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30)
  );
И заполняй StringGrid в цикле
Код:
var
  c, r: Integer;
begin
  StringGrid1.ColCount := 30;
  StringGrid1.RowCount := 9;

  for r := 0 to 8 do
    for c := 0 to 29 do
      StringGrid1.Cells [c, r] := IntToStr (_TABLE [r, c]);
end;
Sibedir вне форума Ответить с цитированием
Старый 21.12.2010, 18:27   #4
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
По умолчанию

Это все конечно отлично) но у меня таблица с заданными числами, у которых нет закономерности. как бы можно сидеть и все числа забить вручную в каждую ячейку, но, думаю, это как-то не целесообразно, да и бредово, на такое количество. вот и спрашиваю: можно ли как-то заполнить таблицу и хранить ее в проге. или текстовый файл, в который сохранен этот стринггрид будет
googl вне форума Ответить с цитированием
Старый 21.12.2010, 18:45   #5
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

Ну вставь таблицу в блокнот и замени все табы на ", ".
Sibedir вне форума Ответить с цитированием
Старый 21.12.2010, 18:48   #6
ArtGrek
DelphiProger
Участник клуба
 
Аватар для ArtGrek
 
Регистрация: 14.11.2010
Сообщений: 1,023
По умолчанию

если нет закономерности, то как сказал Sibedir
могу лиш посоветыват, если чисел очен много, то зарание напиши прогу,
которая скачает их с тхт, и вывидит в том формате что б подходило в твои код один раз скопируеш, а потом далше работаи с етим массивом
VirusN13
ArtGrek вне форума Ответить с цитированием
Старый 21.12.2010, 19:31   #7
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Теоретически можно в ресурсах хранить, но...
Для этого дела придумали люды данных базы. А потом понятие "Справочники" придумали.
И поняли, что вместо того чоб пихать все в один Экзе, который однозначно загружается весть в память, просто иметь отдельный маленький файл, формата того или иного СУБД, и пользоваться SQL. Если хочешь морочиться ты - ради бога. Ресурсы ждут тебя и твой файл.
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 22.12.2010, 00:44   #8
googl
Форумчанин
 
Регистрация: 05.06.2010
Сообщений: 154
По умолчанию

все потмоу что не хочется тягать за прогой этот файл(
googl вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Хранение данных C++ Memfis_nya Помощь студентам 8 16.11.2010 09:28
Хранение данных puKo Общие вопросы Delphi 17 21.09.2009 16:08
хранение данных в Excel Maka111 Microsoft Office Excel 6 04.05.2009 10:10
хранение данных в файле (dc++) AsabeasT Общие вопросы Delphi 2 27.03.2009 11:57
Хранение и шифрование данных Paul Hindenburg БД в Delphi 1 20.08.2007 09:04