OPEN DATABASE (HOME( ) + 'samples\data\testdata')
USE Customer && Open customer table
CLEAR
FOR nCount = 1 TO 254
IF !EMPTY(TAG(nCount)) && Checks for tags in the index
? TAG(nCount) + ' ' && Display tag name
??
ELSE
EXIT && Exit the loop when no more tags are found
ENDIF
ENDFOR
* testdata. Структура FOR ... ENDFOR используется для организации цикла, в
* котором функция IDXCOLLATE( ) отображает последовательность
* сортировки для каждого тега структурного индекса customer. На экран
* выводится имя каждого тега структурного индекса вместе с его
* последовательностью сортировки.
Новое на сайте
-
Обновлен портфель программиста
Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский) -
Новые примеры программ
Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2) -
Обновленна справка
Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.