DateTimeCtrlsDsgn: Move uses sections from implementation to interface.

This commit is contained in:
Juha 2023-11-21 06:43:32 +02:00
parent 5d6a599d92
commit 97c3ff8515
3 changed files with 22 additions and 10 deletions

View File

@ -29,7 +29,11 @@ unit DBDateTimePicker;
interface
uses
Classes, SysUtils, DateTimePicker, db, DBCtrls, LMessages;
Classes, SysUtils, db,
// LCL
DBCtrls, LMessages,
// DateTimeCtrls
DateTimePicker;
type

View File

@ -27,15 +27,19 @@ unit DateTimeControlsReg;
interface
uses
Classes,
// LCL
LResources,
// DateTimeCtrls
DateTimePicker, DBDateTimePicker;
procedure Register;
implementation
{$R datetimectrls.res}
uses
Classes, DateTimePicker, DBDateTimePicker, LResources;
procedure Register;
begin
RegisterComponents('Common Controls', [TDateTimePicker]);

View File

@ -27,16 +27,20 @@ unit DateTimePickerPropEdit;
{$mode objfpc}{$H+}
interface
// Nothing needs to be in interface section!
uses
Classes, SysUtils, Math,
// LCL
Forms, Controls, StdCtrls, Menus, ButtonPanel,
// IdeIntf
ComponentEditors, PropEdits,
// DateTimeCtrls
DateTimePicker, DBDateTimePicker;
implementation
uses
Classes, SysUtils, Forms, Controls, ButtonPanel, DateTimePicker,
DBDateTimePicker, StdCtrls, Math, Menus, ComponentEditors, PropEdits;
type
{ TFormDateTimePickerEditor }
{ TFormDateTimePickerEditor }
TFormDateTimePickerEditor = class(TForm)
private