pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

jvcllaz: Cosmetic changes in JvThumbViews.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@6276 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2018-03-24 22:02:34 +00:00
parent 4ec910db37
commit ac080dc35d
2 changed files with 728 additions and 722 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
components/jvcllaz/examples/JvThumbnail/JvThumbnailMainFormU.pas
View File

@ -222,8 +222,8 @@ end;
procedure TJvThumbnailMainForm.FormShow(Sender: TObject); procedure TJvThumbnailMainForm.FormShow(Sender: TObject);
begin begin
CbThumbColor.ButtonColor := ColorToRGB(ThumbVIew.ThumbColor); CbThumbColor.ButtonColor := ThumbView.ThumbColor; //ColorToRGB(ThumbVIew.ThumbColor);
CbTitleColor.ButtonColor := ColorToRGB(ThumbVIew.ThumbColor); CbTitleColor.ButtonColor := ThumbView.ThumbTitleColor; //ColorToRGB(ThumbVIew.ThumbColor);
CbAutoScrolling.Checked := ThumbView.AutoScrolling; CbAutoScrolling.Checked := ThumbView.AutoScrolling;
CbAutoHandleKeyboard.Checked := ThumbView.AutoHandleKeyb; CbAutoHandleKeyboard.Checked := ThumbView.AutoHandleKeyb;
CbSorted.Checked := ThumbView.Sorted; CbSorted.Checked := ThumbView.Sorted;

1446
components/jvcllaz/run/JvCustomControls/JvThumbViews.pas
View File

File diff suppressed because it is too large Load Diff