Запазване на информация от TSringGrid
В първата част на статията за запазване на информация отTSringGrid във файл и четене от файл вTSringGrid научихме как може да се съхранява информация във въведени файлове. Сега нека видим как можем да запазим информация в текстов файл и да прочетем тази информация от него вTSringGrid. Тук може да е по-трудно за някой в сравнение с първия вариант, тъй като в текстов файл ще записваме информация ред по ред и нашите данни трябва да бъдат разделени по някакъв начин, използвах интервали, но това е по-малко бърз вариант, така че записваме всяка клетка на всеки ред от нашия текстов файл. Ще направим това, като в първия ред на нашия текстов файл ще запишем броя на редовете и колоните на нашияTStringGrid, като ги разделим със знака "+ ". По-нататък в цикъла във всеки ред ще напишем стойността на всяка клетка. Когато четем информация, ние веднага преброяваме броя на редовете и колоните, анализираме нашите данни (за да получим броя на редовете и колоните, вече знаем как, нали?). И ние просто организираме цикъл, как броим броя на колоните и редовете и ще прочетем всеки ред и ще ги покажем вTStringGrid.
На моя формуляр
- TSringGrid
- TButton - 2 бр (за запис и четене)
След това, за да запазя, пиша следния код
Мисля, че тук всичко е ясно, създаваме файл -test.txt (аз казах функциите и процедурите за създаване на файлове), след това получаваме броя на редовете и колоните и ги разделяме със знака „+ “, записваме го на първия ред и след това в цикъл записваме нашата стойност на всеки ред. Тук няма нищо сложно, както виждате, сега четем от този файл, на събитиетоOnClick на бутона “Open ” написах следния код
Както можете да видите, първо четем стойността от първия ред и я анализираме, получаваме този брой колони и редове, след това организираме цикъл и в този цикъл четем стойностите от файла с помощта на ReadLn и записваме във всяка клетка на нашияTStringGrid. След това ще ви кажа как да запазите и прочетете даннитеTSringGrid, като използвате файла -ini. И това е всичко.