Имя: Пароль:
1C
1С v8
Редактирование файла txt
0 kap-v-kstu
 
20.11.13
22:50
Процедура УдалитьСтрокиТекста()
    ТекстДок = Новый ТекстовыйДокумент;
    ТекстДок.Прочитать("Текст.txt");
    Сч = 1;
    Пока Сч < ТекстДок.КоличествоСтрок() Цикл
        Строка = ТекстДок.ПолучитьСтроку(Сч);
        Если Найти(Строка, "1С") > 0 Тогда
            ТекстДок.УдалитьСтроку(Сч);
        Иначе  // Благодаря этой переменной мы
            // не пропускаем строки в тексте
            Сч = Сч + 1;
        КонецЕсли;
    КонецЦикла;
    ТекстДок.Записать("Текст.txt");
КонецПроцедуры
1 kap-v-kstu
 
20.11.13
22:51
В чем  ошибка? Почему файл не меняется??
2 Voronve
 
20.11.13
22:52
Строка = ТекстДок.ПолучитьСтроку(Сч);
Строка - зарезервированное слово ?
3 kap-v-kstu
 
20.11.13
22:54
Все ок) просто была проблема с записью на диск D)