You've already forked lazarus-ccr
jvcllaz: Add JvHtControls and JvValidators ported by Michal Gawrycki (issue #0031026). Fixed some Linux-related issued. Clean up of hints and warnings.
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@5392 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
@ -1,23 +1,24 @@
|
||||
<?xml version="1.0"?>
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<Package Version="2">
|
||||
<Package Version="4">
|
||||
<PathDelim Value="\"/>
|
||||
<Name Value="JvXPBarLaz"/>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<AddToProjectUsesSection Value="True"/>
|
||||
<Author Value="Sergio Samayoa"/>
|
||||
<CompilerOptions>
|
||||
<Version Value="5"/>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<SearchPaths>
|
||||
<IncludeFiles Value="..\resource\"/>
|
||||
<OtherUnitFiles Value="..\run\"/>
|
||||
<IncludeFiles Value="..\resource"/>
|
||||
<OtherUnitFiles Value="..\run"/>
|
||||
<UnitOutputDirectory Value="..\lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
<CodeGeneration>
|
||||
<Generate Value="Faster"/>
|
||||
</CodeGeneration>
|
||||
<Other>
|
||||
<CompilerPath Value="$(CompPath)"/>
|
||||
</Other>
|
||||
<Parsing>
|
||||
<SyntaxOptions>
|
||||
<UseAnsiStrings Value="False"/>
|
||||
</SyntaxOptions>
|
||||
</Parsing>
|
||||
</CompilerOptions>
|
||||
<Description Value="JvXPBar (JVCL) conversion for Lazarus version 1.0
|
||||
"/>
|
||||
@ -42,7 +43,6 @@
|
||||
<UnitName Value="JvXPBarReg"/>
|
||||
</Item4>
|
||||
</Files>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<RequiredPkgs Count="3">
|
||||
<Item1>
|
||||
<PackageName Value="JvCoreLaz"/>
|
||||
@ -56,7 +56,7 @@
|
||||
</Item3>
|
||||
</RequiredPkgs>
|
||||
<UsageOptions>
|
||||
<UnitPath Value="$(PkgOutDir)\"/>
|
||||
<UnitPath Value="$(PkgOutDir)"/>
|
||||
</UsageOptions>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
|
||||
59
components/jvcllaz/packages/jvhtcontrolslaz.lpk
Normal file
59
components/jvcllaz/packages/jvhtcontrolslaz.lpk
Normal file
@ -0,0 +1,59 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<Package Version="4">
|
||||
<PathDelim Value="\"/>
|
||||
<Name Value="jvhtcontrolslaz"/>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<SearchPaths>
|
||||
<OtherUnitFiles Value="..\run;..\design"/>
|
||||
<UnitOutputDirectory Value="..\lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
</CompilerOptions>
|
||||
<Files Count="5">
|
||||
<Item1>
|
||||
<Filename Value="..\run\JvHtControls.pas"/>
|
||||
<UnitName Value="JvHtControls"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="..\run\JvDBHTLabel.pas"/>
|
||||
<UnitName Value="JvDBHTLabel"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Filename Value="..\run\JvHint.pas"/>
|
||||
<UnitName Value="JvHint"/>
|
||||
</Item3>
|
||||
<Item4>
|
||||
<Filename Value="jvhtcontrolsreg.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="jvhtcontrolsreg"/>
|
||||
</Item4>
|
||||
<Item5>
|
||||
<Filename Value="..\design\JvHTHintForm.pas"/>
|
||||
<UnitName Value="JvHTHintForm"/>
|
||||
</Item5>
|
||||
</Files>
|
||||
<RequiredPkgs Count="3">
|
||||
<Item1>
|
||||
<PackageName Value="IDEIntf"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<PackageName Value="JvCoreLaz"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<PackageName Value="FCL"/>
|
||||
</Item3>
|
||||
</RequiredPkgs>
|
||||
<UsageOptions>
|
||||
<UnitPath Value="$(PkgOutDir)"/>
|
||||
</UsageOptions>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
</PublishOptions>
|
||||
<CustomOptions Items="ExternHelp" Version="2">
|
||||
<_ExternHelp Items="Count"/>
|
||||
</CustomOptions>
|
||||
</Package>
|
||||
</CONFIG>
|
||||
24
components/jvcllaz/packages/jvhtcontrolsreg.pas
Normal file
24
components/jvcllaz/packages/jvhtcontrolsreg.pas
Normal file
@ -0,0 +1,24 @@
|
||||
unit jvhtcontrolsreg;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
procedure Register;
|
||||
|
||||
implementation
|
||||
|
||||
{$R ../resource/JvHTControlsReg.res}
|
||||
|
||||
uses
|
||||
Classes, JvHtControls, JvDBHTLabel, JvHint, JvHTHintForm, PropEdits, Controls;
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterComponents('JvHTControls', [TJvHTLabel, TJvHTComboBox, TJvHTListBox,
|
||||
TJvDBHTLabel, TJvHint]);
|
||||
RegisterPropertyEditor(TypeInfo(TCaption), TJvHTLabel, 'Caption', TJvHintProperty);
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
57
components/jvcllaz/packages/jvvalidatorlaz.lpk
Normal file
57
components/jvcllaz/packages/jvvalidatorlaz.lpk
Normal file
@ -0,0 +1,57 @@
|
||||
<?xml version="1.0" encoding="UTF-8"?>
|
||||
<CONFIG>
|
||||
<Package Version="4">
|
||||
<PathDelim Value="\"/>
|
||||
<Name Value="JvValidatorLaz"/>
|
||||
<Type Value="RunAndDesignTime"/>
|
||||
<CompilerOptions>
|
||||
<Version Value="11"/>
|
||||
<PathDelim Value="\"/>
|
||||
<SearchPaths>
|
||||
<IncludeFiles Value="..\resource"/>
|
||||
<OtherUnitFiles Value="..\run;..\design"/>
|
||||
<UnitOutputDirectory Value="..\lib\$(TargetCPU)-$(TargetOS)"/>
|
||||
</SearchPaths>
|
||||
</CompilerOptions>
|
||||
<Files Count="4">
|
||||
<Item1>
|
||||
<Filename Value="..\run\JvErrorIndicator.pas"/>
|
||||
<UnitName Value="JvErrorIndicator"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="..\run\JvValidators.pas"/>
|
||||
<UnitName Value="JvValidators"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Filename Value="jvvalidatorreg.pp"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<AddToUsesPkgSection Value="False"/>
|
||||
<UnitName Value="JvValidatorReg"/>
|
||||
</Item3>
|
||||
<Item4>
|
||||
<Filename Value="..\design\JvValidatorsEditorForm.pas"/>
|
||||
<UnitName Value="JvValidatorsEditorForm"/>
|
||||
</Item4>
|
||||
</Files>
|
||||
<RequiredPkgs Count="3">
|
||||
<Item1>
|
||||
<PackageName Value="IDEIntf"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<PackageName Value="JvCoreLaz"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<PackageName Value="FCL"/>
|
||||
</Item3>
|
||||
</RequiredPkgs>
|
||||
<UsageOptions>
|
||||
<UnitPath Value="$(PkgOutDir)"/>
|
||||
</UsageOptions>
|
||||
<PublishOptions>
|
||||
<Version Value="2"/>
|
||||
</PublishOptions>
|
||||
<CustomOptions Items="ExternHelp" Version="2">
|
||||
<_ExternHelp Items="Count"/>
|
||||
</CustomOptions>
|
||||
</Package>
|
||||
</CONFIG>
|
||||
36
components/jvcllaz/packages/jvvalidatorreg.pp
Normal file
36
components/jvcllaz/packages/jvvalidatorreg.pp
Normal file
@ -0,0 +1,36 @@
|
||||
unit JvValidatorReg;
|
||||
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
interface
|
||||
|
||||
uses
|
||||
Classes, LResources, SysUtils, ComponentEditors, PropEdits, ImageListEditor,
|
||||
GraphPropEdits;
|
||||
|
||||
procedure Register;
|
||||
|
||||
implementation
|
||||
|
||||
{$R ..\resource\JvValidatorsReg.res}
|
||||
|
||||
uses JvValidators, JvErrorIndicator, JvValidatorsEditorForm;
|
||||
|
||||
procedure Register;
|
||||
begin
|
||||
RegisterComponents('JvValidators', [TJvValidators, TJvValidationSummary, TJvErrorIndicator]);
|
||||
RegisterNoIcon([TJvRequiredFieldValidator, TJvCompareValidator,
|
||||
TJvRangeValidator, TJvRegularExpressionValidator, TJvCustomValidator, TJvControlsCompareValidator]);
|
||||
|
||||
RegisterComponentEditor(TJvValidators, TJvValidatorEditor);
|
||||
RegisterPropertyEditor(TypeInfo(Integer), TJvErrorIndicator, 'ImageIndex', TImageIndexPropertyEditor);
|
||||
// RegisterPropertyEditor(TypeInfo(string), TJvCustomFormatEdit, 'Characters', TJvCharStringProperty);
|
||||
RegisterPropertyEditor(TypeInfo(string), TJvBaseValidator, 'PropertyToValidate', TJvPropertyValidateProperty);
|
||||
RegisterPropertyEditor(TypeInfo(string), TJvBaseValidator, 'CompareToProperty', TJvPropertyToCompareProperty); end;
|
||||
|
||||
(*
|
||||
initialization
|
||||
{$I JvXPBarLaz.lrs}
|
||||
*)
|
||||
|
||||
end.
|
||||
Reference in New Issue
Block a user