mirrors/doublecmd
2
0
Fork 0
mirror of https://github.com/doublecmd/doublecmd.git synced 2026-06-21 09:58:13 +00:00
Code Issues Projects Releases Packages Wiki Activity

FIX: new version Lazarus compatibility

Browse source 
(cherry picked from commit 5e067cbc0b)
This commit is contained in:
rich2014 2026-04-19 17:59:32 +08:00 • committed by Alexander Koblov
commit ccebdbbf65
3 changed files with 9 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

2
src/fAbout.pas
View file

@ -173,7 +173,7 @@ begin
lblRevision.Caption := lblRevision.Caption + #32 + dcRevision;
lblCommit.Caption := lblCommit.Caption + #32 + dcCommit;
lblBuild.Caption := lblBuild.Caption + #32 + dcBuildDate;
lblLazarusVer.Caption := lblLazarusVer.Caption + #32 + lazVersion;
lblLazarusVer.Caption := lblLazarusVer.Caption + #32 + dcLazVersion;
lblFreePascalVer.Caption := lblFreePascalVer.Caption + #32 + fpcVersion;
lblPlatform.Caption := TargetCPU + '-' + TargetOS + '-' + TargetWS;
lblOperatingSystem.Caption := OSVersion;

2
src/fstartingsplash.pas
View file

@ -53,7 +53,7 @@ begin
lblRevision.Caption := lblRevision.Caption + #32 + dcRevision;
lblCommit.Caption := lblCommit.Caption + #32 + dcCommit;
lblBuild.Caption := lblBuild.Caption + #32 + dcBuildDate;
lblLazarusVer.Caption := lblLazarusVer.Caption + #32 + lazVersion;
lblLazarusVer.Caption := lblLazarusVer.Caption + #32 + dcLazVersion;
lblFreePascalVer.Caption := lblFreePascalVer.Caption + #32 + fpcVersion;
lblPlatform.Caption := TargetCPU + '-' + TargetOS + '-' + TargetWS;
lblOperatingSystem.Caption := OSVersion;

14
src/platform/udcversion.pas
View file

@ -27,16 +27,16 @@ unit uDCVersion;
interface
uses
Classes, SysUtils, LCLVersion;
Classes, SysUtils, LCLVersion, LazVersion;
{$I dcrevision.inc} // Double Commander revision number
const
dcBuildDate = {$I %DATE%};
lazVersion = lcl_version; // Lazarus version (major.minor.micro)
fpcVersion = {$I %FPCVERSION%}; // FPC version (major.minor.micro)
TargetCPU = {$I %FPCTARGETCPU%}; // Target CPU of FPC
TargetOS = {$I %FPCTARGETOS%}; // Target Operating System of FPC
dcBuildDate = {$I %DATE%};
dcLazVersion = laz_version; // Lazarus version (major.minor.micro)
fpcVersion = {$I %FPCVERSION%}; // FPC version (major.minor.micro)
TargetCPU = {$I %FPCTARGETCPU%}; // Target CPU of FPC
TargetOS = {$I %FPCTARGETOS%}; // Target Operating System of FPC
var
DCVersion, // Double Commander version
@ -546,7 +546,7 @@ begin
'Platform: %s' + LineEnding +
'System: %s',
[dcVersion, dcRevision, dcCommit, dcBuildDate,
lazVersion, fpcVersion,
dcLazVersion, fpcVersion,
TargetCPU + '-' + TargetOS + '-' + TargetWS,
OSVersion
]);