Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.11.13;
Скачать: CL | DM;

Вниз

Как при создании исключения передать код ошибки?   Найти похожие ветки 

 
Mishenka   (2003-11-02 17:51) [0]

Создаётся исключение потомок EAbort с помощью raise. Как в except передавать не текстовое сообщение об ошибки с помощью Скуфе, а числовой код?


 
default   (2003-11-02 17:55) [1]

на крайняк, число в строковом предствавлении сложно перевести в "обычное" число?


 
Юрий Федоров   (2003-11-02 18:23) [2]

конструктор переписал? С передачей кода?
Свойство код завел ?
Дальше просто кастишь в Except под нужный класс


 
Mishenka   (2003-11-02 18:54) [3]

Нет. Просто создал класс без всяких конструкторов.
type
EMaskError=class(EAbort)
end;

Там у EAbort вроде кроме Create есть ещё метод CreatRes, он вроде передаёт числа, только как их потом в exception"e прочитать?


 
Palladin   (2003-11-03 02:16) [4]

Ну да, вроде бы числа, но внимание вопрос! Что означают эти числа?
Ответ см. в справке.


 
Slym   (2003-11-03 05:59) [5]

type
EMaskError=class(Exception)
private
FCode:integer;
public
constructor Create(const Msg: string;Code:integer=0);override;
property Code:read FCode;
end;

constructor EMaskError.Create(const Msg: string;Code:integer=0);override;
begin
FCode:=Code;
inherited Create(Msg);
end;

Пример:
try
except
on e:EMaskError do
if e.Code=1 then exit
end


 
Романов Р.В.   (2003-11-03 07:39) [6]

А чем Get/SetLastError не нравится?



Страницы: 1 вся ветка

Текущий архив: 2003.11.13;
Скачать: CL | DM;

Наверх




Память: 0.45 MB
Время: 0.037 c
3-40962
Дмитрий В. Белькевич
2003-10-24 17:56
2003.11.13
Посчитать сумму полей, которая не влазит в integer


14-42130
Новичок
2003-10-22 13:35
2003.11.13
Как послать сообщение SMS c компьютера на сотку


14-42034
Сатир
2003-10-16 12:41
2003.11.13
Delphi 8


1-41672
Islander
2003-10-24 09:52
2003.11.13
Как узнать текущую кодовую страницу винды и текущую локаль?


14-41889
Liandri
2003-10-20 23:55
2003.11.13
3D Studio Max





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский