jvcllaz: Lowercase file names in JVCustomControls packages. Fix overridden virtual setter bug introduced in prev commit.

git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6614 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-08-26 15:17:16 +00:00
parent 5c0231a2e1
commit dbe8be2238
16 changed files with 16 additions and 16 deletions

View File

@ -22,16 +22,16 @@
<Version Major="1" Release="4"/> <Version Major="1" Release="4"/>
<Files Count="4"> <Files Count="4">
<Item1> <Item1>
<Filename Value="..\design\JvCustomControls\JvCustomReg.pas"/> <Filename Value="..\design\JvCustomControls\jvcustomreg.pas"/>
<HasRegisterProc Value="True"/> <HasRegisterProc Value="True"/>
<UnitName Value="JvCustomReg"/> <UnitName Value="JvCustomReg"/>
</Item1> </Item1>
<Item2> <Item2>
<Filename Value="..\design\JvCustomControls\JvTimeLineEditor.pas"/> <Filename Value="..\design\JvCustomControls\jvtimelineeditor.pas"/>
<UnitName Value="JvTimeLineEditor"/> <UnitName Value="JvTimeLineEditor"/>
</Item2> </Item2>
<Item3> <Item3>
<Filename Value="..\design\JvCustomControls\JvOutlookBarEditors.pas"/> <Filename Value="..\design\JvCustomControls\jvoutlookbareditors.pas"/>
<UnitName Value="JvOutlookBarEditors"/> <UnitName Value="JvOutlookBarEditors"/>
</Item3> </Item3>
<Item4> <Item4>

View File

@ -21,47 +21,47 @@
<Version Major="1" Release="4"/> <Version Major="1" Release="4"/>
<Files Count="11"> <Files Count="11">
<Item1> <Item1>
<Filename Value="..\run\JvCustomControls\JvTimeLine.pas"/> <Filename Value="..\run\JvCustomControls\jvtimeline.pas"/>
<UnitName Value="JvTimeLine"/> <UnitName Value="JvTimeLine"/>
</Item1> </Item1>
<Item2> <Item2>
<Filename Value="..\run\JvCustomControls\JvTMTimeLine.pas"/> <Filename Value="..\run\JvCustomControls\jvtmtimeline.pas"/>
<UnitName Value="JvTMTimeLine"/> <UnitName Value="JvTMTimeLine"/>
</Item2> </Item2>
<Item3> <Item3>
<Filename Value="..\run\JvCustomControls\JvOutlookBar.pas"/> <Filename Value="..\run\JvCustomControls\jvoutlookbar.pas"/>
<UnitName Value="JvOutlookBar"/> <UnitName Value="JvOutlookBar"/>
</Item3> </Item3>
<Item4> <Item4>
<Filename Value="..\run\JvCustomControls\JvBaseThumbnail.pas"/> <Filename Value="..\run\JvCustomControls\jvbasethumbnail.pas"/>
<UnitName Value="JvBaseThumbnail"/> <UnitName Value="JvBaseThumbnail"/>
</Item4> </Item4>
<Item5> <Item5>
<Filename Value="..\run\JvCustomControls\JvThumbImage.pas"/> <Filename Value="..\run\JvCustomControls\jvthumbimage.pas"/>
<UnitName Value="JvThumbImage"/> <UnitName Value="JvThumbImage"/>
</Item5> </Item5>
<Item6> <Item6>
<Filename Value="..\run\JvCustomControls\JvThumbnails.pas"/> <Filename Value="..\run\JvCustomControls\jvthumbnails.pas"/>
<UnitName Value="JvThumbnails"/> <UnitName Value="JvThumbnails"/>
</Item6> </Item6>
<Item7> <Item7>
<Filename Value="..\run\JvCustomControls\JvThumbViews.pas"/> <Filename Value="..\run\JvCustomControls\jvthumbviews.pas"/>
<UnitName Value="JvThumbViews"/> <UnitName Value="JvThumbViews"/>
</Item7> </Item7>
<Item8> <Item8>
<Filename Value="..\run\JvCustomControls\JvCustomItemViewer.pas"/> <Filename Value="..\run\JvCustomControls\jvcustomitemviewer.pas"/>
<UnitName Value="JvCustomItemViewer"/> <UnitName Value="JvCustomItemViewer"/>
</Item8> </Item8>
<Item9> <Item9>
<Filename Value="..\run\JvCustomControls\JvImageListViewer.pas"/> <Filename Value="..\run\JvCustomControls\jvimageListviewer.pas"/>
<UnitName Value="JvImageListViewer"/> <UnitName Value="JvImageListViewer"/>
</Item9> </Item9>
<Item10> <Item10>
<Filename Value="..\run\JvCustomControls\JvImagesViewer.pas"/> <Filename Value="..\run\JvCustomControls\jvimagesviewer.pas"/>
<UnitName Value="JvImagesViewer"/> <UnitName Value="JvImagesViewer"/>
</Item10> </Item10>
<Item11> <Item11>
<Filename Value="..\run\JvCustomControls\JvOwnerDrawViewer.pas"/> <Filename Value="..\run\JvCustomControls\jvownerdrawviewer.pas"/>
<UnitName Value="JvOwnerDrawViewer"/> <UnitName Value="JvOwnerDrawViewer"/>
</Item11> </Item11>
</Files> </Files>

View File

@ -2918,7 +2918,7 @@ end;
} }
procedure TJvCustomTimeLine.SetHint(const Value: TTranslateString); procedure TJvCustomTimeLine.SetHint(const Value: TTranslateString);
begin begin
inherited Hint := Value; inherited;
FOldHint := Value; FOldHint := Value;
end; end;

View File

@ -901,7 +901,7 @@ end;
procedure TJvCustomTMTimeline.SetBorderStyle(Value: TBorderStyle); procedure TJvCustomTMTimeline.SetBorderStyle(Value: TBorderStyle);
begin begin
inherited BorderStyle := Value; inherited;
if BorderStyle <> Value then if BorderStyle <> Value then
begin begin
FLeftBtn.Flat := (BorderStyle = bsNone); FLeftBtn.Flat := (BorderStyle = bsNone);