Skip to content

Commit c0e2277

Browse files
ver.1.3.1
- Fixed DbGrid rendering - Updated Copyright
1 parent be0e8a0 commit c0e2277

34 files changed

+48
-1049
lines changed

Demo/DBAwareLabeledComponentsDemo.dpr

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -24,8 +24,10 @@ uses
2424

2525
begin
2626
Application.Initialize;
27-
Application.Title := 'Normal and DataAware Labeled Components Editors Demo - Copyright (c) 2021-2023 Ethea S.r.l.';
2827
Application.MainFormOnTaskbar := True;
28+
Application.Title := 'Normal and DataAware Labeled Components Editors Demo - Copyright (c) 2021-2024 Ethea S.r.l.';
29+
//Uses System Style for border / shadow of Forms
30+
TStyleManager.FormBorderStyle := TStyleManager.TFormBorderStyle.fbsSystemStyle;
2931
Application.CreateForm(TMainForm, MainForm);
3032
Application.Run;
3133
end.

Demo/DBAwareLabeledComponentsDemo.dproj

Lines changed: 8 additions & 1010 deletions
Large diffs are not rendered by default.
41.4 KB
Binary file not shown.

Demo/Main.dfm

Lines changed: 0 additions & 6 deletions
Original file line numberDiff line numberDiff line change
@@ -23,8 +23,6 @@ object MainForm: TMainForm
2323
ActivePage = DbGridTabSheet
2424
Align = alClient
2525
TabOrder = 0
26-
ExplicitWidth = 892
27-
ExplicitHeight = 627
2826
object DbGridTabSheet: TTabSheet
2927
Caption = 'Labeled and Advanced DbGrid'
3028
ImageIndex = 2
@@ -146,8 +144,6 @@ object MainForm: TMainForm
146144
Height = 218
147145
Align = alBottom
148146
TabOrder = 1
149-
ExplicitTop = 379
150-
ExplicitWidth = 884
151147
object FontLabel: TLabel
152148
Left = 353
153149
Top = 129
@@ -5371,8 +5367,6 @@ object MainForm: TMainForm
53715367
Height = 59
53725368
Align = alBottom
53735369
TabOrder = 1
5374-
ExplicitTop = 627
5375-
ExplicitWidth = 892
53765370
object OpenButton: TButton
53775371
Left = 8
53785372
Top = 14

Demo/Main.pas

Lines changed: 2 additions & 2 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-2023 (Ethea S.r.l.) }
5+
{ Copyright (c) 2021-2024 (Ethea S.r.l.) }
66
{ Author: Carlo Barazzetta }
77
{ }
88
{ https://github.com/EtheaDev/DBAwareLabeledComponents }
@@ -406,7 +406,7 @@ procedure TMainForm.CreateNumberBoxForField(const AField: TField;
406406
LDBNumberBox := TLabeledDBNumberBox.Create(Self);
407407
LDBNumberBox.BoundCaption := AField.DisplayLabel;
408408
LDBNumberBox.SetBounds(ALeft,ATop,131,21);
409-
LDBNumberBox.BoundLabel.SetPosition(lpLeftMiddle);
409+
LDBNumberBox.BoundLabel.SetPosition(lpTopLeft);
410410
LDBNumberBox.Hint := 'Hint';
411411
LDBNumberBox.Alignment := taRightJustify;
412412
// LDBNumberBox.CurrencyFormat := 2;

Images/SupportingDelphi.jpg

-218 Bytes
Loading
0 Bytes
Binary file not shown.
0 Bytes
Binary file not shown.
0 Bytes
Binary file not shown.
0 Bytes
Binary file not shown.

0 commit comments

Comments
 (0)