jvcllaz: Lowercase all remaining unit and package names.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6953 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2019-05-26 22:58:36 +00:00
parent ad9b3eb976
commit 997c331dda
82 changed files with 142 additions and 201 deletions

View File

@ -379,7 +379,7 @@ implementation
uses
Math, JvJVCLUtils;
{$R ..\..\resource\JvSimImages.res}
{$R ..\..\resource\jvsimimages.res}
const
LED_SIZE = 12;

View File

@ -76,12 +76,5 @@ begin
MemoText.SetFocus;
end;
{$IFDEF UNITVERSIONING}
initialization
RegisterUnitVersion(HInstance, UnitVersioning);
finalization
UnregisterUnitVersion(HInstance);
{$ENDIF UNITVERSIONING}
end.

View File

@ -180,7 +180,6 @@ type
property PageCount: Integer read GetPageCount;
end;
(******************** NOT CONVERTED *)
TJvStandardPage = class(TJvCustomPage)
published
property BorderWidth;
@ -273,7 +272,6 @@ type
property ParentBackground default False;
{$ENDIF JVCLThemesEnabled}
end;
(******************** NOT CONVERTED *)
implementation
@ -941,13 +939,12 @@ begin
Pages[Index].Caption := NewCaption;
end;
(************** *)
//===TJvPageList =============================================================
function TJvPageList.InternalGetPageClass: TJvCustomPageClass;
begin
Result := TJvStandardPage;
end;
(*******************)
end.

View File

@ -192,9 +192,6 @@ type
destructor Destroy; override;
end;
{$IFDEF RTL230_UP}
[ComponentPlatformsAttribute(pidWin32 or pidWin64)]
{$ENDIF RTL230_UP}
TJvPageListTreeView = class(TJvCustomPageListTreeView)
published
property AutoExpand;
@ -284,9 +281,6 @@ type
property Items;
end;
{$IFDEF RTL230_UP}
[ComponentPlatformsAttribute(pidWin32 or pidWin64)]
{$ENDIF RTL230_UP}
TJvSettingsTreeView = class(TJvCustomSettingsTreeView)
published
property AutoExpand;
@ -380,15 +374,6 @@ type
property Items;
end;
{$IFDEF UNITVERSIONING}
const
UnitVersioning: TUnitVersionInfo = (
RCSfile: '$URL$';
Revision: '$Revision$';
Date: '$Date$';
LogPath: 'JVCL\run'
);
{$ENDIF UNITVERSIONING}
implementation

View File

@ -41,10 +41,8 @@ interface
uses
Classes, SysUtils,
LCLProc, LCLType, LResources, LCLIntf, LMessages,
//Messages,
Forms, Controls, Graphics,
Dialogs,
//Windows,
ExtCtrls, Contnrs;
type
@ -266,15 +264,6 @@ type
property OnSelectionChange: TNotifyEvent read GetOnSelectionChange write SetOnSelectionChange;
end;
{$IFDEF UNITVERSIONING}
const
UnitVersioning: TUnitVersionInfo = (
RCSfile: '$URL: https://jvcl.svn.sourceforge.net/svnroot/jvcl/trunk/jvcl/run/JvDesignSurface.pas $';
Revision: '$Revision: 12931 $';
Date: '$Date: 2010-11-28 15:36:50 +0200 (Κυρ, 28 Νοε 2010) $';
LogPath: 'JVCL\run'
);
{$ENDIF UNITVERSIONING}
implementation
@ -1146,13 +1135,6 @@ begin
Surface.OnSelectionChange := Value;
end;
{$IFDEF UNITVERSIONING}
initialization
RegisterUnitVersion(HInstance, UnitVersioning);
finalization
UnregisterUnitVersion(HInstance);
{$ENDIF UNITVERSIONING}
end.

View File

@ -6,9 +6,6 @@ unit JvDesignUtils;
interface
uses
{$IFDEF UNITVERSIONING}
JclUnitVersioning,
{$ENDIF UNITVERSIONING}
SysUtils, LCLProc, LCLType, LResources, LCLIntf, LMessages,
Classes, Controls, Graphics, Forms, dialogs;
@ -58,7 +55,6 @@ type
end;
function DesignClientToParent(const APt: TPoint; AControl, AParent: TControl): TPoint;
function DesignMin(AA, AB: Integer): Integer;
@ -86,15 +82,6 @@ procedure DesignSaveComponentToFile(AComp: TComponent; const AFileName: string);
procedure DesignLoadComponentFromFile(AComp: TComponent;
const AFileName: string; AOnError: TReaderError);
{$IFDEF UNITVERSIONING}
const
UnitVersioning: TUnitVersionInfo = (
RCSfile: '$URL: https://jvcl.svn.sourceforge.net/svnroot/jvcl/trunk/jvcl/run/JvDesignUtils.pas $';
Revision: '$Revision: 12535 $';
Date: '$Date: 2009-10-02 12:36:42 +0300 (Παρ, 02 Οκτ 2009) $';
LogPath: 'JVCL\run'
);
{$ENDIF UNITVERSIONING}
implementation
@ -429,14 +416,6 @@ begin
end;
{$IFDEF UNITVERSIONING}
initialization
RegisterUnitVersion(HInstance, UnitVersioning);
finalization
UnregisterUnitVersion(HInstance);
{$ENDIF UNITVERSIONING}
end.

View File

@ -221,7 +221,7 @@ uses
SysUtils,
JvResources, JvJVCLUtils;
{$R ..\..\resource\JvErrorIndicator.res}
{$R ..\..\resource\jverrorindicator.res}
const
cDefBlinkCount = 5;