Новости



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

fox00020.gif

* В следующей функции, определенной пользователем, FSEEK( )
* используется для получения размера файла. Если пользовательской
* функции не переданы параметры, она возвращает fox90002.gif2. Если файл не
* удалось найти, пользовательская функция возвращает fox90002.gif1.

FUNCTION fsize2

PARAMETERS gcFileName && File to be checked

PRIVATE pnHandle,pnSize

IF PARAMETERS( ) = 0

RETURN -2 && Return -2 if no parameter passed

ELSE

IF !FILE(gcFileName)

RETURN -1 && Return -1 if file does not exist

ENDIF

ENDIF

pnHandle = FOPEN(gcFileName) && Open file

pnSize = FSEEK(pnHandle,0,2) && Determine file size, assign to pnSize

=FCLOSE(pnHandle) && Close file

RETURN pnSize && Return value



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

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

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

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

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

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

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