Skip to content

Commit 5866082

Browse files
27 Aug 2025: ver.1.3.4
- Added Packages for Delphi 13 25 Mar 2024: ver.1.3.3 - Added Packages for D10.2 - Created easy Setup to Install Components - Added support for Delphi 12 64bit IDE
1 parent 42cfc41 commit 5866082

File tree

106 files changed

+2228
-705
lines changed

Some content is hidden

Large Commits have some content hidden by default. Use the searchbox below for content that may be hidden.

106 files changed

+2228
-705
lines changed

Demo/DBAwareLabeledComponentsDemo.dpr

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -25,7 +25,7 @@ uses
2525
begin
2626
Application.Initialize;
2727
Application.MainFormOnTaskbar := True;
28-
Application.Title := 'Normal and DataAware Labeled Components Editors Demo - Copyright (c) 2021-2024 Ethea S.r.l.';
28+
Application.Title := 'Normal and DataAware Labeled Components Editors Demo - Copyright (c) 2021-2025 Ethea S.r.l.';
2929
//Uses System Style for border / shadow of Forms
3030
TStyleManager.FormBorderStyle := TStyleManager.TFormBorderStyle.fbsSystemStyle;
3131
Application.CreateForm(TMainForm, MainForm);

Demo/DBAwareLabeledComponentsDemo.dproj

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,7 +1,7 @@
11
<Project xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
22
<PropertyGroup>
33
<ProjectGuid>{356F8995-048E-4B76-A115-41D00DD211C4}</ProjectGuid>
4-
<ProjectVersion>20.1</ProjectVersion>
4+
<ProjectVersion>20.3</ProjectVersion>
55
<FrameworkType>VCL</FrameworkType>
66
<Base>True</Base>
77
<Config Condition="'$(Config)'==''">Debug</Config>
@@ -60,7 +60,7 @@
6060
<SanitizedProjectName>DBAwareLabeledComponentsDemo</SanitizedProjectName>
6161
<DCC_UnitSearchPath>..\Source;$(DCC_UnitSearchPath)</DCC_UnitSearchPath>
6262
<VerInfo_Locale>1033</VerInfo_Locale>
63-
<VerInfo_Keys>CompanyName=Ethea S.r.l.;FileDescription=DbAware Labeled Components Demo;FileVersion=1.3.1.0;InternalName=;LegalCopyright=Copyright (c) 2021-2024 Ethea S.r.l.;LegalTrademarks=;OriginalFilename=;ProgramID=;ProductName=;ProductVersion=1.3;Comments=</VerInfo_Keys>
63+
<VerInfo_Keys>CompanyName=Ethea S.r.l.;FileDescription=DbAware Labeled Components Demo;FileVersion=1.3.1.0;InternalName=;LegalCopyright=Copyright (c) 2021-2025 Ethea S.r.l.;LegalTrademarks=;OriginalFilename=;ProgramID=;ProductName=;ProductVersion=1.3;Comments=</VerInfo_Keys>
6464
<Custom_Styles>&quot;Aqua Light Slate|VCLSTYLE|$(BDSCOMMONDIR)\Styles\AquaLightSlate.vsf&quot;;Glow|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Glow.vsf;Sky|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Sky.vsf;Windows10|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Windows10.vsf;&quot;Windows10 Dark|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Windows10Dark.vsf&quot;;&quot;Windows10 SlateGray|VCLSTYLE|$(BDSCOMMONDIR)\Styles\Windows10SlateGray.vsf&quot;</Custom_Styles>
6565
<VerInfo_IncludeVerInfo>true</VerInfo_IncludeVerInfo>
6666
<VerInfo_MinorVer>3</VerInfo_MinorVer>
-1.01 MB
Binary file not shown.

Demo/Main.dfm

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -443,17 +443,18 @@ object MainForm: TMainForm
443443
end
444444
object LabeledDBEditEx: TLabeledDBEdit
445445
Left = 88
446-
Top = 24
446+
Top = 16
447447
Width = 121
448448
Height = 23
449449
DataField = 'StringField'
450450
DataSource = DataSource
451451
TabOrder = 0
452452
BoundCaption = 'LabeledDBEdit:'
453-
BoundLabel.Left = 88
454-
BoundLabel.Top = 8
455453
BoundLabel.Width = 79
456454
BoundLabel.Height = 15
455+
BoundLabel.Alignment = taRightJustify
456+
BoundLabel.LabelPosition = lpLeftMiddle
457+
BoundLabel.LabelSpacing = 10
457458
end
458459
object LabeledDBLookupComboBox: TLabeledDBLookupComboBox
459460
Left = 88

Demo/Main.pas

Lines changed: 42 additions & 43 deletions
Original file line numberDiff line numberDiff line change
@@ -2,7 +2,7 @@
22
{ }
33
{ DataAwareLabeledComponents: Dataaware Edit components with Label }
44
{ }
5-
{ Copyright (c) 2021-2024 (Ethea S.r.l.) }
5+
{ Copyright (c) 2021-2025 (Ethea S.r.l.) }
66
{ Author: Carlo Barazzetta }
77
{ }
88
{ https://github.com/EtheaDev/DBAwareLabeledComponents }
@@ -29,42 +29,41 @@
2929
interface
3030

3131
uses
32-
Winapi.Windows
33-
, Winapi.Messages
34-
, System.SysUtils
35-
, System.Variants
36-
, System.Classes
37-
, Vcl.Graphics
38-
, Vcl.Controls
39-
, Vcl.Forms
40-
, Vcl.Dialogs
41-
, Vcl.StdCtrls
42-
, Data.DB
43-
, Vcl.Grids
44-
, Vcl.DBGrids
45-
, Datasnap.DBClient
46-
, Vcl.Mask
47-
, Vcl.DBCtrls
48-
, Vcl.ExtCtrls
49-
, Vcl.LabeledDBCtrls
50-
, Vcl.ComCtrls
51-
, Vcl.LabeledCtrls
52-
, Vcl.LabeledCurrencyEdit
53-
, Vcl.LabeledComCtrls
54-
, Vcl.LabeledMask
55-
, Vcl.LabeledExtCtrls
56-
, Vcl.ColorGrd
57-
, Vcl.LabeledColorGrd
58-
, Vcl.CheckLst
59-
, Vcl.LabeledCheckLst
60-
, Vcl.LabeledDBListView
61-
, Vcl.Samples.Spin
32+
Winapi.Windows,
33+
Winapi.Messages,
34+
System.SysUtils,
35+
System.Variants,
36+
System.Classes,
37+
Data.DB,
38+
Vcl.Graphics,
39+
Vcl.Controls,
40+
Vcl.Forms,
41+
Vcl.Dialogs,
42+
Vcl.StdCtrls,
43+
Vcl.Grids,
44+
Vcl.DBGrids,
45+
Vcl.Mask,
46+
Vcl.DBCtrls,
47+
Vcl.ExtCtrls,
48+
Vcl.LabeledDBCtrls,
49+
Vcl.ComCtrls,
50+
Vcl.LabeledCtrls,
51+
Vcl.LabeledCurrencyEdit,
52+
Vcl.LabeledComCtrls,
53+
Vcl.LabeledMask,
54+
Vcl.LabeledExtCtrls,
55+
Vcl.ColorGrd,
56+
Vcl.LabeledColorGrd,
57+
Vcl.CheckLst,
58+
Vcl.LabeledCheckLst,
59+
Vcl.LabeledDBListView,
60+
Vcl.Samples.Spin,
61+
Datasnap.DBClient,
6262
{$IFDEF D10_3+}
63-
, Vcl.LabeledButtonEdit
63+
Vcl.LabeledButtonEdit,
6464
{$ENDIF}
65-
, Vcl.BoundLabel
66-
, Vcl.Buttons
67-
;
65+
Vcl.BoundLabel,
66+
Vcl.Buttons;
6867

6968
type
7069
TMainForm = class(TForm)
@@ -216,16 +215,16 @@ implementation
216215
{$R *.dfm}
217216

218217
uses
219-
System.Math
220-
, Winapi.ShellAPI
218+
Winapi.ShellAPI,
219+
System.Math,
221220
{$IFDEF D10_4+}
222-
, Vcl.NumberBox
223-
, Vcl.DBNumberBox
224-
, Vcl.LabeledNumberBox
221+
Vcl.NumberBox,
222+
Vcl.DBNumberBox,
223+
Vcl.LabeledNumberBox,
225224
{$ENDIF}
226-
, System.TypInfo
227-
, Vcl.SelectOptionsForm
228-
, Vcl.Themes;
225+
System.TypInfo,
226+
Vcl.SelectOptionsForm,
227+
Vcl.Themes;
229228

230229
procedure TMainForm.OpenButtonClick(Sender: TObject);
231230
begin

Images/GetItLogo.png

4.75 KB
Loading

Images/Setup.png

110 KB
Loading

Images/SetupLogo.png

35.1 KB
Loading

Images/SupportingDelphi.jpg

10.9 KB
Loading
Lines changed: 7 additions & 0 deletions
Loading

0 commit comments

Comments
 (0)