diff --git a/out/locale/en/LC_MESSAGES/default.po b/out/locale/en/LC_MESSAGES/default.po index ead3a4dd..de16740c 100644 --- a/out/locale/en/LC_MESSAGES/default.po +++ b/out/locale/en/LC_MESSAGES/default.po @@ -58,8 +58,8 @@ msgid "Not a valid donators email address" msgstr "Not a valid donators email address" #. About dialog -msgid "Could not check donation state, gracefully assuming you have donated." -msgstr "Could not check donation state, gracefully assuming you have donated." +msgid "Could not check donation state." +msgstr "Could not check donation state." #. frmBinEditor..Caption #: bineditor.dfm:4 diff --git a/source/about.pas b/source/about.pas index 1e19dfd1..a4169ca2 100644 --- a/source/about.pas +++ b/source/about.pas @@ -71,13 +71,13 @@ begin Check := MainForm.HasDonated(True); case Check of nbUnset: - MessageDialog(_('Could not check donation state, gracefully assuming you have donated.'), mtWarning, [mbOK]); + MessageDialog(_('Could not check donation state.'), mtWarning, [mbOK]); nbFalse: ErrorDialog(_('Not a valid donators email address')); nbTrue: MessageDialog(_('Thanks for donating!'), mtInformation, [mbOK]); end; - imgDonate.Visible := Check = nbFalse; + imgDonate.Visible := Check <> nbTrue; MainForm.imgDonate.Width := 122; MainForm.imgDonate.Visible := imgDonate.Visible; end; @@ -109,7 +109,7 @@ begin InheritFont(lblAppName.Font); lblAppName.Font.Size := 14; InheritFont(lblAppWebpage.Font); - imgDonate.Visible := MainForm.HasDonated(False) = nbFalse; + imgDonate.Visible := MainForm.HasDonated(False) <> nbTrue; imgDonate.OnClick := MainForm.imgDonate.OnClick; editDonated.Text := AppSettings.ReadString(asDonatedEmail); diff --git a/source/main.pas b/source/main.pas index b8135621..d3bc2508 100644 --- a/source/main.pas +++ b/source/main.pas @@ -1682,7 +1682,7 @@ begin FHasDonatedDatabaseCheck := nbUnset; imgDonate.Width := 122; imgDonate.Height := 22; - imgDonate.Visible := HasDonated(True) = nbFalse; + imgDonate.Visible := HasDonated(True) <> nbTrue; FileEncodings := Explode(',', _('Auto detect (may fail)')+',ANSI,ASCII,Unicode,Unicode Big Endian,UTF-8,UTF-7'); diff --git a/source/updatecheck.pas b/source/updatecheck.pas index 05fc6624..ab0caff4 100644 --- a/source/updatecheck.pas +++ b/source/updatecheck.pas @@ -58,7 +58,7 @@ begin InheritFont(Font); TranslateComponent(Self); imgDonate.OnClick := MainForm.imgDonate.OnClick; - imgDonate.Visible := MainForm.HasDonated(False) = nbFalse; + imgDonate.Visible := MainForm.HasDonated(False) <> nbTrue; end; {**