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

TvPlanIt: Clean up.

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@8298 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
wp_xxyyzz
2022-06-14 09:17:02 +00:00
parent a962fbb40e
commit 661f42b5ba
1 changed files with 1 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
components/tvplanit/examples/fulldemo/demomain.pas
View File

@@ -561,21 +561,9 @@ begin
end; end;
Caption := Application.Title; Caption := Application.Title;
// Fix TLabel transparency issue of Laz 2.2.2 // Fix TLabel transparency issue of Laz 2.2+
for i := 0 to ComponentCount-1 do for i := 0 to ComponentCount-1 do
if Components[i] is TLabel then TLabel(Components[i]).Transparent := true; if Components[i] is TLabel then TLabel(Components[i]).Transparent := true;
{
TitleLbl.Transparent := true;
LblVisibleDays.Transparent := true;
LblGranularity.Transparent := true;
LblOtherResources.Transparent := true;
LblResources.Transparent := true;
LblLanguage.Transparent := true;
LblDrawingStyle.Transparent := true;
LblAddressBuilder.Transparent := true;
LblFirstDayOfWeek.Transparent := true;
LblTimeFormat.Transparent := true;
}
end; end;
procedure TMainForm.lbOtherResourcesClickCheck(Sender: TObject); procedure TMainForm.lbOtherResourcesClickCheck(Sender: TObject);