Procedure Ошибка
Parameter Ош_номер, Ош_сообщение, Ош_сообщение1, Ош_программа, Ош_строка
Сообщение= 'Ошибка:'+ LTRIM(STR(Ош_номер))+chr(13)+;
'Программа:'+ Ош_программа +chr(13)+;
'Строка:'+ LTRIM(STR(Ош_строка))+chr(13)+;
'Сообщение:'+Ош_сообщение+chr(13)+;
'Подробно:'+Ош_сообщение1
= MESSAGEBOX(Сообщение ,16,"Ошибка")
Return
Новое на сайте
-
Обновлен портфель программиста
Добавлены: Установка HTML Help (Создание справочной системы), Imagedit.zip - Графический редактор ( ico и bmp), Библиотека локализации HTML Help (Русский) -
Новые примеры программ
Установка библиотек, Игровая программа "Охота на лис", Установка библиотек "Охота на лис", plastic -"Платежки", Библиотеки (на FPD26), platan -"Платежки" (на Clipper 5.2) -
Обновленна справка
Подсказки, технология программирования и использование Visual FoxPro. Команды, функции, операторы, объекты, свойства, события и методы.