diff --git a/components/spktoolbar/demos/lclscaling/project1.lpi b/components/spktoolbar/demos/lclscaling/project1.lpi new file mode 100644 index 000000000..5e02f8835 --- /dev/null +++ b/components/spktoolbar/demos/lclscaling/project1.lpi @@ -0,0 +1,86 @@ + + + + + + + + + + + + <Scaled Value="True"/> + <ResourceType Value="res"/> + <UseXPManifest Value="True"/> + <XPManifest> + <DpiAware Value="True"/> + </XPManifest> + <Icon Value="0"/> + </General> + <BuildModes Count="1"> + <Item1 Name="Default" Default="True"/> + </BuildModes> + <PublishOptions> + <Version Value="2"/> + </PublishOptions> + <RunParams> + <FormatVersion Value="2"/> + </RunParams> + <RequiredPackages Count="2"> + <Item1> + <PackageName Value="SpkToolbarPackage"/> + </Item1> + <Item2> + <PackageName Value="LCL"/> + </Item2> + </RequiredPackages> + <Units Count="2"> + <Unit0> + <Filename Value="project1.lpr"/> + <IsPartOfProject Value="True"/> + </Unit0> + <Unit1> + <Filename Value="unit1.pas"/> + <IsPartOfProject Value="True"/> + <ComponentName Value="Form1"/> + <HasResources Value="True"/> + <ResourceBaseClass Value="Form"/> + <UnitName Value="Unit1"/> + </Unit1> + </Units> + </ProjectOptions> + <CompilerOptions> + <Version Value="11"/> + <PathDelim Value="\"/> + <Target> + <Filename Value="project1"/> + </Target> + <SearchPaths> + <IncludeFiles Value="$(ProjOutDir)"/> + <UnitOutputDirectory Value="lib\$(TargetCPU)-$(TargetOS)"/> + </SearchPaths> + <Linking> + <Debugging> + <DebugInfoType Value="dsDwarf2Set"/> + </Debugging> + <Options> + <Win32> + <GraphicApplication Value="True"/> + </Win32> + </Options> + </Linking> + </CompilerOptions> + <Debugging> + <Exceptions Count="3"> + <Item1> + <Name Value="EAbort"/> + </Item1> + <Item2> + <Name Value="ECodetoolError"/> + </Item2> + <Item3> + <Name Value="EFOpenError"/> + </Item3> + </Exceptions> + </Debugging> +</CONFIG> diff --git a/components/spktoolbar/demos/lclscaling/project1.lpr b/components/spktoolbar/demos/lclscaling/project1.lpr new file mode 100644 index 000000000..da195f435 --- /dev/null +++ b/components/spktoolbar/demos/lclscaling/project1.lpr @@ -0,0 +1,26 @@ +program project1; + +{$mode objfpc}{$H+} + +uses + {$IFDEF UNIX}{$IFDEF UseCThreads} + cthreads, + {$ENDIF}{$ENDIF} + Interfaces, // this includes the LCL widgetset + Forms, Unit1, LCLVersion + { you can add units after this }; + +{$IF LCL_FullVersion < 2000000} +At least Lazarus v2.0.0 required for this demo project. +{$IFEND} + +{$R *.res} + +begin + RequireDerivedFormResource := True; + Application.Scaled := True; + Application.Initialize; + Application.CreateForm(TForm1, Form1); + Application.Run; +end. + diff --git a/components/spktoolbar/demos/lclscaling/unit1.lfm b/components/spktoolbar/demos/lclscaling/unit1.lfm new file mode 100644 index 000000000..faee50244 --- /dev/null +++ b/components/spktoolbar/demos/lclscaling/unit1.lfm @@ -0,0 +1,488 @@ +object Form1: TForm1 + Left = 303 + Height = 249 + Top = 127 + Width = 451 + Caption = 'Form1' + ClientHeight = 249 + ClientWidth = 451 + LCLVersion = '2.1.0.0' + object SpkToolbar1: TSpkToolbar + Left = 0 + Height = 112 + Top = 0 + Width = 451 + Appearance.Tab.TabHeaderFont.Color = 9126421 + Appearance.Tab.BorderColor = 14922381 + Appearance.Tab.CornerRadius = 4 + Appearance.Tab.GradientFromColor = 16115934 + Appearance.Tab.GradientToColor = 15587527 + Appearance.Tab.GradientType = bkConcave + Appearance.Tab.InactiveTabHeaderFontColor = 9126421 + Appearance.MenuButton.CaptionFont.Color = clWhite + Appearance.MenuButton.IdleFrameColor = 10569759 + Appearance.MenuButton.IdleGradientFromColor = 14649927 + Appearance.MenuButton.IdleGradientToColor = 12017961 + Appearance.MenuButton.IdleGradientType = bkConcave + Appearance.MenuButton.IdleCaptionColor = clWhite + Appearance.MenuButton.HotTrackFrameColor = 10569759 + Appearance.MenuButton.HotTrackGradientFromColor = 15179099 + Appearance.MenuButton.HotTrackGradientToColor = 12478257 + Appearance.MenuButton.HotTrackGradientType = bkConcave + Appearance.MenuButton.HotTrackCaptionColor = clWhite + Appearance.MenuButton.HotTrackBrightnessChange = 40 + Appearance.MenuButton.ActiveFrameColor = 11095324 + Appearance.MenuButton.ActiveGradientFromColor = 14518846 + Appearance.MenuButton.ActiveGradientToColor = 12411174 + Appearance.MenuButton.ActiveGradientType = bkConcave + Appearance.MenuButton.ActiveCaptionColor = clWhite + Appearance.MenuButton.ShapeStyle = mbssRounded + Appearance.Pane.BorderDarkColor = 14335646 + Appearance.Pane.BorderLightColor = 16315117 + Appearance.Pane.CaptionBgColor = 15849922 + Appearance.Pane.CaptionFont.Color = 9126421 + Appearance.Pane.GradientFromColor = 16115934 + Appearance.Pane.GradientToColor = 15587527 + Appearance.Pane.GradientType = bkConcave + Appearance.Element.IdleFrameColor = 14727067 + Appearance.Element.IdleGradientFromColor = 15653832 + Appearance.Element.IdleGradientToColor = 15323324 + Appearance.Element.IdleGradientType = bkConcave + Appearance.Element.IdleInnerLightColor = 15852501 + Appearance.Element.IdleInnerDarkColor = 15520702 + Appearance.Element.IdleCaptionColor = 11631958 + Appearance.Element.HotTrackFrameColor = 10211293 + Appearance.Element.HotTrackGradientFromColor = 14351615 + Appearance.Element.HotTrackGradientToColor = 5101567 + Appearance.Element.HotTrackGradientType = bkConcave + Appearance.Element.HotTrackInnerLightColor = 12972543 + Appearance.Element.HotTrackInnerDarkColor = 8045272 + Appearance.Element.HotTrackCaptionColor = 8864367 + Appearance.Element.HotTrackBrightnessChange = 40 + Appearance.Element.ActiveFrameColor = 5535371 + Appearance.Element.ActiveGradientFromColor = 7126014 + Appearance.Element.ActiveGradientToColor = 4035324 + Appearance.Element.ActiveGradientType = bkConcave + Appearance.Element.ActiveInnerLightColor = 961020 + Appearance.Element.ActiveInnerDarkColor = 961020 + Appearance.Element.ActiveCaptionColor = 8405614 + Appearance.Element.Style = esRounded + TabIndex = 0 + Images = ImageList1 + LargeImages = ImageList1 + MenuButtonCaption = 'Menu' + Tabs = ( + 'SpkTab1' + ) + object SpkTab1: TSpkTab + CustomAppearance.Tab.TabHeaderFont.Color = 9126421 + CustomAppearance.Tab.BorderColor = 14922381 + CustomAppearance.Tab.CornerRadius = 4 + CustomAppearance.Tab.GradientFromColor = 16115934 + CustomAppearance.Tab.GradientToColor = 15587527 + CustomAppearance.Tab.GradientType = bkConcave + CustomAppearance.Tab.InactiveTabHeaderFontColor = 9126421 + CustomAppearance.MenuButton.CaptionFont.Color = clWhite + CustomAppearance.MenuButton.IdleFrameColor = 10569759 + CustomAppearance.MenuButton.IdleGradientFromColor = 14649927 + CustomAppearance.MenuButton.IdleGradientToColor = 12017961 + CustomAppearance.MenuButton.IdleGradientType = bkConcave + CustomAppearance.MenuButton.IdleCaptionColor = clWhite + CustomAppearance.MenuButton.HotTrackFrameColor = 10569759 + CustomAppearance.MenuButton.HotTrackGradientFromColor = 15179099 + CustomAppearance.MenuButton.HotTrackGradientToColor = 12478257 + CustomAppearance.MenuButton.HotTrackGradientType = bkConcave + CustomAppearance.MenuButton.HotTrackCaptionColor = clWhite + CustomAppearance.MenuButton.HotTrackBrightnessChange = 40 + CustomAppearance.MenuButton.ActiveFrameColor = 11095324 + CustomAppearance.MenuButton.ActiveGradientFromColor = 14518846 + CustomAppearance.MenuButton.ActiveGradientToColor = 12411174 + CustomAppearance.MenuButton.ActiveGradientType = bkConcave + CustomAppearance.MenuButton.ActiveCaptionColor = clWhite + CustomAppearance.MenuButton.ShapeStyle = mbssRounded + CustomAppearance.Pane.BorderDarkColor = 14335646 + CustomAppearance.Pane.BorderLightColor = 16315117 + CustomAppearance.Pane.CaptionBgColor = 15849922 + CustomAppearance.Pane.CaptionFont.Color = 9126421 + CustomAppearance.Pane.GradientFromColor = 16115934 + CustomAppearance.Pane.GradientToColor = 15587527 + CustomAppearance.Pane.GradientType = bkConcave + CustomAppearance.Element.IdleFrameColor = 14727067 + CustomAppearance.Element.IdleGradientFromColor = 15653832 + CustomAppearance.Element.IdleGradientToColor = 15323324 + CustomAppearance.Element.IdleGradientType = bkConcave + CustomAppearance.Element.IdleInnerLightColor = 15852501 + CustomAppearance.Element.IdleInnerDarkColor = 15520702 + CustomAppearance.Element.IdleCaptionColor = 11631958 + CustomAppearance.Element.HotTrackFrameColor = 10211293 + CustomAppearance.Element.HotTrackGradientFromColor = 14351615 + CustomAppearance.Element.HotTrackGradientToColor = 5101567 + CustomAppearance.Element.HotTrackGradientType = bkConcave + CustomAppearance.Element.HotTrackInnerLightColor = 12972543 + CustomAppearance.Element.HotTrackInnerDarkColor = 8045272 + CustomAppearance.Element.HotTrackCaptionColor = 8864367 + CustomAppearance.Element.HotTrackBrightnessChange = 40 + CustomAppearance.Element.ActiveFrameColor = 5535371 + CustomAppearance.Element.ActiveGradientFromColor = 7126014 + CustomAppearance.Element.ActiveGradientToColor = 4035324 + CustomAppearance.Element.ActiveGradientType = bkConcave + CustomAppearance.Element.ActiveInnerLightColor = 961020 + CustomAppearance.Element.ActiveInnerDarkColor = 961020 + CustomAppearance.Element.ActiveCaptionColor = 8405614 + CustomAppearance.Element.Style = esRounded + Caption = 'Tab' + Panes = ( + 'SpkPane1' + ) + object SpkPane1: TSpkPane + Caption = 'Pane' + Items = ( + 'SpkLargeButton1' + 'SpkSmallButton1' + 'SpkSmallButton2' + 'SpkSmallButton3' + 'SpkLargeButton2' + ) + object SpkLargeButton1: TSpkLargeButton + Caption = 'Open file...' + LargeImageIndex = 0 + end + object SpkSmallButton1: TSpkSmallButton + Caption = 'Button' + HideFrameWhenIdle = True + ImageIndex = 1 + end + object SpkSmallButton2: TSpkSmallButton + Caption = 'Button' + HideFrameWhenIdle = True + ImageIndex = 2 + TableBehaviour = tbBeginsRow + end + object SpkSmallButton3: TSpkSmallButton + Caption = 'Button' + HideFrameWhenIdle = True + ImageIndex = 3 + TableBehaviour = tbBeginsRow + end + object SpkLargeButton2: TSpkLargeButton + Caption = 'Save to file...' + LargeImageIndex = 4 + end + end + end + end + object Label1: TLabel + Left = 16 + Height = 15 + Top = 227 + Width = 360 + Anchors = [akLeft, akBottom] + Caption = 'Icons are provided by icons8.com (https://icons8.com/icons/office)' + ParentColor = False + end + object ImageList1: TImageList + Height = 32 + Scaled = True + Width = 32 + Left = 168 + Top = 136 + Bitmap = { + 4C7A050000002000000020000000030B00000000000078DAED9B7B5053571EC7 + BBD3ED6EDDED74713ABBD3EEAA23D00EDAD99D2DD03FD6516BE5A93CACCA2E02 + A2A202028AAB8021E18DCA332141119000421290A7022AA0A8B5F800848497A8 + 08BE2B0802A9F840AB92DF9E7331E182046E9ED56ECECC7734DC9CF3F9DD73BE + E79CDFB917DE7B4F577EC9A2BFD0C6C83C28B569325904A5564E9FF5C5671AE2 + 7FB59C530A1EA59D72B53ABBE6957558BA10C5F0A926F9B4DCD3C0E0574CA8ED + FB72863D77B25A2D2D1605AA2233F36FBDE5F1F724B1A0A34DA45125C6850CC8 + E32726B141D3E5D7C27FFEE2259C6AEE8013A27685E4BF2BFA89C102DB758416 + DABA2AC36FBED9051EC987C023B716B694B42AA5CD879AC13224ED1A99CFDCCB + 814D498593CA33A9009CF71D85B09A3E886A7CAAB442CF3F000B464A29991FCC + 4906576E954AED52957F65275885A4C692F9BE095CD882FA451B7CAF82866134 + FE4E64BE6B4C3AECA8BAA515FEEAB4E380F82664FEBF777121BC4EAC15BE4342 + D10BC3054B3F96F2DD4B3AC0212E572BECDDA227B03422E30A79FEBBE5B7C0AA + A4A35AE1879CED018BA094A3643EDAE3C05D70412B7CBF8A0E300F498927F3FF + 937C02B61D6BD78EF7F3EB09EF93F9CB98451054DDAD1DEFEF27BC6F3A861F9B + 8F7CF1582BFC95C8FBFADFD8FD49CA5FC62A0607F621ED793F32F32A79FFB38D + CAD1DABA4BF6BE946F1D9E41EC47DAF2BE59505A3C998FE2D1DABA8BBC2F41DE + 7326F32D835321BC76409BDEFF9AC4375916A39D7597F03EAB4862306FA99E94 + 6FB0D0661EEAFF012DAA4377EA7B37CB32CBF946F6960BBE5244A88E95BAF819 + 4C7A4375F9415044A80EECF0724957073F9319580B2F1E81223A949D08678EE5 + 41809773C62FC12FE1ED8557AF5EC2F9AAC3B81FB2C6B76964386B1AD5B1CC64 + D25B07BA3AA1F7CE1578D87B8B321F177931E0760BD399505D594459470FEE07 + 5E6228DCBBDE42992F2F06CCC76D2A52F0395E78BE0A0A3398D075BD95327FA2 + 1894E55F6DAE8341711F146726C0DD8E26B9FC6C4E28110359D893785EA0B969 + A30A1F172A314CA4F3C70BC1DE72FEBF54E52B1B833AF9CAC4A02A3F3F2DF68D + 71CD4B8D86DCE45D1AE74F564AB2393ABE8EAFE3EBF83ABE8EFF7FC717244552 + 3A9714A6C761FED7EAE6A3BCAE9D6A3E2FCDFDD5CA67D19B1439D3BC0D7C45CF + 1F934951BE22E72F8AE76DA377F919C3F4E9C61FE9EB6FB4D0D77777429AAFA7 + 67FA8136B87A7A26BF3331498EFEEEBBA6212FAF5BE0EB7B173C3C6E80ADADB0 + CFD838D953B3EC7FBE6F6E5E77D2DBFB16B0D943C0E13C9389C97C0A6E6ED724 + E6E6352C4DF1D17DFBBBBB5F2778747A2FAC58D1FCB3B5757DA7A3E3A5E18808 + 31F17327A7CB6060E06E46B5CD39330CFFCC0F6065E430D8BDA5D15C288D1995 + 203001047EECDC2FFFFAC5FBF8BB4B9634FCC8623D85D0D07E749F75DFEBE919 + 7F423C1BD5DF6080E2E8888E7E0451518360615177840A3B6895D7E2C2F07D7D + D78E9F930CB675C2A3CBD76512E557408E3FFBA0948D3C36C3C5E50A718F6BD7 + B603FAFC0F725BC6C649CE3E3EB725F83AF246DF946C276FDB92E8B481070D6D + 63B8580D79E5F8DE7946330CFF207BFEABBFF1CB356BDA657D3C7BF6864FC6BC + 1FD7DFB8088D0DC15FBEBCF9E9A46C671F85D823DE33FE108F376E7FCB963B60 + 6A9AB29D7CDDCCAC26137B02FBD2C6BAA6CFF053A3DF4EC4663813F7DDAF087B + 94515BCC603C2018682C86CDCC2E6422AF6D3533AB2BC373503A173C3D6F8287 + E3B153E3630872F6B65196FDDA6786B6B6A247D863981316D60F0101F761D7AE + 8763E62216F68ABF4BF151A97F184EAAB1477DB6EF1B2BABFA6E3C0631318F20 + 216188F07C7CFC13193B20A01BB67937C2D9AC23C8C39C83414E3E76EA608FAE + BD261F1B1BA7FAA3B5E6189A87B53656E78EAF5CD124898B7B0CDBB77701CDB7 + 11FA9B47DA3F9D9A072551692FD4C596FBCCF9DBDD3EF6764249E05611885B47 + DABF7EB206CA13B240D36C69715D12EC76383A63E081B04DC6EEAE6D86DE864B + 1A67CBE69793D7B2C3BBF70F4AEFBB2C361DF83416DC3E534FB08523EC1C4DB0 + 5FCF6F6BE4B541699FA3FF036F07136E9EAE93DE37FACC2A369AA13F4DDD6C37 + 5B86E3E1286E1F79BCC52DEDD073B195C466025AF34140631D407B8FDA6270B0 + 8858B7CCBE6138C46FD47FE3C69B6097B3B2A04F7419EA738F82809E90396796 + E231A0DCE78F681DD8626E5E7B18AD89DFDB5A9F2D7158D9388CE7DFB66DF780 + FEDF46590CC2BC0A3CFE12325B1A178E811FC83A6034D380720C883BCFCAEAE2 + 1DF2FA83D7BFB8B8D1F5C7CF6F640DA81154103E47FBCD1AF4EF50574DD31BF3 + 908881462D86D9B3D7CF46EBAF58BAFE46468A8146EB01E967B2F05EB979D591 + 32A9CFD1DABF1CCD05626E4E14430E2D01F961724FA27DA660648F7B06AEAE57 + 2568FF1118186CA45958D49EF4F2BA29636FDE7C07D62CAF383FEB2F7FFF60DC + 9EBFBC34265D2C2F06FE8E842C799EC4FB2FDAD79FE3F671CE8972B11D6363BB + 2090EE8D4BAD6BFAC7B347D7079F15A81FE4C680C6296B224FA27C67EE14F9C7 + 62EAF987378A812B37065E202B6BBC1F503FCF1A977FCD1D179FA3B7B72CFFEA + 9F32FF72F65E39793FB0B2E7906240B9F76F50FED985FD1E12D287F3CF2ABC0F + BEF6E52C947F5EC53EC43928CA3F8F51994B74272FB3E29D290F6F9CAC918C8F + A1965F86F34F59EE3B927FA7D03C3D6F90F3EFC7682EB6A1FCFBA534FF7676BE + 0C2817B5A69C7FCF34F85B362D9E773028B113E5DC1272FE8DF70D813F3B471A + 033E6321AF57E3B98FE70079BEE1BC7CC3864E7CFE48D1EC19C8F843946BB271 + 2E8AF3EDEDDBEF49366DBA09F6F6A29F4C4D93B7E271D2CAEF63EBAF9F8E3C67 + 8F7CBF16C91CC535ED3D5D79A36C5E6DE79EC8F06CE1303C9B7D5CEC36A9ABDD + 39B66E86736DD7AF1BAF79E64BB72E5EB420106B93AB431887E171FCF3999FFD + 1E2B91EE51BEC9756584F43AFEEE446D18D9B97D3E15DF915BDBE55D7617BC8F + 8C55242715D0BDCAB4D5D52E405A67C902131FF2B54876F21BF5719B8EE9B5DD + 53F19DB384403BFBF40D4527678CE173E89E6DD6F34DF597CC3731C46340BE86 + BF3B511BB86D45F84CE133486C7C2DEE81B1FCC9949629AB87DB50967FE7D1B0 + ECB9DE65510D657ECBC56A59BDEE27C36AE1E372A7F30A11C764BADD71794C1D + 32DF255BA4125F99A2E3EBF83ABE8EAFE3EBF83ABE8EAFE3BF3BFC31F9B79222 + E7DF8AF2D52D2A7C74FEBAFFC6D9494D72E4D6F54CC59F6BE33677A2B3A35A84 + DAD63D39783B4B0E8323CC0DE2F491857E26E6D3982FB376C40EA786F849F685 + FA022585F84A5242FD5EF282621B0A7D923FA2C667F736159D20DEA748F503B7 + 9078B7904E0B037E4238D49D2CA5AC9C3D3B41B07BF7505EE8DE362A31603E66 + 929F555EC4CF6C119F1B180A024E2474B6D4C955416A2CF039E120AAAE203E97 + 65ED811FF2B2A192C31BA01283AAFCCC383A71F63F575140E2F300BFFFA71283 + A6F8B81D2A3168924F2506EC774DF2A5315425E53CCB0D4EAC1ECFCF0BD97353 + 157E196F2F147199D074EE845C3ED68FE74480EF950A1FBFDF93CEBF03F1C170 + A65440597C76189CCD17A8C4BF5FD782FB0B8E30D321736730A4EF0C9C5219BB + E9908BFAEA50723C74D78B54E26B423AFEDBCFFFE9D235A82E12107F3B84FF4E + 481565B143E04C210FC4AD5729F3DB4E5541193F09C47D3DF07850AC921E0E3C + 8063B9FBA1F9443965FEE9822C686FAD57DBEFA4765C12126D2AC26F139E1FA9 + 3CD403206E514EB8EE6B7E656E9A72FC57CF007E7EA89C705D55F96AEA7FA5F9 + CFFB0106AF29275C57553EEEC7C7B79513AEFBAEF7FFCB27233E5646B8EEBB3E + FE5AEA7FF2F9A3829706F5D595D07DF7865A84DBAAE47389B6316362FEE8F98B + 1F1335C4E3440CAB53B84DD2B94EA83BF18E94FF0194CEA696 + } + BitmapAdv = { + 4C69020000004C7A050000001000000010000000870500000000000078DAED97 + 7B4C537714C7D946369791AC33F880842A256CF8642A1A1C2DBAC9040671C2E6 + 2474CE2906DD441B79292A968780380436862B5240902A138156708AF2B0D8D0 + D60AC200510133C195020514050B2A67BF5F433B682F2D77737F2CF124DFE4DE + 7BCEE7FC5EE7DC9B6B62F2EFCC629123C39AE1B17D9CB698BEF5F69B53E51DFD + C339DF153402EB57A95A013C1178061C2CA0D1E63819128542B1D4F007724AA0 + B75B4E4A6E2ECEA11A7E7FCE0520B2DE814168952B09E5EEFD45F27B54DBC598 + 0FCBBE00C5D2A609CA15D641504913ECAB7C30A9BE3E71B91DF30159A5105CDA + 0631B583A4E4159B7311F3DFA45F01B6A48F344FDF712811F3CC0C2169365A36 + 0036CE9E5B31BFE59498341F86D66FB1D8D111F3FE7932D2FC6E7EE328856A4B + 59E117C6D92D6822CDFB9D12B5E3F35FB6690F67BFB09334FF794CCE25CC2FDF + 1CCC395CF398FCDEFB1F4A1EEB1F771AC32394AC50EDAD30F98FEC238745F4B8 + F03D1C22F9AC5BB3CF18BFEE53273F1819002255970960E7569F244D2CD3DBCD + 37EE501067BCD293A2AE3648CBA1AD51A2C737D749A15FD9A5CD81E3097B17F5 + 789DB8422F4765499E3A87B8A218D05AF61BE27B140FA0E3DE1D686D1013AE25 + 9E1DC835C4CBAA2EA9C72A13E442FB9D5A52BCAE35D7085FF1FF633E2536B44A + B79798DEAECCA9F2EBD6D2B713F51A51FF1009F534C350CF9A99D99A53284B6D + 4D4DCD5E23F3AE30357DC7C4C989FB634848E78B83077BC0D7F7462385B2C466 + AA3C95EAB381CDEE0557D782F3F6F611ECBD7B1543EBD79795EBC5CDB0A4A404 + 469EAE3D7B69A4BEF00A0862D3BB9CE7AF98EFEC9C81C706342605C7B9B99DE3 + B1581DAA09EC4CCBE98204AEF461C35D18686A05D9990B0AFAC2E58BB06FDEBC + C09D91917DE0E090106D61E1E1161070BF3328E8C1C802EB8F976858FE242CB6 + 69D3664FF3F616574744F44154543F24263E8523471E43044BA8F45EE9CA40AC + 6432F6EF3D347BC3CA6AA3BB0D6DEBB79B7C4577538E34434F4D335CCB281835 + C6EADAACE9D4D9FC1FB8B21B79BF8134B718FAEA6E83ECF4D4586CB3A7536768 + D67B9D5702D5D97CC8DD97D8435FE0B070F21A307BDDCAEAABB568FECCCDCC6B + B752E39BE151A37ACE70E64032FC512985EBA74B3AE90BF5738CED5F153E83E8 + E887DAFD8BDC23527A39ADFDA4208E53A3D9039C83A193C3CE2EF0FBB1F38BB1 + B0F8CC73D7AEFB8AE0E03F9FBD3F67CDB2B1F333172464C8B43978781ECBB539 + 56ADD2D6CFBBF8DEC5259BA87ECC05C7B8B2F1F3D0AC8546DBB691CDEEC3F55B + 686FCF3E80EA7770C30669855EFDCEB4A4FC1C1C75F6667EE910AEDFA2983475 + FDE27E5BBD3A2F353454311A1EAE0426B3A6D9DC9C614BF69B8DE63F0BC90E9F + C53FF9E69BDB7E3817C91E8B3AD77AE5FC0F6C183B7D3DC3B1D0B5337EA6F123 + 59EBF2DBF25B8659979580151F13014961FEE0E5B2D2D795BE7423BE8E8F6183 + C68F6375F91DFCFB70BC4E0592CE67907D3C41CD8FD7C9D4A36ADF2FF52AC0B1 + 44FCB9BBC3EA77A56A6810BAE51D13849F612B6C19861D02C3BC217BC5BFE227 + E335F56B48EAFA25E0C7F78F31A1D81182FEA58DEB4F63A2BDCCFF85A2D83445 + 15F7DCE0E594DCA1AC90B8515EF26128E426E9E96474443FFB4B96932E2F4CCF + 7F82DFABF7CA2590197A182AF93C68A997689579340C7E179741E9A93440E328 + 757318E38F47B2E0A6A854CDE338DD1CE87EC0109F93C446E3976B792CB4D62E + 0D8FBED3FDF8995C5C0767A37E02BCFE82B46313C4CF48860A5EA6961765150E + EAF264F4B2F9EE9B0D70F5FC1990A0FF22431216E741576DBD1E7FBBB2027A3A + 3B0086FB009E2A88857CBD5D72B8555146C877CBDB015E8C003C57110BF930DF + 547E65727E480E30D0462CE433CA3F7F0AF0EC09B190CF283FF2087D8094C442 + 3E221EF7CF454E86AA9CCF1B15951619148EB9C8C95415C59EE87A19BDFB1715 + 1A6A084C7A050000004000000040000000D41300000000000078DAED9D595453 + D99AC77DE8875AB76FF7EA07D7EAFB701F6AAD6BDFBE0FBDBAEBD6AAEEAEBE5D + F7360B084E58CA50CE65E18496E580256402010744C9242009A3610820E0805A + 8A88C84C124005C5B2D42AABD4C22A47CA811284B07B7F27397012929384CCC7 + BDD7FA2F43CC49F6EFDB7B7FE7DB7B7F3B993183145248218594B7B58426E67C + 142256A95D9648B92810F983C53931A162257255BC44D593D044656CA0F27F5A + D685D6D7DE9E9656697A50787AC50B5E52DE539E58B9EE6DE337DAA01B85EFAB + 78C94BCA7D122A56AD79DBF8419F9675A3F9FBCA5FF176E63D0E152957072A7F + 8AFA18921FCA9C9664D90AB4FFC06E437A7AEAB8647FF2A0AFB573EFEE3A67F9 + D3F38A50A14488CE1CC90F6801C3DE7DA9B79DE5DF5B50465D1BE885F0137EC2 + 4FF809BFFFF0DF7B3488923575684741ADC7B53C598E2293327FC5B158D31425 + 2A4F7B937FCC6040D56D57D0DCE43C3437A500452B8EFB4C614979E378BE76D9 + 5BFC5D37EFA2C4B23A6A9EB82AB70EC59FFB16A55D1EF28976E907D19CD4C237 + 216265011B7F5E8608651C6D7459E9D51726DA7C53CD259F71D312370F18E7EC + A29C78367EE9FE64E48E7501D027B8CFED6C7FE8737650DCA9AFA93A858854E1 + 6CFCA2BD7BA9D7C59DBEE117F57697D697771AF9C5CA7F67E3DFBC7B3FF53A71 + F3034EF1AFCCABC7FE4FF568416ADE6FD8F857A5C8D0A2740DDA7BE915A7F823 + A5556F7849AA76B6FBFF1ECC1F917C082DC93EC52976DAF7F31295856CFC6265 + 09D5F75717B7708A5FD87897F6FD4236FEB84C35F5BA2F8EF5728A7FEBC97E23 + 7FA22A8A8D3F565A44BD2EE1FC1D4EFAFED93B73FF838D7F657A018E57F2518A + F629B77C7FEE39887D1F85C54BFE9E8D3F6A773E8A9254718A9DF2FD12F0FDB9 + ED6CF3BF3547AFA3B93B73A9FB24E77C7F4AC168A838A7888D1FD6F0E1EFD80A + 1DA7F80517EED2BE4FC8C6BFB4A0999371EFD6DA7E53DC9F13CDC61F957DD614 + F70E70CBF76B8CBE9F27CE798F8DFF63490D5A9056CAB9B87705F6FDD8F73D0E + 4ACDF92D1BFFBC3D259C8B7BE9B83F2C51D5C1B6FE1773A4979371EF2E1DEDFB + 55456CFC2BD49DA6B8F70A277D3F9EF38BD8F817AB1A3819F76EADBD66CA5151 + 7EC2C61FA13889FB4921E7E2DE49DF9FFF1E1B7F787A25F613D59CF37DB67C3F + 937F4571279A8DDB9E6B71EF84EF4FCAED64DBFF59927F919371EF2EDD33A3EF + 4F541E66E3A7E33EAEC5BD13BE5FA414B3F12F921DE764DCCBE6FB99FCE1E915 + 283CAD8C73712FEDFB4377AAFECCC63F77B79A9371AFC9F73FF95F7ED13FD8CB + 7FE55ADC6B5AF331D8F2FD96FC5C8B7B538DBEDF1022CE513BC2CFB5B897F6FD + D8F789EDF1CF4E2940299D4F38E9FBF1BC6F311B3FF60F288283712FEDFB83C5 + 87DEB7C51F223EF405F07331EEA57C7F62EEF0DC2D59FF68FBFC87728FBBF21C + FC5222E543B6FC2F9EF8D03AFCBADB1C563939E5440A29A490420A299E2F4552 + C147F919C2184FAB4022283C2C1126FA1DBF44A080FC692FAAC99FF80BA54235 + D4EBC19D6B1E95990D320427FCADFDD19B171E157CC685931A74AA5C493DC6E3 + E1DCDBC6DF525783DEBC19F12B1B789B1FCACBE7CF50F399237EE10F7CC1EF4F + 36F015FF746C502817CE72F77DB94822AC87CFBFD5DB3E217DE309D47EAE1A8D + FEFACCA3FCCEDA00EAEBCD7BF5D122297AF6D3771EE577C606347F7F4F3B7A70 + EF3B8FE94449263A2C1353F5A954A5B9A51FB0F13B6A039A1FEAE8C9429FC9D7 + 5E3C4DD5A73AFF001A7A36E0517E476CE06D7E28EEB28123FCF66CE04D7E1803 + D459D0D151D4D55247D5E7D861F9B4FD0165C3020965037B823891F641CC3993 + 2FF8DD658369FB61C65CC157FCEEEC078EEAC9C06D538CCC8FF3077E6FDBC01F + F9BD69037FE5F7960DFC99DF1B36F0777E4FDBC0D7FCE5CA3487EED5A09283C9 + 545D4F956573867F3AF7EAEA82039CE09FEEF7B7B49CA920FC849FF0137EC24F + F8093FE127FC849FF0137EC24FF8093FE127FC849FF0137EC24FF8093FE127FC + 849FF07384FF5C75BEDBCE4BF4EB1BA9F704E640E1F78402A9FDB1DADC9D9F0D + 39DF01C32F15AA3D99AB4FF8093FE127FC9E3EFF301D7993DF6FE5617E4F9C7F + 72EB592AA9E02372A29C145248F145E1F13ADE0B0EEE8C0F09D11660D58584E8 + 6A4243758AE0606D4C5050CF4CAE728784742CC59C77303302CD99D365080FEF + 41E1E1970CF8F971FA796C8F1341419DB3B8C21D14D4F53BCCD564621EDDBAF5 + 1E4A4F7F81148AD766DAB9F3095AB3E616D8603C34543B86FB8830F0D93BFF84 + DBF631B0AF5C79C370E0C0CB29DC964A4E7E8A162CB83C02D7F078BA9AA0A0A6 + BF0B4CF6A6DF427FC70C637CFE4F76B99992C986E8BE80F07BEC09CCF1AE5543 + FDB76CB96BC69691F10A6DDC78072D59D24FF9808F3FBE6CC07D0325243C307B + 9D5CFE2B8A8ABA3A6EB2814763B68A1DD299EA78495C095FD2569220B98F851C + 16BEA67A93F9F7A0838FC7F51E83FA0307CD9494F418CD9FDF6330326907C0D7 + E1C76D986F089E5BBEFC3ADABF7F728CECD93388C2C2F4D83F6A7B3CC55EB243 + 1A5DC2973EA5798EA7E51A1A9595A829AFCAA6AA92B369FE764B76BAEDC1A743 + FDADB060EECE708BB1F20EF473F07B9636FBE28B1F4CE3401BE4EE36C7DCC780 + A33A257BE4567D3B7AD6F70D7A71FD5B565DA9A9A7D8350299DE1A3B14CC32B8 + 78F13583795FEE7B83195E070569DFB55527ECF3375B8E19F099604B2C89BBD8 + D50919BF2BE54B6F02475BD13187B899ECB6DA9DF6F9960CBB763DA3DAD0DE3D + 0D7C3DEE1BFDE01398BE203ABA0FEE056E1903A5F192FF2E17CB9B3522F908F0 + 38C20DEA39721695F26563F8DA5AF50EE99F6CBD7F68A87E3EB0C6C74FFAB3ED + DB7F34C536FABF3AE0376598D59096F67CE2FA55ABBEC1FCFABB6E6117798EDD + D887B531C00ABE8EAE3FF87B780EEE89F6EA488F81D4D4A713D77FF6D94DB87E + CCDFD98DEDD73907EABF63C7C044FDE1B1B1FFEB83EDF36BB3B09F1CDDB76FB2 + FD972FFF1AFAFFCD69FB78BEFCBF2A448A264FB31BC7B0F65D60DDB4E98789FA + EFDE3D48C732123BE3FF1DFCBABB0B175E19678E7F3C4718E78574364E975DE3 + 25F6491FA01D80FB189301621CB8BFB1C532601F4BDF01FE1F9EFB24BCE1B922 + 46FD4FCEB11FF03ABB893F1BEA0CB13C9363EEDC6EB8FF8FE0311E076D3DD9EE + BADFC33CD8344F98120FAF5BF72D6583650BCFFD909790F7077F6637DD0367E1 + FA0EC37D4C22199AE0009F8EE302534C0B7D417B15B7F94FA6B131FEF9E7DF23 + 66EC63CD06AB22EB9EDAEB079A1DD2FF2C171FBCE80B76CBBEBC76EDED292C10 + EB030FCC01A0BD2156001F616F5E44DBE0D3A8FA67B66CA0A6D8E53E659F8C65 + 74DD505FB6767546B04680ED8AC2E7B4A2EC6DCACB963198BFB033D73E783CED + 0DB0C1A245BD231007BAC23E67B61E452CEC42B599A7A838B44C20D3D23628E5 + CB3FF02776E63A003D1786B51D88E504829F295F007D02FC22C43AE0F3C5E287 + B6D9E718D96F5CBC49D5BB5D7D7CC206C53BA47F2B17291AFD8DDDC21F7C88F9 + 1B208E9B5CEB3317F687C872AD04E2C8D9B8DDA316E927D869D136D00865BF94 + FB31BB797FE8991912D2111D1CDC91847955D82EE938E6DBF859E419D1BCD91D + 6F9836807F71DC87562CED46F7B4B7A630DC6BED81F93AC2ED8E0281DD5E11AE + AA5C326F761B6503F0F53CECEB562DEBB2C95E9F55862A120F72829D2E824FCB + 97820DA87827BAF3AD6267DA60D9C286C1C2849CE1BEE30D6F15FB44FC1A2FF9 + 9F72B1A21D73BEA66D608D7DA0F30ABA71B6053DECBEC619766B36D0959D42E7 + B33466EC576B2F602E29750FC0F73F74A751C71976BA1CFE72FF5FB07FEFC576 + 306099F579F0FDCCB5E88643E553D8CBF8B2718D50DE1088EC147F42C6FB98BB + 1B338C5B8EF7CA9D9966FCF59965E6ED2E90E2D8400EEDDF5D9C90F18740632F + 11CAFE8CFB7583ADB80EFA3FCD0EE3E0F6F98E29EC93FF2F6B2DDC9E3E2B90D8 + 2BC407CFDB8B69C127F69FBC887ED2F5D964A7A5112AAACB02C006A96B4A4257 + 479F1D2816643A1FD35A6107DFD89C5F6D9C2F88E45565DBE5B3FC97FD70E8C7 + F35AA8FDB0B52BDAD1A3CBB75D623FBE37177DFD5533F51A7DF969633F001B08 + FDCF06C96B8B43809D19FFC6ACB41EFB3BCB4ECBD73630AEF17686C33A3F9E03 + A5C29E10E486AC8D3EB561E1FCB6216BF39F954B6DDBC019766B36502764FC8B + 37B8C3C23AFE0DF67B31DFB033F35FCA0636E64113FB717CE9B0A3EC536C2094 + 557BD206B00E06F94DA679FF94F50FD8EF86F58D6DDBEE53CF5B5BFFB0360F66 + C675A502F972CCF13DE5DF8432F47D93DE219FE1691BC0FA176E531DB4EDC285 + 975FBBBCFE35478F2217EA515D6EFD9498168F818F3402D9F7F8B911CB399363 + 3650B8D506C6F54F6ABDC7ADEB9F6161C6F5CFACB8BC29312DAEFF5FCBC507B5 + CC3993B3362877930D607DC7B8FEFDADC1922331F111B53FB662C5D768F5EA5B + 54DF67EEF7DA12E48EC17B2E5ED0F84ABCECE43F5BFBDC3237D8A0E4CB7D7F74 + ADED613FA7731872FB98FB1FB0D6B96CD9F57186BF1BC01A32E67AE90DB00F60 + AB9FD0EC9F2CB8F0DC16BBBB6C502690D7947C299BB60D4CFECE6C0F1CF29E20 + F7C798DBD79184C7C7C4FE05E40BE1E79BE11AE80FB6D8A3C31B1F67C4E6BDEF + 481D604D582352E8A6DD0F5CB00166B91711D16BB6FF69DAC347B03FCE92FB00 + 39B166F7407AFF3372DEC557F6DADD2336103967036BFBDF7BF7FE42EF7F2BEC + ED15C0988888E833F319B8DF404EE8C5E9B405D8A042EC820D44CED920385817 + 662BFF01C73F3C07F25F7220FF8199230B7971D8EFDF98EE782C16B86E8322FE + 817F758C7F6AFE0BDCFF4CF92FEF3890FF1207AF65C60A6EC97F49C8F83F1C1B + E8A7ED1385B2A38ED82024441F0EF567E673C6C5DD37E5BF74FDC5FEF5BA0CC8 + 7F8231C3E4C7ED7FDFD57BB2D1060A976C5066C706C6385F4BDDD3ADE4BF6D76 + A0FFF72E58E0C1FC37976D2067B58131DED7BE5CB2A4DF2CFF3132B27704FBBF + 57101BB08C9D7574BC485F0BF18329FF51E1AED894CE7FC41A07AEE7FD8EAD31 + D0FB8DD6727E2DDAB00CEACC8CE920FF15621C6C9B5BB0176A6933381302B931 + D1D1570DCC1888BEF7E3FF0B75E7DCC46403C8774627D2728761CEE4881D98FB + CE2CF9AF1F5271EAE26BE3967BB9F3E77743DE0BCC05FBC04E58A7F1DF4FA9FD + 2E1C1B32F39FC17EB367EB215FFABAA7CE0194C44B36E3F61C32318D9FDC5FC0 + 9AFB0C82F5347BFDC0C466E6072CF2DFC731DB188E9147ADE5BF8318B942A133 + 3C58D4C2F477A9FCF7046901EE137DA57CC9882BF9EF93FBDCDAFB702F67DE0B + 1D11F47F3A671472C9660468E1F1DA3F805C703A0F8A3917B225F01338FE1B36 + CD899A03F5FC8B793C6CCC83C271EC30E4425B3B0704F95FD0E6705EC6142BA7 + 073ABBB97FD76EA4FD1CDC1BB02D46B1AF1F8F88B83236776ED718634EDC0CFD + 6606078B29360832E60652F99E4DA6352235C4465C3AF7470A29A478BEC81337 + 7C7050B4E1B4421CFB58218ABD8F7542C65FF7E1DBC0AE10AE8FC1BCA3582F29 + 1B88621BE0313C2717AEDFC86DF68DEF9A58BBB3F8EB26E694F018F785B683A2 + D8D75251AC5FE5BC2CC86B9A1995D3228C52B63639A2D58AA3DD7B524483D624 + 4DDCF410B323B970ED947B26650361EC984CBCE991ADEBE1BD1DAD47A4B22509 + EAEE2A7F94AA551DAD6A33AC28BE8C56965CB1ABCF55671030B2C8E699388568 + 7D1FDBB5F0DE8ED401EA1AA56A1B87BABBCCAF6C1DF9ACBC1FF15B871C52E257 + B7ECF13FC84B8DFD8DB5CFC2FDFF06DBB549B57D0ED723A6A21F6C30E2067E14 + 5379DDE1CF853ADAE14732C18695969F2313AD0FB7779D53FCB8CE5077FFE3DF + 60C0FF0E61C54977C4CEA4C63D7E6C7ACEC07D7EECFFAC710A63C703A9FD95BD + AF51D5CD9129D274DEB6CB3F5D95B5DDB0FA9950176FF3B7FD386AF5FBEA4647 + DFA0CCC48D1EE11F7E3D64F5337B7E1EF51B7E28FA8B67DCCE7EF154A5CDCFF3 + 377E28D72F75A2DA926C5453207549F01E7DFA16D6CFB2C6BFA6EA1B9FF27BB3 + 107EC24FF8093FE127FC849FF0137EC24FF8093FE127FC849FF0137EC24FF809 + 3FE127FC849FF0137EC24FF8093FE127FC849FF0137EC24FF8093FE127FC849F + F0BB92FFEC0B59CB7FF634BFBF8BF0137E37F13B75FEC95FE4AEF34F91CAD6CA + 6855DB9823E7CEFC49D1AA7643544E5B95CBFC594DBFC77D40E2E8B9433F9204 + EA3E8314524821851452EC9452BE44519A20697248FC8CEF4A122483965227EC + 7BAE12F087B385DB46DDAD2CE1D61759A22D8339C22F1F14F1775DC2F5AD64FB + 4E3BA7F93117FC56CB1999DAAEAA530F4DF95E3175423ACA147D4E9D572C3A20 + 44A58A14B7AB589A880E8A37502AE4EF42A52CBFE93C1DFEDAF47CE7BE579021 + 954040B1B79DAD42B7FB741E536FC779742879332ADCC3377EA7B84871C21DBF + 15E32AFF21611CD5EE9E64A7559D7700F7818D93DF29EF061BB8CA8FC7A8D7F8 + 6BD599545F33FB5E7D91CC251BF803FFA596B353CE3ED7E44B58F9DD658340E6 + 67DA4023961F9F8E0D029DDFCC0642E76DC0057E576CC015FEE9DA804BFCE636 + 90396403AEF19BD940243F66CF065CE477C606C00FB13DD7F899BFBB0473267F + E6BFD2564FF132D578A2D4657ED05792C30818B916FF3A2A685B5CCF2BEEE0D7 + 694E5999FF6C47CA5DDBD0ADDE4E8FF36BB276A39C942D3EE387DF6DB5E4CF13 + 88A93639562045DAF3C791AEA1D623AAAF2AA4E67EC795129FF15BEF03192807 + F7014F7DFF175387D385E841D7259FF2837EECB84CFD962753ADA595E87C6191 + DBA53B56832E9DAE45D7CFD7A3C1ABDF38554F4FF10792083FE127FC849FF013 + 7E67F8EFB477A00B9587034A506777F15FADAF4385126140A9E74CADDBF91FDC + FB0EF97B79F2F001E127FC849FF0137E6FF03FBFE95BF99AFFE756DF8AF47FC2 + 4FF809BFAFF8477EF1AD88FFF72DFFAF3FFB5664FC137EC24FF87DC5FFACCFB7 + 22FCA4FF137EC24FF8093FE17799DFDAF9B7A3D283D47B9E28C944678EE4FBB5 + A08E5057A8B32507B0B1E67FDA38FF589C94D657B42F6930900475B67E6E53A2 + 20275D4921C558FE1FBE269489 + } + end +end diff --git a/components/spktoolbar/demos/lclscaling/unit1.pas b/components/spktoolbar/demos/lclscaling/unit1.pas new file mode 100644 index 000000000..32492c605 --- /dev/null +++ b/components/spktoolbar/demos/lclscaling/unit1.pas @@ -0,0 +1,40 @@ +unit Unit1; + +{$mode objfpc}{$H+} + +interface + +uses + Classes, SysUtils, Forms, Controls, Graphics, Dialogs, Grids, ComCtrls, + StdCtrls, SpkToolbar, spkt_Tab, spkt_Pane, spkt_Buttons; + +type + + { TForm1 } + + TForm1 = class(TForm) + ImageList1: TImageList; + Label1: TLabel; + SpkLargeButton1: TSpkLargeButton; + SpkLargeButton2: TSpkLargeButton; + SpkPane1: TSpkPane; + SpkSmallButton1: TSpkSmallButton; + SpkSmallButton2: TSpkSmallButton; + SpkSmallButton3: TSpkSmallButton; + SpkTab1: TSpkTab; + SpkToolbar1: TSpkToolbar; + private + + public + + end; + +var + Form1: TForm1; + +implementation + +{$R *.lfm} + +end. +