Сохранение StringGrid

Ddv122 · Регистрация: 23.12.2010

Студворк — интернет-сервис помощи студентам

Вот сделал сохранение - всё работает хорошо
Но, стоит ли создавать 2 TStringList или можно как то обойтись одним?

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
#define SS List->Strings
    TStringList *List = new TStringList;
    TStringList *List2 = new TStringList;
    List->Clear();
    List2->Clear();
    List->Delimiter = ':';
    for(int i=1; i<StringGrid1->RowCount; i++)
    {
        StringGrid1->Rows[i]->Delimiter=':';
        List->DelimitedText = StringGrid1->Rows[i]->DelimitedText;
        List2->Add("1:" +SS[1]+ "::"+ SS[2] + " ; "+ SS[3] + " " + SS[4] );
    }
    List2->SaveToFile("new.txt");
    delete List2;
    delete List;
    #undef SS

AntonChik · 25.11.2013, 09:01

в целом можно обойтись и одним List2, добавив цикл пробежки по столбцам ряда.
тем паче перечисление ручками (SS[1]...SS[4]) как у вас это некрасиво

@nick42 · 25.11.2013, 12:36

А через "формат" не проще?

C++
1
2
3
4
5
    TStringGrid *sg = StringGrid1;   int rw=0;
    TStringList *sL = new TStringList;
    while (++rw<sg->RowCount) sL->Add(String().sprintf("1:%s::%s ; %s %s",
      sg->Cells[1][rw],sg->Cells[2][rw],sg->Cells[3][rw],sg->Cells[4][rw]));
    sL->SaveToFile(".\\123.txt");  delete sL;

@BRcr · 27.11.2013, 17:31

Сообщение от Ddv122

C++
1
("1:" +SS[1]+ "::"+ SS[2] + " ; "+ SS[3] + " " + SS[4] )

В этом формате есть какой-то смысл или это так просто?

Ddv122 · 28.11.2013, 14:04 **[ТС]**

BRcr,
на выходе должны быть строки вида ("0000:" +SS[1]+ "::"+ SS[2] + " ; "+ SS[3] + " " + SS[4] )
а во вторых проверки этих строк и если что быстрой автоматической правки....

C++
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
31
32
33
34
35
36
37
void __fastcall TForm1::Button6Click(TObject *Sender)
{
#define SS List->Strings
    TStringList *List = new TStringList;
    TStringList *List2 = new TStringList;
    List->Clear();
    List2->Clear();
    List->Delimiter = ':';
    for(int i=1; i<StringGrid1->RowCount; i++)
    {
        StringGrid1->Rows[i]->Delimiter=':';
        List->DelimitedText = StringGrid1->Rows[i]->DelimitedText;
        if (!SS[2].IsEmpty())
        {
            if (SS[2].Trim().Length()==16  || SS[2].Trim().IsEmpty()==17)       //чистый ключ
            {
                SS[2]=SS[2].Trim() + SS[2];
                for (int i = 3; i<= SS[2].Length(); i+=3)
                {
                    SS[2]=SS[2].Insert(" ",i);
                }
            }
//...и так далее)))
        if (!SS[2].IsEmpty())
        {
            List2->Add("0000:0000:" +SS[1]+ "::"+ SS[2].Trim() + " ; "+ SS[3] + " " + SS[4] );
        }
    }
    if (SaveDialog1->Execute())
    {
        List2->SaveToFile(SaveDialog1->FileName);
    }
    delete List2;
    delete List;
#undef SS
}
//---------------------------------------------------------------------------

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .	Установка Emscripten SDK (emsdk) и CMake на Windows для сборки C и C++ приложений в WebAssembly (Wasm) 8Observer8 30.01.2026 Чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. Система контроля версиями Git. . .	Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .
Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .	Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .

AntonChik 1090 / 588 / 121 Регистрация: 11.11.2008 Сообщений: 1,544
	25.11.2013, 09:01
	в целом можно обойтись и одним List2, добавив цикл пробежки по столбцам ряда. тем паче перечисление ручками (SS[1]...SS[4]) как у вас это некрасиво 1