//----------------------------------------------------------------------------
#ifndef AboutH
#define AboutH
//----------------------------------------------------------------------------
#include <System.Classes.hpp>
#include <Vcl.Controls.hpp>
#include <Vcl.ExtCtrls.hpp>
#include <Vcl.Forms.hpp>
#include <Vcl.Graphics.hpp>
#include <Vcl.StdCtrls.hpp>
//----------------------------------------------------------------------------
#include <Configuration.h>
#include <GUITools.h>
//----------------------------------------------------------------------------
class TAboutDialog : public TForm
{
__published:
  TLabel *ApplicationLabel;
  TLabel *VersionLabel;
  TLabel *WinSCPCopyrightLabel;
  TStaticText *HomepageLabel;
  TLabel *ProductSpecificMessageLabel;
  TStaticText *ForumUrlLabel;
  TButton *OKButton;
  TButton *LicenseButton;
  TButton *HelpButton;
  TLabel *Label3;
  TLabel *RegistrationLabel;
  TPanel *RegistrationBox;
  TLabel *RegistrationLicensesLabel;
  TStaticText *RegistrationProductIdLabel;
  TLabel *RegistrationSubjectLabel;
  TPanel *ThirdPartyPanel;
  TPaintBox *IconPaintBox;
  TPanel *Panel;
  void __fastcall LicenseButtonClick(TObject *Sender);
  void __fastcall HelpButtonClick(TObject *Sender);
  void __fastcall RegistrationProductIdLabelClick(TObject *Sender);
  void __fastcall OKButtonMouseDown(TObject *Sender, TMouseButton Button, TShiftState Shift,
          int X, int Y);
  void __fastcall IconPaintBoxPaint(TObject *Sender);
  void __fastcall FormKeyDown(TObject *Sender, WORD &Key, TShiftState Shift);
  void __fastcall FormAfterMonitorDpiChanged(TObject *Sender, int OldDPI, int NewDPI);

private:
  TConfiguration * FConfiguration;
  TNotifyEvent FOnRegistrationLink;
  HICON FIconHandle;
  TWebBrowserEx * FThirdPartyWebBrowser;

  void __fastcall LoadData();
  void __fastcall LoadThirdParty();
  UnicodeString GenerateThirdParty(bool Html);
  void AddPara(bool Html, UnicodeString & Text, const UnicodeString & S);
  UnicodeString CreateLink(bool Html, const UnicodeString & URL, const UnicodeString & Title = L"");
  UnicodeString CreateLicenseLinkLine(bool Html, const UnicodeString & URL);
  void __fastcall ExpatLicenceHandler(TObject * Sender);
  #ifdef _WIN64
  [[noreturn]]
  #endif
  void AccessViolationTest();
  void __fastcall LookupAddress();
  void InternalExceptionTest();
  void AbnormalTerminationTest();
  void __fastcall DoLoadThirdParty();
  void __fastcall ShiftControls(int From, int Diff);

protected:
  INTERFACE_HOOK

public:
  virtual __fastcall TAboutDialog(TComponent * AOwner,
    TConfiguration * Configuration, bool AllowLicense, TRegistration * Registration,
    bool ALoadThirdParty);
  __fastcall ~TAboutDialog();
};
//----------------------------------------------------------------------------
#endif