opensource/HeidiSQL
1
0
Fork 0
mirror of https://github.com/HeidiSQL/HeidiSQL.git synced 2026-03-13 09:24:25 +08:00
Code Issues Packages Projects Releases Wiki Activity

Disable build update button for 32bit version, so I only have to provide 64bit builds (while still supporting releases in 32 bit)

Browse Source
This commit is contained in:
Ansgar Becker
2021-06-06 17:24:36 +02:00
parent 9eb37d0a02
commit 7b0705df28
2 changed files with 15 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
out/locale/en/LC_MESSAGES/default.po
View File

@@ -7,7 +7,7 @@ msgid ""
msgstr ""
"Project-Id-Version: HeidiSQL\n"
"POT-Creation-Date: 2012-11-05 21:40\n"
"PO-Revision-Date: 2021-06-05 08:39+0200\n"
"PO-Revision-Date: 2021-06-06 17:21+0200\n"
"Last-Translator: Ansgar Becker <anse@heidisql.com>\n"
"Language-Team: English (http://www.transifex.com/projects/p/heidisql/language/en/)\n"
"MIME-Version: 1.0\n"
@@ -3688,6 +3688,9 @@ msgstr "Nightly build"
msgid "Download nightly build"
msgstr "Download nightly build"
msgid "No build updates for 32 bit version"
msgstr "No build updates for 32 bit version"
#. frmUpdateCheck..groupRelease..Caption
#: updatecheck.dfm:90
msgid "Official release"

16
source/updatecheck.pas
View File

@@ -195,11 +195,17 @@ begin
Note := Ini.ReadString(INISECT_BUILD, 'Note', '');
if Note <> '' then
memoBuild.Lines.Add(_('Notes') + ': * ' + StringReplace(Note, '%||%', CRLF+'* ', [rfReplaceAll] ) );
btnBuild.Caption := f_('Download and install build %d', [BuildRevision]);
// A new release should have priority over a new nightly build.
// So the user should not be able to download a newer build here
// before having installed the new release.
btnBuild.Enabled := (Mainform.AppVerRevision = 0) or ((BuildRevision > Mainform.AppVerRevision) and (not LinkLabelRelease.Enabled));
if GetExecutableBits = 64 then begin
btnBuild.Caption := f_('Download and install build %d', [BuildRevision]);
// A new release should have priority over a new nightly build.
// So the user should not be able to download a newer build here
// before having installed the new release.
btnBuild.Enabled := (Mainform.AppVerRevision = 0) or ((BuildRevision > Mainform.AppVerRevision) and (not LinkLabelRelease.Enabled));
end
else begin
btnBuild.Caption := _('No build updates for 32 bit version');
end;
end;
if FileExists(CheckFilename) then