You've already forked lazarus-ccr
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:
@ -22,16 +22,16 @@
|
||||
<Version Major="1" Release="4"/>
|
||||
<Files Count="4">
|
||||
<Item1>
|
||||
<Filename Value="..\design\JvCustomControls\JvCustomReg.pas"/>
|
||||
<Filename Value="..\design\JvCustomControls\jvcustomreg.pas"/>
|
||||
<HasRegisterProc Value="True"/>
|
||||
<UnitName Value="JvCustomReg"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="..\design\JvCustomControls\JvTimeLineEditor.pas"/>
|
||||
<Filename Value="..\design\JvCustomControls\jvtimelineeditor.pas"/>
|
||||
<UnitName Value="JvTimeLineEditor"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Filename Value="..\design\JvCustomControls\JvOutlookBarEditors.pas"/>
|
||||
<Filename Value="..\design\JvCustomControls\jvoutlookbareditors.pas"/>
|
||||
<UnitName Value="JvOutlookBarEditors"/>
|
||||
</Item3>
|
||||
<Item4>
|
@ -21,47 +21,47 @@
|
||||
<Version Major="1" Release="4"/>
|
||||
<Files Count="11">
|
||||
<Item1>
|
||||
<Filename Value="..\run\JvCustomControls\JvTimeLine.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvtimeline.pas"/>
|
||||
<UnitName Value="JvTimeLine"/>
|
||||
</Item1>
|
||||
<Item2>
|
||||
<Filename Value="..\run\JvCustomControls\JvTMTimeLine.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvtmtimeline.pas"/>
|
||||
<UnitName Value="JvTMTimeLine"/>
|
||||
</Item2>
|
||||
<Item3>
|
||||
<Filename Value="..\run\JvCustomControls\JvOutlookBar.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvoutlookbar.pas"/>
|
||||
<UnitName Value="JvOutlookBar"/>
|
||||
</Item3>
|
||||
<Item4>
|
||||
<Filename Value="..\run\JvCustomControls\JvBaseThumbnail.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvbasethumbnail.pas"/>
|
||||
<UnitName Value="JvBaseThumbnail"/>
|
||||
</Item4>
|
||||
<Item5>
|
||||
<Filename Value="..\run\JvCustomControls\JvThumbImage.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvthumbimage.pas"/>
|
||||
<UnitName Value="JvThumbImage"/>
|
||||
</Item5>
|
||||
<Item6>
|
||||
<Filename Value="..\run\JvCustomControls\JvThumbnails.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvthumbnails.pas"/>
|
||||
<UnitName Value="JvThumbnails"/>
|
||||
</Item6>
|
||||
<Item7>
|
||||
<Filename Value="..\run\JvCustomControls\JvThumbViews.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvthumbviews.pas"/>
|
||||
<UnitName Value="JvThumbViews"/>
|
||||
</Item7>
|
||||
<Item8>
|
||||
<Filename Value="..\run\JvCustomControls\JvCustomItemViewer.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvcustomitemviewer.pas"/>
|
||||
<UnitName Value="JvCustomItemViewer"/>
|
||||
</Item8>
|
||||
<Item9>
|
||||
<Filename Value="..\run\JvCustomControls\JvImageListViewer.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvimageListviewer.pas"/>
|
||||
<UnitName Value="JvImageListViewer"/>
|
||||
</Item9>
|
||||
<Item10>
|
||||
<Filename Value="..\run\JvCustomControls\JvImagesViewer.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvimagesviewer.pas"/>
|
||||
<UnitName Value="JvImagesViewer"/>
|
||||
</Item10>
|
||||
<Item11>
|
||||
<Filename Value="..\run\JvCustomControls\JvOwnerDrawViewer.pas"/>
|
||||
<Filename Value="..\run\JvCustomControls\jvownerdrawviewer.pas"/>
|
||||
<UnitName Value="JvOwnerDrawViewer"/>
|
||||
</Item11>
|
||||
</Files>
|
@ -2918,7 +2918,7 @@ end;
|
||||
}
|
||||
procedure TJvCustomTimeLine.SetHint(const Value: TTranslateString);
|
||||
begin
|
||||
inherited Hint := Value;
|
||||
inherited;
|
||||
FOldHint := Value;
|
||||
end;
|
||||
|
@ -901,7 +901,7 @@ end;
|
||||
|
||||
procedure TJvCustomTMTimeline.SetBorderStyle(Value: TBorderStyle);
|
||||
begin
|
||||
inherited BorderStyle := Value;
|
||||
inherited;
|
||||
if BorderStyle <> Value then
|
||||
begin
|
||||
FLeftBtn.Flat := (BorderStyle = bsNone);
|
Reference in New Issue
Block a user