Шаг 113 - Изучаем XBase – определяем конец файла.

Функция есть подходящая.

ВКонце
Прочитать значение флага конца файла базы банных.

Синтаксис:
ВКонце()
Англоязычный синоним:
EOF

Возвращаемое значение:
Число: 1 — указатель в файле находится за последней записью; 0 — конец файла не достигнут.

Описание:
Метод ВКонце возвращает значение флага конца файла.

Вот теперь мы полностью готовы что бы прочитать файл.

Процедура Сформировать() 
      	Т = СоздатьОбъект("Таблица");   
	ДБФ =  СоздатьОбъект("XBase");
        ДБФ.ОткрытьФайл("c:\Test.dbf");
	ДБФ.Первая(); 
	  
	  Пока ДБФ.ВКонце() = 0 Цикл 

	     	Т.ВывестиСекцию("Секция_1");
 		ДБФ.Следующая();   

	  КонецЦикла;
	  	
	  ДБФ.ЗакрытьФайл();

        Т.ТолькоПросмотр(1);
	Т.Показать(); 
КонецПроцедуры

Запустим что ли.

113_1.gif (5108 b)

Получилось.

Hosted by uCoz