diff -Nru cqrprop-0.0.6/CHANGELOG cqrprop-0.0.7/CHANGELOG --- cqrprop-0.0.6/CHANGELOG 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/CHANGELOG 2021-10-07 19:01:39.000000000 +0000 @@ -4,6 +4,9 @@ - bugfix -------------------- +0.0.7 (2021-10-07) + - loading images fixed + 0.0.5 (2018-10-08) - windows was still on top - fixed diff -Nru cqrprop-0.0.6/debian/changelog cqrprop-0.0.7/debian/changelog --- cqrprop-0.0.6/debian/changelog 2020-08-16 16:19:45.000000000 +0000 +++ cqrprop-0.0.7/debian/changelog 2021-10-07 19:06:08.000000000 +0000 @@ -1,4 +1,10 @@ -cqrprop (0.0.6-1~bionic) bionic; urgency=low +cqrprop (0.0.7-1~bionic) bionic; urgency=low + + * loading images fixed + + -- Petr Hlozek Thu, 07 Oct 2021 20:53:12 +0100 + +cqrprop (0.0.6-1) unstable; urgency=low * configuration reloading fixed diff -Nru cqrprop-0.0.6/debian/control cqrprop-0.0.7/debian/control --- cqrprop-0.0.6/debian/control 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/debian/control 2021-10-07 19:01:39.000000000 +0000 @@ -9,7 +9,7 @@ Package: cqrprop Architecture: any -Depends: ${shlibs:Depends}, ${misc:Depends}, libssl-dev +Depends: ${shlibs:Depends}, ${misc:Depends}, libssl-dev, libgtk2.0-0 Description: Shows propagation data provided by Paul, N0NBH Shows propagation data provided by Paul, N0NBH on the Linux desktop. The source page of the propagation images is http://www.hamqsl.com/solar.html diff -Nru cqrprop-0.0.6/.gitignore cqrprop-0.0.7/.gitignore --- cqrprop-0.0.6/.gitignore 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/.gitignore 2021-10-07 19:01:39.000000000 +0000 @@ -29,4 +29,5 @@ # Application bundle for Mac OS *.app/ -cqrprop \ No newline at end of file +cqrprop +.DS_Store diff -Nru cqrprop-0.0.6/src/cqrprop.lpi cqrprop-0.0.7/src/cqrprop.lpi --- cqrprop-0.0.6/src/cqrprop.lpi 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/cqrprop.lpi 2021-10-07 19:01:39.000000000 +0000 @@ -96,6 +96,9 @@ + + + diff -Nru cqrprop-0.0.6/src/dUtils.pas cqrprop-0.0.7/src/dUtils.pas --- cqrprop-0.0.6/src/dUtils.pas 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/dUtils.pas 2021-10-07 19:01:39.000000000 +0000 @@ -29,7 +29,11 @@ function TdmUtils.GetAppConfigFileName: string; begin + {$IFDEF DARWIN} + Result := ExtractFilePath(ExpandFileName('~/Library/Preferences/cqrprop')) + 'cqrprop' + DirectorySeparator + 'cqrprop.cfg'; + {$ELSE} Result := ExtractFilePath(GetAppConfigFile(False)) + 'cqrprop' + DirectorySeparator + 'cqrprop.cfg'; + {$ENDIF} end; function TdmUtils.GetProxyEnvValue(const ProxyType: TProxyType): string; diff -Nru cqrprop-0.0.6/src/fOptions.lfm cqrprop-0.0.7/src/fOptions.lfm --- cqrprop-0.0.6/src/fOptions.lfm 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/fOptions.lfm 2021-10-07 19:01:39.000000000 +0000 @@ -13,20 +13,20 @@ Height = 136 Top = 8 Width = 456 - ClientHeight = 134 - ClientWidth = 454 + ClientHeight = 117 + ClientWidth = 446 TabOrder = 0 object Label1: TLabel Left = 16 - Height = 15 + Height = 16 Top = 8 - Width = 239 + Width = 212 Caption = 'Download propagation image from:' ParentColor = False end object edtDownloadLink: TEdit Left = 16 - Height = 33 + Height = 22 Top = 40 Width = 352 TabOrder = 0 @@ -34,9 +34,9 @@ end object btnOpenWeb: TButton Left = 16 - Height = 33 + Height = 20 Top = 88 - Width = 351 + Width = 302 AutoSize = True Caption = 'Open http://www.hamqsl.com/solar.html website' OnClick = btnOpenWebClick @@ -48,20 +48,20 @@ Height = 128 Top = 152 Width = 456 - ClientHeight = 126 - ClientWidth = 454 + ClientHeight = 109 + ClientWidth = 446 TabOrder = 1 object Label2: TLabel Left = 16 - Height = 15 + Height = 16 Top = 32 - Width = 138 + Width = 127 Caption = 'Refresh image every ' ParentColor = False end object edtRefreshTime: TSpinEdit Left = 160 - Height = 33 + Height = 21 Top = 24 Width = 74 MinValue = 2 @@ -70,23 +70,23 @@ end object Label3: TLabel Left = 248 - Height = 15 + Height = 16 Top = 32 - Width = 54 + Width = 48 Caption = 'minutes' ParentColor = False end object Label4: TLabel Left = 16 - Height = 15 + Height = 16 Top = 80 - Width = 31 + Width = 27 Caption = 'Wait' ParentColor = False end object edtWaitTime: TSpinEdit Left = 64 - Height = 33 + Height = 21 Top = 72 Width = 74 MinValue = 2 @@ -95,9 +95,9 @@ end object Label5: TLabel Left = 149 - Height = 15 + Height = 16 Top = 80 - Width = 276 + Width = 250 Caption = 'seconds before the first image download' ParentColor = False end diff -Nru cqrprop-0.0.6/src/fOptions.pas cqrprop-0.0.7/src/fOptions.pas --- cqrprop-0.0.6/src/fOptions.pas 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/fOptions.pas 2021-10-07 19:01:39.000000000 +0000 @@ -57,6 +57,9 @@ finally FreeAndNil(ini) end; + {$IFDEF DARWIN} + btnOpenWeb.Visible := False; + {$ENDIF} end; procedure TfrmOptions.btnOKClick(Sender: TObject); diff -Nru cqrprop-0.0.6/src/fShowPropForm.pas cqrprop-0.0.7/src/fShowPropForm.pas --- cqrprop-0.0.6/src/fShowPropForm.pas 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/fShowPropForm.pas 2021-10-07 19:01:39.000000000 +0000 @@ -8,6 +8,8 @@ Classes, SysUtils, FileUtil, Forms, Controls, Graphics, Dialogs, ExtCtrls, Menus, ActnList, fCommon, httpsend, IniFiles, LazFileUtils, ssl_openssl_lib; +const USER_AGENT = 'Mozilla/5.0 (X11; Ubuntu; Linux x86_64; rv:93.0) Gecko/20100101 Firefox/93.0'; + type { TfrmShowPropForm } @@ -121,6 +123,7 @@ Http.ProxyPort := IntToStr(ProxyPort); Http.ProxyUser := ProxyUser; Http.ProxyPass := ProxyPass; + Http.UserAgent := USER_AGENT; Result := Http.HTTPMethod('GET', Url); if Result then diff -Nru cqrprop-0.0.6/src/uVersion.pas cqrprop-0.0.7/src/uVersion.pas --- cqrprop-0.0.6/src/uVersion.pas 2020-08-16 16:18:49.000000000 +0000 +++ cqrprop-0.0.7/src/uVersion.pas 2021-10-07 19:01:39.000000000 +0000 @@ -4,12 +4,12 @@ interface const - cVERSION = '0.0.6 (001)'; + cVERSION = '0.0.7 (001)'; cMAJOR = 0; cMINOR = 0; - cRELEAS = 6; + cRELEAS = 7; cBUILD = 1; - cBUILD_DATE = '2020-08-16'; + cBUILD_DATE = '2021-10-07'; implementation