Delphi 6 -программирование

магазин диванов купить детскую кушетку недорого в москве по низкой цене большие сиськи онлайн


 

16.1.2. Класс Exception

Класс Exception является родительским классом для всех классов-исключений. Этот класс объявляется в модуле sysUtils следующим образом:

type

Exception = class(TObject)

private

FMessage: String;

FHelpContext: Integer;

public

constructor Create(const Msg: Strings);

constructor CreateFmt(const Msg: String;

const Args: array of const);

constructor CreateRes(Ident: Integers);

constructor CreateResFmt(Ident: Integer;

const Args: array of const) ;

constructor CreateHelp(const Msg: String; aHelpContext:

Integer) ;

constructor CreateFmtHelp(const Msg: String;

const Args: array of const; aHelpContext: Integers);

constructor CreateResHelp(Ident: Integer; aHelpContext:

Integer) ;

constructor CreateResFmtHelp(Ident: Integer;

const Args: array of const;

aHelpContext: Integers);

property HelpCoatext: Integer read FHelpContext write FHeipContext;

property Message: String read FMessage write FMessage;

end;

В классе определены целых 8 конструкторов для создания объекта. С их помощью можно прочитать текстовое сообщение из ресурса, отформатировать его, связать исключение с контекстной справочной службой. Свойство Message делает доступным частное поле FMessage, в котором содержится текстовое сообщение.

Назад Начало Вперед