MrZeRo
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору megamozg13 А зачем при считывании-то выделять память? По идее считывание предполагает, что где-то в памяти записаны нужные данные и их оттуда надо извлечь. И куда-то исчезли операторы освобождения памяти. Т.е. память всё выделяется и выделяется, а освобождаться не будет никогда? Присвоение указателю значения nil память не освобождает. Кроме того, в коде есть еще кое-какие ошибки, сам увидишь потом. Например, ты не стесняешься писать Цитата: for i:=0 to ar_kolvo do if StrComp(ar_indx[i],var_index)=0 then ar_tek:=i; | несмотря на то, что у тебя выше стоит Цитата: ar_indx: array[1..500] of PChar; | Как ты думаешь, что оно у тебя прочитает при i=0? Кроме того, когда ты нашел нужный ar_tek, цикл ты продолжаешь зачем-то, а не прерываешь. И вообще, мне кажется, что форумчанам не сильно интересно тут эту всю бодягу читать, пиши если что в ПМ.
---------- ... не это главное ... |
| Всего записей: 831 | Зарегистр. 30-01-2002 | Отправлено: 15:12 22-04-2008 | Исправлено: MrZeRo, 15:16 22-04-2008 |
|