{**************************************************************************************************}

{                                                                                                  }

{ Project JEDI Code Library (JCL)                                                                  }

{                                                                                                  }

{ The contents of this file are subject to the Mozilla Public License Version 1.1 (the "License"); }

{ you may not use this file except in compliance with the License. You may obtain a copy of the    }

{ License at http://www.mozilla.org/MPL/                                                           }

{                                                                                                  }

{ Software distributed under the License is distributed on an "AS IS" basis, WITHOUT WARRANTY OF   }

{ ANY KIND, either express or implied. See the License for the specific language governing rights  }

{ and limitations under the License.                                                               }

{                                                                                                  }

{ The Original Code is ExceptDlg.pas.                                                              }

{                                                                                                  }

{ The Initial Developer of the Original Code is Petr Vones.                                        }

{ Portions created by Petr Vones are Copyright (C) of Petr Vones.                                  }

{                                                                                                  }

{**************************************************************************************************}

{                                                                                                  }

{ Last modified: $Date:: 2011-12-29 01:21:39 +0100 (Thu, 29 Dec 2011)                            $ }

{ Revision:      $Rev:: 3660                                                                     $ }

{ Author:        $Author:: outchy                                                                $ }

{                                                                                                  }

{**************************************************************************************************}

​

unit uExceptionDialog;

​

interface

​

uses

  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms,

  Dialogs, StdCtrls, ExtCtrls, AppEvnts,

  JclSysUtils, JclUnitVersioning, JclUnitVersioningProviders, JclDebug;

​

​

const

  UM_CREATEDETAILS = WM_USER + $100;

​

type

  TExceptionDialog = class(TForm)

    TextMemo: TMemo;

    OkBtn: TButton;

    DetailsBtn: TButton;