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:
wp_xxyyzz
2019-05-25 13:37:10 +00:00
parent d048f998c6
commit 4ad3ea737d
9 changed files with 14 additions and 17 deletions

View File

@ -25,6 +25,8 @@ Known Issues:
unit JvValidators;
{.$DEFINE VALIDATORS_DEBUG}
{$mode objfpc}{$H+}
// NB: this is here so a user can disable DB support if he wants to
@ -277,6 +279,7 @@ const
implementation
uses
LazLogger,
{$IFDEF JVVALIDATORS_SUPPORTS_DBCONTROLS}
DBCtrls,
{$ENDIF JVVALIDATORS_SUPPORTS_DBCONTROLS}
@ -304,7 +307,10 @@ end;
procedure Debug(const Msg: string); overload;
begin
// Application.MessageBox(PChar(Msg),PChar('Debug'),MB_OK or MB_TASKMODAL)
{$IFDEF VALIDATORS_DEBUG}
DebugLn(Msg);
//Application.MessageBox(PChar(Msg),PChar('Debug'),MB_OK or MB_TASKMODAL)
{$ENDIF}
end;
procedure Debug(const Msg: string; const Fmt: array of const); overload;