Add "view changelog" button to updatecheck dialog.

source/updatecheck.dfm

@@ -1142,7 +1142,7 @@ object frmUpdateCheck: TfrmUpdateCheck
       Left = 6
       Top = 16
       Width = 355
-      Height = 143
+      Height = 113
       Anchors = [akLeft, akTop, akRight, akBottom]
       BorderStyle = bsNone
       Color = clBtnFace
@@ -1152,6 +1152,15 @@ object frmUpdateCheck: TfrmUpdateCheck
       ScrollBars = ssVertical
       TabOrder = 1
     end
+    object btnChangelog: TButton
+      Left = 6
+      Top = 130
+      Width = 355
+      Height = 25
+      Caption = 'View changelog'
+      TabOrder = 2
+      OnClick = btnChangelogClick
+    end
   end
   object groupRelease: TGroupBox
     Left = 8

source/updatecheck.pas

@@ -17,10 +17,12 @@ type
     memoRelease: TMemo;
     memoBuild: TMemo;
     imgDonate: TImage;
+    btnChangelog: TButton;
     procedure FormCreate(Sender: TObject);
     procedure btnBuildClick(Sender: TObject);
     procedure btnReleaseClick(Sender: TObject);
     procedure FormShow(Sender: TObject);
+    procedure btnChangelogClick(Sender: TObject);
   private
     { Private declarations }
     ReleaseURL, BuildURL : String;
@@ -179,6 +181,12 @@ begin
 end;
 
 
+procedure TfrmUpdateCheck.btnChangelogClick(Sender: TObject);
+begin
+  ShellExec(APPDOMAIN+'download.php?place='+EncodeURLParam(TButton(Sender).Name)+'#nightlybuilds');
+end;
+
+
 {**
   Download latest build and replace running exe
 }