VPF::Помогите с переносом записей из StringGrid в файл

MoHaX

Дата 25.8.2006, 17:00 (ссылка)

(нет голосов)

Загрузка ...

Новичок

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

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

Помогите, пожалуйста, перенести текстовую информацию из StringGrid в файл, а также с загрузкой. так, чтобыпри загрузке все записи попадали на свои ячейки. Насколько я помню, эта тема уже поднималась, но в примерах, приведенных там, речь шла о записи в файл чисел, а не строк, и я не смог разобраться.

Bima

Дата 26.8.2006, 08:11 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

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

Этот код делаем на кнопке Save

Код


TStringList *MyCom=new TStringList; //Создаем дополниетельный компонент
MyCom->Add(IntToStr(StringGrid1->RowCount)); //записываем количество строк
MyCom->Add(IntToStr(StringGrid1->ColCount)); //записываем количество столбцов
for(int i=0;i<StringGrid1->RowCount;i++) // перебираем количество строк
        {
        MyCom->AddStrings(StringGrid1->Rows[i]); //Записываем каждую строку
        }
MyCom->SaveToFile("c:\\MyFile.txt"); //Записываем в файл, все что у нас получилось в файл c:\\MyFile.txt
delete MyCom; // Удаляем вспомогательный компонент

Этот код делаем на кнопке Load

Код


TStringList *MyCom=new TStringList; //Создаем дополниетельный компонент
MyCom->LoadFromFile("c:\\MyFile.txt"); //считываем из файла c:\\MyFile.txt данные, что мы записали в коде кнопки Save
StringGrid1->RowCount=StrToInt(MyCom->Strings[0]); //Считываем колличество строк и формируем их в таблице
StringGrid1->ColCount=StrToInt(MyCom->Strings[1]); //Считываем колличество столбцов и формируем их в таблице

for(int i=0;i<StringGrid1->RowCount;i++) // перебираем количество строк
        {
        for(int j=0;j<StringGrid1->ColCount;j++) // перебираем количество столбцов
                 StringGrid1->Cels[j][i]=MyCom->Strings[i+2]; //Записываем в нужную ячейку
        }
delete MyCom; // Удаляем вспомогательный компонент

--------------------

Чтобы дойти до цели, надо идти.

Клавиатура и мышь - это главные инструменты прогресса.

Ярослав

Дата 9.6.2009, 01:19 (ссылка)

(нет голосов)

Загрузка ...

Бывалый

Профиль
Группа: Awaiting Authorisation
Сообщений: 189
Регистрация: 8.6.2009

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

Модератор: Сообщение скрыто.

1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| C++ Builder \| Следующая тема »