Збереження інформації з TStringGrid
У першій частині статті збереження інформації зTStringGrid у файл і зчитування з файлу вTStringGrid ми дізналися як можна в типізованих фалах зберігати інформацію. Тепер давайте подивимося як можна зберегти інформацію в текстовий файл і рахувати з нього цю інформацію вTStringGrid. Тут може для когось і складніше буде в порівнянні з першим варіантом, так як у текстовому файлі ми будемо зберігати рядкову інформацію і наші дані необхідно розділити якось, я використав прогалини, але це менш швидкий варіант тому кожен осередок записуємо в кожен рядок нашого текстового файлу. Ми зробимо так, у перший рядок нашого текстового файлу ми запишемо кількість рядків і стовпців нашогоTStringGrid, розділивши їх знаком «+ «. Далі в циклі в кожний рядок ми будемо записувати значення кожної комірки. При зчитуванні інформації, ми одразу вважаємо кількість рядків і стовпців, пропаримо наші дані (щоб отримати кількість рядків та стовпців, це ми вміємо вже, правда?). І просто організуємо цикл, як вважаємо кількість стовпців і рядків і зчитуватимемо кожен рядок і відображатимемо їх уTStringGrid.
На формі у мене
- TStringGrid
- TButton - 2 шт (для збереження та зчитування)
Далі на збереження я пишу наступний код
Думаю тут все зрозуміло, створюємо файл -test.txt (функції та процедури зі створення файлів я розповідав), далі отримуємо кількість рядків і стовпців і розділяємо їх знаком «+ » записуємо в першу рядок, а далі в циклі у кожний рядок записуємо наше значення. Нічого тут складного немає, як бачите, тепер зчитуємо з цього файлу, на подіюOnClick кнопки «Відкрити » я написав наступний код
Як бачите спершу ми зчитуємо значення з 1-го рядка і парсим її, отримуємо при цьому кількість стовпців і рядків, потім організовуємо цикл і в цьому циклі зчитуємо значення з файлу за допомогою ReadLn і записуємо в кожну комірку нашогоTStringGrid. Далі я розповім як зберегти та рахувати даніTStringGrid, використовуючи при цьому файл -ini. А на цьому все.