s2.error.s2abstractexception.pas

来自「轉載的程序應用框架」· PAS 代码 · 共 23 行

unit S2.Error.S2AbstractException;

interface

uses
  S2.Error.S2Exception;

type
  S2AbstractException = class(S2Exception)
  public
    constructor Create(const ClassName, FunName: string);
  end;

implementation

{ S2AbstractException }

constructor S2AbstractException.Create(const ClassName, FunName: string);
begin
  inherited Create(ClassName, FunName, '');
end;

end.