visual-foxpro учебник
Начало работы с visual-foxpro
Поиск…
замечания
Foxpro был создан в начале 80-х (первоначально FoxBase - 1984?) С помощью программного обеспечения Fox и поддерживался на платформах Mac OS, Unix, DOS, Windows. Тогда он был известен как самый быстрый движок базы данных на ПК. Позже в 1992 году, к сожалению , он был приобретен Microsoft. После принятия Microsoft в 1994 году выпущены Foxpro для DOS (FPD) и Foxpro для Windows (FPW) 2.6. В конце 1995 года Foxpro получила название «Visual», а поддержка платформы ограничивалась только окнами. Это была также первая версия Foxpro, где язык оказался объектно-ориентированным.
Официальный сайт Microsoft Visual FoxPro (обычно называемый только VFP) описывает его как:
Система разработки баз данных Microsoft® Visual FoxPro® - это мощный инструмент для быстрого создания высокопроизводительных приложений для настольных компьютеров, приложений с богатым клиентом, распределенным клиентом, клиентом / сервером и веб-базами данных.
Хотя это старый язык, он по-прежнему считается самым легким языком для быстрого создания ориентированного на данные приложения для рабочего стола Windows. Если вам нужно создать приложение, основанное на данных для рабочего стола Windows, то выберите VFP, который вы действительно сделаете так легко и быстро.
Версии
| Версия | Вышел |
|---|---|
| FPW 2.6a | 1994-10-28 |
| Visual Foxpro 3.0 | 1995-12-16 |
| Visual Foxpro 5.0 | 1997-01-24 |
| Visual Foxpro 6.0 | 2000-08-18 |
| Visual Foxpro 7.0 | 2002-01-04 |
| Visual Foxpro 8.0 | 2003-10-25 |
| Visual Foxpro 9.0 | 2004-12-13 |
| Visual Foxpro 9.0 SP2 | 2007-10-21 |
Установка или настройка
Подробные инструкции по настройке или установке visual-foxpro.
Привет, мир
На всех языках традиционно первым примером является печать «Hello World». Вероятно, это проще всего в VFP:
? "Hello World"
Добавить глобальный обработчик ошибок
Простым способом обнаружения необработанных ошибок (исключений) в приложении VFP является использование команды ON ERROR в начале вашей основной программы.
Следующая команда ON ERROR вызывает метод в текущей программе под названием «errorHandler». Значения, возвращаемые ERROR (номер ошибки VFP), MESSAGE (сообщение об ошибке VFP), PROGRAM (имя текущей исполняемой программы) и LINENO (номер строки ошибки), передаются методу errorHandler.
ON ERROR DO errorHandler WITH ERROR(), MESSAGE(), PROGRAM(), LINENO()
Простой метод errorHandler может выглядеть следующим образом.
PROCEDURE errorHandler
LPARAMETERS tnVFPErrorNumber, tcVFPErrorMessage, tcProcWithError, tnLineNumber
STORE 'Error message: ' + tcVFPErrorMessage + CHR(13) + ;
'Error number: ' + TRANSFORM(tnVFPErrorNumber) + CHR(13) + ;
'Procedure with error: ' + tcProcWithError + CHR(13) + ;
'Line number of error: ' + TRANSFORM(tnLineNumber) TO lcDetails
MESSAGEBOX(lcDetails, 16, "Unhandled Exception")
ON ERROR *
ON SHUTDOWN
CLEAR EVENTS
QUIT
ENDPROC
Вы также можете изменить и восстановить обработчик ошибок между ними. Например, в какой-то момент вы хотите открыть все таблицы только в папке, и если вы не можете продолжить, выполните следующие действия:
procedure DoSomethingWithExclusiveLock(tcFolder)
local lcOldError, llInUse, ix && by default these variables have a value of .F.
lcError = on('error') && save current handler
on error llInUse = .T. && new handler
local array laTables[1]
for ix=1 to adir(laTables, addbs(m.tcFolder) + '*.dbf'))
use (addbs(m.tcFolder)+laTables[m.ix,1]) in 0 exclusive
endfor
on error &lcError && restore old handler
if m.llInUse && couldn't get exclusive lock on all tables
close databases all
return
endif
* do whatever
endproc
Совет. Иногда, особенно во время отладки, вы хотели бы восстановить обработчик ошибок по умолчанию, который позволяет вам разбиться и вступить в код, где произошла ошибка, а затем где-нибудь до того, где вы получили ошибку, временно добавляя:
on errorбудет делать это.