You've already forked lazarus-ccr
jvcllaz: Lowercase unit and package file names of JvValidators packages.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6940 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -82,9 +82,6 @@
|
|||||||
</Win32>
|
</Win32>
|
||||||
</Options>
|
</Options>
|
||||||
</Linking>
|
</Linking>
|
||||||
<Other>
|
|
||||||
<CustomOptions Value="-dBorland -dVer150 -dDelphi7 -dCompiler6_Up -dPUREPASCAL"/>
|
|
||||||
</Other>
|
|
||||||
</CompilerOptions>
|
</CompilerOptions>
|
||||||
<Debugging>
|
<Debugging>
|
||||||
<Exceptions Count="3">
|
<Exceptions Count="3">
|
||||||
|
@ -19,20 +19,20 @@
|
|||||||
<Version Major="1" Release="4"/>
|
<Version Major="1" Release="4"/>
|
||||||
<Files Count="3">
|
<Files Count="3">
|
||||||
<Item1>
|
<Item1>
|
||||||
<Filename Value="..\design\JvValidators\JvValidatorReg.pp"/>
|
<Filename Value="..\design\JvValidators\jvvalidatorreg.pp"/>
|
||||||
<HasRegisterProc Value="True"/>
|
<HasRegisterProc Value="True"/>
|
||||||
<UnitName Value="JvValidatorReg"/>
|
<UnitName Value="JvValidatorReg"/>
|
||||||
</Item1>
|
</Item1>
|
||||||
<Item2>
|
<Item2>
|
||||||
<Filename Value="..\design\JvValidators\JvValidatorsEditorForm.lfm"/>
|
<Filename Value="..\design\JvValidators\jvvalidatorseditorform.lfm"/>
|
||||||
<Type Value="LFM"/>
|
<Type Value="LFM"/>
|
||||||
</Item2>
|
</Item2>
|
||||||
<Item3>
|
<Item3>
|
||||||
<Filename Value="..\design\JvValidators\JvValidatorsEditorForm.pas"/>
|
<Filename Value="..\design\JvValidators\jvvalidatorseditorform.pas"/>
|
||||||
<UnitName Value="JvValidatorsEditorForm"/>
|
<UnitName Value="JvValidatorsEditorForm"/>
|
||||||
</Item3>
|
</Item3>
|
||||||
</Files>
|
</Files>
|
||||||
<RequiredPkgs Count="4">
|
<RequiredPkgs Count="3">
|
||||||
<Item1>
|
<Item1>
|
||||||
<PackageName Value="JvValidatorsLazR"/>
|
<PackageName Value="JvValidatorsLazR"/>
|
||||||
</Item1>
|
</Item1>
|
||||||
@ -42,9 +42,6 @@
|
|||||||
<Item3>
|
<Item3>
|
||||||
<PackageName Value="IDEIntf"/>
|
<PackageName Value="IDEIntf"/>
|
||||||
</Item3>
|
</Item3>
|
||||||
<Item4>
|
|
||||||
<PackageName Value="FCL"/>
|
|
||||||
</Item4>
|
|
||||||
</RequiredPkgs>
|
</RequiredPkgs>
|
||||||
<UsageOptions>
|
<UsageOptions>
|
||||||
<UnitPath Value="$(PkgOutDir)"/>
|
<UnitPath Value="$(PkgOutDir)"/>
|
@ -17,21 +17,18 @@
|
|||||||
<Version Major="1" Release="4"/>
|
<Version Major="1" Release="4"/>
|
||||||
<Files Count="2">
|
<Files Count="2">
|
||||||
<Item1>
|
<Item1>
|
||||||
<Filename Value="..\run\JvValidators\JvErrorIndicator.pas"/>
|
<Filename Value="..\run\JvValidators\jverrorindicator.pas"/>
|
||||||
<UnitName Value="JvErrorIndicator"/>
|
<UnitName Value="JvErrorIndicator"/>
|
||||||
</Item1>
|
</Item1>
|
||||||
<Item2>
|
<Item2>
|
||||||
<Filename Value="..\run\JvValidators\JvValidators.pas"/>
|
<Filename Value="..\run\JvValidators\jvvalidators.pas"/>
|
||||||
<UnitName Value="JvValidators"/>
|
<UnitName Value="JvValidators"/>
|
||||||
</Item2>
|
</Item2>
|
||||||
</Files>
|
</Files>
|
||||||
<RequiredPkgs Count="2">
|
<RequiredPkgs Count="1">
|
||||||
<Item1>
|
<Item1>
|
||||||
<PackageName Value="JvCoreLazR"/>
|
<PackageName Value="JvCoreLazR"/>
|
||||||
</Item1>
|
</Item1>
|
||||||
<Item2>
|
|
||||||
<PackageName Value="FCL"/>
|
|
||||||
</Item2>
|
|
||||||
</RequiredPkgs>
|
</RequiredPkgs>
|
||||||
<UsageOptions>
|
<UsageOptions>
|
||||||
<UnitPath Value="$(PkgOutDir)"/>
|
<UnitPath Value="$(PkgOutDir)"/>
|
@ -25,6 +25,8 @@ Known Issues:
|
|||||||
|
|
||||||
unit JvValidators;
|
unit JvValidators;
|
||||||
|
|
||||||
|
{.$DEFINE VALIDATORS_DEBUG}
|
||||||
|
|
||||||
{$mode objfpc}{$H+}
|
{$mode objfpc}{$H+}
|
||||||
|
|
||||||
// NB: this is here so a user can disable DB support if he wants to
|
// NB: this is here so a user can disable DB support if he wants to
|
||||||
@ -277,6 +279,7 @@ const
|
|||||||
implementation
|
implementation
|
||||||
|
|
||||||
uses
|
uses
|
||||||
|
LazLogger,
|
||||||
{$IFDEF JVVALIDATORS_SUPPORTS_DBCONTROLS}
|
{$IFDEF JVVALIDATORS_SUPPORTS_DBCONTROLS}
|
||||||
DBCtrls,
|
DBCtrls,
|
||||||
{$ENDIF JVVALIDATORS_SUPPORTS_DBCONTROLS}
|
{$ENDIF JVVALIDATORS_SUPPORTS_DBCONTROLS}
|
||||||
@ -304,7 +307,10 @@ end;
|
|||||||
|
|
||||||
procedure Debug(const Msg: string); overload;
|
procedure Debug(const Msg: string); overload;
|
||||||
begin
|
begin
|
||||||
|
{$IFDEF VALIDATORS_DEBUG}
|
||||||
|
DebugLn(Msg);
|
||||||
//Application.MessageBox(PChar(Msg),PChar('Debug'),MB_OK or MB_TASKMODAL)
|
//Application.MessageBox(PChar(Msg),PChar('Debug'),MB_OK or MB_TASKMODAL)
|
||||||
|
{$ENDIF}
|
||||||
end;
|
end;
|
||||||
|
|
||||||
procedure Debug(const Msg: string; const Fmt: array of const); overload;
|
procedure Debug(const Msg: string; const Fmt: array of const); overload;
|
Reference in New Issue
Block a user