Сохранение из StringGrid массива в файл и загрузка из файла в StringGrid

@iKarma · Регистрация: 17.10.2011

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

Всем доброго времени суток =) У меня есть загрузка массива из StringGrid на Delphi 2010:

Delphi
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
//загрузка из файла
procedure TMainForm.MenuLoadClick(Sender: TObject);
var
  T:TextFile;
  i,j,n,x0:Integer;
  M:array[1..2,1..100]of Integer;
begin
  if OpenDialog.Execute and FileExists(OpenDialog.FileName) then
    try
      AssignFile(T,OpenDialog.FileName);
      Reset(T);
      read(T,n);
      EditRegionValue.Text:=IntToStr(n);
      for i:=1 to 2 do
        for j:=1 to n do
          read(T,M[i,j]);
      for i:=1 to 2 do
        for j:=1 to n do
          StringGridData.Cells[i,j]:=IntToStr(M[i,j]);
      read(T,x0);
      SpinEditPer.Text:=IntToStr(x0);    
      CloseFile(T);
    except
      ShowMessage('Ошибка чтения данных из файла!');
    end;
end;

Как мне её переписать в C++ Builder 2010? Начал, но дальше не пошло:

C++
1
2
3
4
5
6
7
8
9
void __fastcall TMainForm::N2Click(TObject *Sender)
{
    TextFile T;
    unsigned int i, j, n;
    double Points[100][100];
    if ((OpenDialog -> Execute()) && (FileExists(OpenDialog->FileName))) {
 
    }
}

И сохранение в файл из StringGrid сделать?

@iKarma · 20.12.2011, 12:44 **[ТС]**

wake, считывает число с элемента на форме, у меня это размерность - количество строк

Новые блоги и статьи Все статьи Все блоги /
Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .

@iKarma 10 / 10 / 1 Регистрация: 17.10.2011 Сообщений: 114
	20.12.2011, 12:44 [ТС]
	wake, считывает число с элемента на форме, у меня это размерность - количество строк 0