firebird/firebird-mirror
firebird/firebird-mirror
8
0
Fork 1
mirror of https://github.com/FirebirdSQL/firebird.git synced 2025-01-22 16:43:03 +01:00
Code Issues

Replace tabs with spaces

Browse Source
This commit is contained in:
Paul Reeves 2024-06-21 12:06:26 +02:00
parent dccbd66202
commit 08997a65d4
2 changed files with 32 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
builds/install/arch-specific/win32/FirebirdInstallGUIFunctions.inc
View File

@ -135,10 +135,10 @@ begin
wizardform.top := wizardform.top - (AValue div 2);
// Group 1 - reset height of components
for i:=0 to GetArrayLength(CompGroup1Array)-1 do
TControl(CompGroup1.objects[i]).height := TControl(CompGroup1.objects[i]).height + Avalue;
for i:=0 to GetArrayLength(CompGroup1Array)-1 do
TControl(CompGroup1.objects[i]).height := TControl(CompGroup1.objects[i]).height + Avalue;
// Group 2 - reset top of components
// Group 2 - reset top of components
for i:=0 to GetArrayLength(CompGroup2Array)-1 do
TControl(CompGroup2.objects[i]).top := TControl(CompGroup2.objects[i]).top + AValue;
@ -167,11 +167,11 @@ begin
// TControl(CompGroup1.objects[i]).left := TControl(CompGroup1.objects[i]).left + (Avalue div 2);
end;
// Group 2 - reset left of components
for i:=0 to GetArrayLength(CompGroup2Array)-1 do begin
TControl(CompGroup2.objects[i]).left := TControl(CompGroup2.objects[i]).left + AValue;
TControl(CompGroup2.objects[i]).width := TControl(CompGroup2.objects[i]).width + (AValue div 2);
end;
// Group 2 - reset left of components
for i:=0 to GetArrayLength(CompGroup2Array)-1 do begin
TControl(CompGroup2.objects[i]).left := TControl(CompGroup2.objects[i]).left + AValue;
TControl(CompGroup2.objects[i]).width := TControl(CompGroup2.objects[i]).width + (AValue div 2);
end;
// Group 3 - reset left of components but keep 'centered' horizontally.
// for i:=0 to GetArrayLength(CompGroup3Array)-1 do
@ -284,7 +284,7 @@ end;
function ShowHelpDlg: Integer;
begin
CreateHelpDlg;
CreateHelpDlg;
result := HelpDlg.ShowModal;
CloseHelpDlg;
end;

46
builds/install/arch-specific/win32/FirebirdInstallSupportFunctions.inc
View File

@ -27,15 +27,15 @@ Function Prototypes
function IsWin32: boolean;
function Is32BitInstallMode: boolean;
function IsWinTen: boolean;
function IsWinEightOne: boolean;
function IsWinEight: boolean;
function IsW2K12: boolean;
function IsWinTen: boolean;
function IsWinEightOne: boolean;
function IsWinEight: boolean;
function IsW2K12: boolean;
function IsVista: boolean;
function IsVistaSP1: boolean;
function IsWin2K8R1: boolean;
function IsWinSeven: boolean;
function IsWin2K8R2: boolean;
function IsVistaSP1: boolean;
function IsWin2K8R1: boolean;
function IsWinSeven: boolean;
function IsWin2K8R2: boolean;
function IsWin2k3: boolean;
function IsWinXP: boolean;
function IsWin2K: boolean;
@ -68,21 +68,21 @@ InnoSetup Help Extract on Windows version strings:
Windows NT versions:
4.0.1381 Windows NT 4.0
5.0.2195 Windows 2000
5.01.2600 Windows XP
or Windows XP 64-Bit Edition Version 2002 (Itanium)
5.02.3790 Windows Server 2003
or Windows XP x64 Edition (AMD64/EM64T)
or Windows XP 64-Bit Edition Version 2003 (Itanium)
6.0.6000 Windows Vista
6.0.6001 Windows Vista with Service Pack 1
or Windows Server 2008
6.0.6002 Windows Vista with Service Pack 2
6.1.7600 Windows 7
or Windows Server 2008 R2
6.2.9200 Windows 8 or Windows Server 2012
6.3.9200 Windows 8.1 or Windows Server 2012 R2
6.3.9600 Windows 8.1 with Update 1
10.0.10240 Windows 10
5.01.2600 Windows XP
or Windows XP 64-Bit Edition Version 2002 (Itanium)
5.02.3790 Windows Server 2003
or Windows XP x64 Edition (AMD64/EM64T)
or Windows XP 64-Bit Edition Version 2003 (Itanium)
6.0.6000 Windows Vista
6.0.6001 Windows Vista with Service Pack 1
or Windows Server 2008
6.0.6002 Windows Vista with Service Pack 2
6.1.7600 Windows 7
or Windows Server 2008 R2
6.2.9200 Windows 8 or Windows Server 2012
6.3.9200 Windows 8.1 or Windows Server 2012 R2
6.3.9600 Windows 8.1 with Update 1
10.0.10240 Windows 10
*)