mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-08-18 04:19:12 +02:00
datetimectrls: simplified unit dependencies
This commit is contained in:
parent
53db93de09
commit
f83b8b4cc3
@ -45,14 +45,14 @@ uses
|
|||||||
{$if defined(UNIX) and not defined(OPENBSD)}
|
{$if defined(UNIX) and not defined(OPENBSD)}
|
||||||
clocale, // needed to initialize default locale settings on Linux.
|
clocale, // needed to initialize default locale settings on Linux.
|
||||||
{$endif}
|
{$endif}
|
||||||
Types, Classes, SysUtils, Math,
|
Types, Classes, SysUtils, Math, DateUtils,
|
||||||
// LCL
|
// LCL
|
||||||
LCLType, LCLIntf, LMessages, Controls, Graphics, Buttons, ExtCtrls, Forms, ComCtrls,
|
LCLType, LCLIntf, LMessages, Controls, Graphics, Buttons, ExtCtrls, Forms, ComCtrls,
|
||||||
Themes,
|
Themes,
|
||||||
// LazUtils
|
// LazUtils
|
||||||
LazUTF8, LazMethodList,
|
LazUTF8, LazMethodList,
|
||||||
// DateTimeCtrls
|
// DateTimeCtrls
|
||||||
CalControlWrapper;
|
LCLCalWrapper, CalControlWrapper;
|
||||||
|
|
||||||
const
|
const
|
||||||
{ We will deal with the NullDate value the special way. It will be especially
|
{ We will deal with the NullDate value the special way. It will be especially
|
||||||
@ -574,9 +574,6 @@ function dbgs(const Parts: TDateTimeParts): string; overload;
|
|||||||
|
|
||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
|
||||||
DateUtils, LCLCalWrapper;
|
|
||||||
|
|
||||||
const
|
const
|
||||||
DefaultUpDownWidth = 15;
|
DefaultUpDownWidth = 15;
|
||||||
DefaultArrowButtonWidth = DefaultUpDownWidth + 2;
|
DefaultArrowButtonWidth = DefaultUpDownWidth + 2;
|
||||||
|
Loading…
Reference in New Issue
Block a user