Новости



Visual FoxPro 9 позволяет создавать ещё более производительные приложения баз данных.
Двадцатиление FoxPro! Microsoft принимает поздравления.
Visual FoxPro Toolkit for .NET - более 225 функций VFP 7.0, для языков .NET (подробнее)

fox00020.gif

* В следующем примере поле contact копируется из таблицы customer в
* массив gaContact. На экран выводятся первые 20 элементов массива.
* Затем массив сортируется, и на экране отображается результат
* сортировки.

CLOSE DATABASES

OPEN DATABASE (HOME( ) + 'samples\data\testdata')

USE Customer && Open customer table

COUNT TO gnCount && Number of contacts

DIMENSION gaContact(gnCount,1) && Create a contact array

COPY TO ARRAY gaContact FIELD contact && Fill the array

CLEAR

? 'Contact names:'

?

FOR nCount = 1 TO 20

? gaContact(nCount) && Display first 20 contacts

ENDFOR

= ASORT(gaContact)) && Sort the array

?

? 'Sorted Contact names:'

?

FOR nCount = 1 TO 20

? gaContact(nCount) && Display first 20 contacts, sorted

ENDFOR



Новое на сайте

  • Обновлен портфель программиста

    Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский)

  • Новые примеры программ

    Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2)

  • Обновленна справка

    Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.