mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-11 17:20:56 +01:00
Tools/icons_to_html: Add mouse-over to see the images in dark-mode. Store parameters in ini file. By Roland Hahn.
This commit is contained in:
wp_xyz
parent
d9ee72d497
commit
61f77f3cbf
Binary file not shown.
|
Before Width: | Height: | Size: 5.7 KiB After Width: | Height: | Size: 37 KiB |
@ -14,7 +14,7 @@ uses
|
||||
|
||||
begin
|
||||
RequireDerivedFormResource := True;
|
||||
Application.Scaled:=True;
|
||||
Application.Scaled := True;
|
||||
Application.Initialize;
|
||||
Application.CreateForm(TMainForm, MainForm);
|
||||
Application.Run;
|
||||
|
||||
@ -8,86 +8,36 @@ object MainForm: TMainForm
|
||||
ClientWidth = 600
|
||||
Constraints.MinHeight = 515
|
||||
Constraints.MinWidth = 600
|
||||
OnClose = FormClose
|
||||
OnCreate = FormCreate
|
||||
OnShow = FormShow
|
||||
Position = poScreenCenter
|
||||
ShowHint = True
|
||||
LCLVersion = '2.2.2.0'
|
||||
object btnCreateHTML: TButton
|
||||
AnchorSideRight.Control = btnSave
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 311
|
||||
Height = 25
|
||||
Hint = 'Create a html page for the images found in the selected directory'
|
||||
Top = 480
|
||||
Width = 95
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
BorderSpacing.Bottom = 10
|
||||
Caption = 'Create HTML'
|
||||
Default = True
|
||||
Enabled = False
|
||||
OnClick = btnCreateHTMLClick
|
||||
TabOrder = 3
|
||||
end
|
||||
LCLVersion = '2.3.0.0'
|
||||
object DirectoryEdit: TDirectoryEdit
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = Owner
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideTop.Control = sbtnLastDirs
|
||||
AnchorSideTop.Side = asrCenter
|
||||
AnchorSideRight.Control = sbtnLastDirs
|
||||
Left = 10
|
||||
Height = 23
|
||||
Hint = 'Folder with images for which the html preview should be created'
|
||||
Top = 10
|
||||
Width = 580
|
||||
Width = 555
|
||||
ShowHidden = False
|
||||
ButtonWidth = 23
|
||||
NumGlyphs = 1
|
||||
Images = ImageList
|
||||
ImageIndex = 0
|
||||
Flat = True
|
||||
Anchors = [akTop, akLeft, akRight]
|
||||
BorderSpacing.Left = 10
|
||||
BorderSpacing.Top = 10
|
||||
BorderSpacing.Right = 10
|
||||
BorderSpacing.Right = 2
|
||||
MaxLength = 0
|
||||
TabOrder = 0
|
||||
OnChange = DirectoryEditChange
|
||||
end
|
||||
object btnSave: TButton
|
||||
AnchorSideRight.Control = btnShow
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 414
|
||||
Height = 25
|
||||
Hint = 'Save the generated html text as file "IconTable.html" in the specified folder'
|
||||
Top = 480
|
||||
Width = 50
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
BorderSpacing.Bottom = 10
|
||||
Caption = 'Save'
|
||||
Enabled = False
|
||||
OnClick = btnSaveClick
|
||||
TabOrder = 4
|
||||
end
|
||||
object btnClose: TButton
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 535
|
||||
Height = 25
|
||||
Hint = 'Closes the application'
|
||||
Top = 480
|
||||
Width = 55
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 10
|
||||
BorderSpacing.Bottom = 10
|
||||
Cancel = True
|
||||
Caption = 'Close'
|
||||
OnClick = btnCloseClick
|
||||
TabOrder = 6
|
||||
OnEditingDone = DirectoryEditEditingDone
|
||||
end
|
||||
inline SynEdit: TSynEdit
|
||||
AnchorSideLeft.Control = Owner
|
||||
@ -95,14 +45,12 @@ object MainForm: TMainForm
|
||||
AnchorSideTop.Side = asrBottom
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = btnClose
|
||||
Left = 10
|
||||
Height = 427
|
||||
AnchorSideBottom.Control = bbtnClose
|
||||
Left = 0
|
||||
Height = 426
|
||||
Top = 43
|
||||
Width = 580
|
||||
BorderSpacing.Left = 10
|
||||
Width = 600
|
||||
BorderSpacing.Top = 10
|
||||
BorderSpacing.Right = 10
|
||||
BorderSpacing.Bottom = 10
|
||||
Anchors = [akTop, akLeft, akRight, akBottom]
|
||||
Font.Height = -12
|
||||
@ -598,35 +546,119 @@ object MainForm: TMainForm
|
||||
end
|
||||
end
|
||||
end
|
||||
object btnShow: TButton
|
||||
AnchorSideRight.Control = btnClose
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 472
|
||||
Height = 25
|
||||
Hint = 'Displays the generated html file in the browser.'
|
||||
Top = 480
|
||||
Width = 55
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
BorderSpacing.Bottom = 10
|
||||
Caption = 'Show'
|
||||
Enabled = False
|
||||
OnClick = btnShowClick
|
||||
TabOrder = 5
|
||||
end
|
||||
object cbDarkMode: TCheckBox
|
||||
AnchorSideTop.Control = btnCreateHTML
|
||||
AnchorSideLeft.Control = Owner
|
||||
AnchorSideTop.Control = bbtnClose
|
||||
AnchorSideTop.Side = asrCenter
|
||||
Left = 24
|
||||
Left = 15
|
||||
Height = 19
|
||||
Hint = 'Creates an html page with dark background'
|
||||
Top = 483
|
||||
Width = 78
|
||||
Width = 76
|
||||
BorderSpacing.Left = 15
|
||||
Caption = 'Dark Mode'
|
||||
OnChange = cbDarkModeChange
|
||||
TabOrder = 2
|
||||
end
|
||||
object sbtnLastDirs: TSpeedButton
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
Left = 567
|
||||
Height = 23
|
||||
Hint = 'Last used'
|
||||
Top = 10
|
||||
Width = 23
|
||||
Anchors = [akTop, akRight]
|
||||
BorderSpacing.Right = 10
|
||||
Flat = True
|
||||
Images = ImageList
|
||||
ImageIndex = 1
|
||||
Spacing = -1
|
||||
OnClick = sbtnLastDirsClick
|
||||
end
|
||||
object bbtnClose: TBitBtn
|
||||
AnchorSideRight.Control = Owner
|
||||
AnchorSideRight.Side = asrBottom
|
||||
AnchorSideBottom.Control = Owner
|
||||
AnchorSideBottom.Side = asrBottom
|
||||
Left = 514
|
||||
Height = 26
|
||||
Hint = 'Closes the application'
|
||||
Top = 479
|
||||
Width = 76
|
||||
Anchors = [akRight, akBottom]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 10
|
||||
BorderSpacing.Bottom = 10
|
||||
Cancel = True
|
||||
Caption = 'Close'
|
||||
Images = ImageList
|
||||
ImageIndex = 2
|
||||
OnClick = bbtnCloseClick
|
||||
Spacing = 5
|
||||
TabOrder = 6
|
||||
end
|
||||
object bbtnShow: TBitBtn
|
||||
AnchorSideTop.Control = bbtnClose
|
||||
AnchorSideTop.Side = asrCenter
|
||||
AnchorSideRight.Control = bbtnClose
|
||||
Left = 430
|
||||
Height = 26
|
||||
Hint = 'Displays the generated html file in the browser.'
|
||||
Top = 479
|
||||
Width = 76
|
||||
Anchors = [akTop, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
Caption = 'Show'
|
||||
Enabled = False
|
||||
Images = ImageList
|
||||
ImageIndex = 5
|
||||
OnClick = bbtnShowClick
|
||||
Spacing = 5
|
||||
TabOrder = 5
|
||||
end
|
||||
object bbtnSave: TBitBtn
|
||||
AnchorSideTop.Control = bbtnShow
|
||||
AnchorSideTop.Side = asrCenter
|
||||
AnchorSideRight.Control = bbtnShow
|
||||
Left = 351
|
||||
Height = 26
|
||||
Hint = 'Save the generated html text as file "IconTable.html" in the specified folder'
|
||||
Top = 479
|
||||
Width = 71
|
||||
Anchors = [akTop, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
Caption = 'Save'
|
||||
Enabled = False
|
||||
Images = ImageList
|
||||
ImageIndex = 4
|
||||
OnClick = bbtnSaveClick
|
||||
Spacing = 5
|
||||
TabOrder = 4
|
||||
end
|
||||
object bbtnCreateHTML: TBitBtn
|
||||
AnchorSideTop.Control = bbtnSave
|
||||
AnchorSideTop.Side = asrCenter
|
||||
AnchorSideRight.Control = bbtnSave
|
||||
Left = 227
|
||||
Height = 26
|
||||
Hint = 'Create a html page for the images found in the selected directory'
|
||||
Top = 479
|
||||
Width = 116
|
||||
Anchors = [akTop, akRight]
|
||||
AutoSize = True
|
||||
BorderSpacing.Right = 8
|
||||
Caption = 'Create HTML'
|
||||
Default = True
|
||||
Enabled = False
|
||||
Images = ImageList
|
||||
ImageIndex = 3
|
||||
OnClick = bbtnCreateHTMLClick
|
||||
Spacing = 5
|
||||
TabOrder = 3
|
||||
end
|
||||
object TaskDialog: TTaskDialog
|
||||
Buttons = <>
|
||||
RadioButtons = <>
|
||||
@ -639,4 +671,355 @@ object MainForm: TMainForm
|
||||
Left = 176
|
||||
Top = 64
|
||||
end
|
||||
object ImageList: TImageList
|
||||
Scaled = True
|
||||
Left = 256
|
||||
Top = 64
|
||||
Bitmap = {
|
||||
4C7A070000001000000010000000F30700000000000078DAED587D7054D515BF
|
||||
058D32461485C4B66A915AA0C538E3B4423BD329C23FD54AAD55908C5A863054
|
||||
8B33D80462918F02755A4232209668A7826D682486DD24DA3A6871C699182342
|
||||
682084DD4D4C825916369B7D4936BBCBEE86DD4D764FCFEFE6BD65DDECC75B70
|
||||
A6D319DFCC99BDEFDCF33B1FBF7BEE7B6F2F1109BA0A29681E299BD3E41FFDCE
|
||||
477E82600C9D5EFC5CB66FF244A9D54752302E680E84357FE9646E53C0875F0D
|
||||
9BAD687EAE121FD5936B0AB91AAC2EB9F7633FFDC5E6A3CE8097CCFE41EAF0BB
|
||||
A9F29C970A3ED687FDCF451F55280D34DFBC9A0A4E2EA77B8E3D4A5BBB5FA3E3
|
||||
EEE18C3E5EB38D63BF6F5A4505ADCBC91E546856E322BAE38305F4E2990ADA6B
|
||||
75A7C523E7F996D5123BE7D32584EBF6230B28FFDD02CA6B984DED1E252D1EF5
|
||||
DE7BB250C68DBF6CFE0B945B934F6DC3E7D3E22DCC15EA9DD5B858C6C535ADEE
|
||||
2E89BDA16A1AB5BBFB69F647E33D98BC7EAFE40AF522672D6ECEDF73E9F9A3A5
|
||||
54D93B1CCEB03FA60C045DA6CDE6B220EACD3D984FB907A651717371501951DA
|
||||
31AF638F4D190CBA763B469C76ABCFAAF4F9FBEC8CDDC5FAEB5362AC6D3793C3
|
||||
FC38D9CD255230862E532CC5941FE93DF966F47C5B30DC62F004DEAB08FB0F97
|
||||
87839FD678A2B6B660E46C4B3539DBF392629D1DF7446DA70683475E0E79CB16
|
||||
917BDBFDE4FAFD7D34B0611EF515CFA20B25B3C9DBF08750D4DA3A00DBC4B8C0
|
||||
8ED49644FD650B2950B198F0EB7F6B1D5DAC5E4BCE17E6D285B5DF22EB3379E4
|
||||
7C656954FAE8EF99A1E19173E8C89E1030A13D0F52F8CF0F53F0E59F128DF1F2
|
||||
8C8548517338F79B7CEA593995860D5B4291DE130734AE502F720E942FA2F0DE
|
||||
2514FDEB52E943BB063716505F09F0B7D1D9A29BA8ABE8168AD84E05E9F3CF6F
|
||||
02B7CC95D7BD7D3EF9772E947163F1D54BE3C0FAEC78FC8EC26BC8D754E52547
|
||||
C72FA9CF521A608E5D5BEE23CF4B3FA4C0EE076964FF0AF2EDF8490CEF2C9D43
|
||||
CE3F2D26DBDA99D4BDE206B23C31895CB51B4364B7AC6359EF7FB72C8418F011
|
||||
327DC088288D1C2E8FE13DF55B5915255F4B03753D3D85CCCB04E33785C67BC3
|
||||
F4D8A5A3355E47C9B725CF17EB364B5B29DAA5DE3BF73F4B96C2C9121FCB1FFC
|
||||
716FD8797DB146A8D353B775027EA07A1D753E9923B19D2BA65EE60FEBC77D85
|
||||
DEE87D6686E4D8B6E6EB9CDF86185CA92E61EC75120B193AB42918B19EA8BADC
|
||||
7BED79E809E72BCBA2E05713D73B3B68A8E18FCCF7E418D65EF108FA472147D7
|
||||
F409FDDBDB3A306CD81CEA5E75ABC458964F8AE19033CF0525B6DF322FE91EE0
|
||||
9E445FA1367F539587D7280CC1183A997362DC6422FB8AB98DED5F1EAB5C6523
|
||||
963AB10D920DE68C512CB418C52D189B8DA211227DB10E73296319450EC77A93
|
||||
EDC95C279E4BC4438739B6AB6E7D5D5C9B88E7B91A96A8C92036198D6272221E
|
||||
3AF6B1053688138F35D589C754DF2F26F88CE163B6EC1FB61D06F1689CDD7116
|
||||
0B6D179332E1651E46D1C97214F75D6F89E932A784D8A9F03207A3D8CCFAC899
|
||||
1A31CD522F16A8F9FC6C02BE4E144226E80DE2E7C098EAC50F343C73F290DE35
|
||||
66BE9668F8CEB7C5ADC89F7D6ED0DD575CAB5AB3D627C7B92653227FC944E5CF
|
||||
C2F6C7E2FC2D95F91844A9CED88435BFAC175FE37B033865BF2F24CB43C6E51A
|
||||
61835E4B9CB75689EB551F845AE0079C42780D7E879C656F1B446DCFFBE2BA34
|
||||
7B6E19DB9D909CC27E5C306E61ECE37A393E65143378BFFD0882B15E9CF990B8
|
||||
9F397A8365651C672BA1C35C066EBFC7795EE27A5FE2F100E24230860E73A643
|
||||
E2BBA9F08D8DE21AB61906866BDDC3E366293C963A9E83CD84674EBD98ABE9D9
|
||||
E64370F8D9BFC48D8CFB35046395D70FB5385A1EA849E6CCBE31CF626D6F10B7
|
||||
27C6800E73AA8D5B62C0559DF81B6A437EDC7F4F70AD77627DF9B7826DFA59FA
|
||||
787EA7AABB1336B21670C4589622C90FD7D873504C55F7ED4ED61D3E6D14DF54
|
||||
E3BE0F1DE660035B60808D7B8634B3CD6A9503477C0DA65A710774AAEFD5B005
|
||||
469B4F82EF4FC4733C7B327CAAFC9133706AEC7F73DD3B92E59F8C3FBC0B1853
|
||||
8698C85B1DE724E32F6EFDDC59ACDFB0B67EB23EEE856CFB073DF765F56F8C67
|
||||
CE23D3FEC11EFB32F7AFCA1B65290D580F154F09FEBE70DF592B66F29A6DC7AF
|
||||
FA8EC5DAFE133EF4E0F999FA80FABC7E409B537DD095E2E3EDB2CD5F073E1D9F
|
||||
EE4C78DDCFE9047C16EBE84E81A72B8CFB15FE7F8BBF92FDFB855ED4E12782FD
|
||||
A327AF54732C0AEFDBC5578A67EC8FD3F9C884579F1B297D64C0277213C906AF
|
||||
C7365ED7F68EB8999FF7FBD4771FBE1FF6E15B5F0F5EFD3E3ECECFACBD9FD58A
|
||||
6F4030862EEE7F514A3C7FB73E8C7716BE89E3BF8F59F709E632E1F93DB99EE3
|
||||
ED4A32BF1B733AE37F922CBEF61F474FFD2C955AFDCCDF7EBE779DAE17F3545B
|
||||
6B46FE8DE275C93D0BE754CDA2E0BB28D97B5FCFFA771E12B3557F8A45CD23DB
|
||||
FE416CF59BB29F7BF8EE2CDFE3D6381FE7B99E5FD1559EFD7F75FEFFFF71FEFF
|
||||
EAD9109907C7E8B473944C83A3B4B73BA8FBFCBF65608C36BD7D8966AEF7D26D
|
||||
6B5D94FF9C838A0F0ED1316738A38F4A8E0BECDD1B43F4D4FE308DF153F3177B
|
||||
DC945B748E9EFF8722F3487B7ECF39DF55EAA527F78569C8377E1E387831420F
|
||||
953B69CAD35D745A09A7C5A35EE45CFE5E9096BE1A90F825BB86685BFD304D5A
|
||||
DE41A71CA1B4F83303A394B7C641D3D728527021F79CA7BAE9DA420BB573FC74
|
||||
E7FF953D21C9556E918D6E5C65A373CC3DB0FC4F82EBEFE7F960C6F37FA77BD4
|
||||
547C4009A25EE48CB8BFAD720415CFA8EEF37FC53BBABBCF356AEF55C20A7E19
|
||||
1B3BFFFF2F10872D37
|
||||
}
|
||||
BitmapAdv = {
|
||||
4C69020000004C7A070000001800000018000000570E00000000000078DAED5B
|
||||
09741455162D81A0A0C8A288011D4559E2C222A0A838E20688B88DC81682EC4B
|
||||
DCA2823064A20283A82408CA12F0C8202101D28D2004D1512064053144A0D3D9
|
||||
215B672564EDF4DEFDE6BDDFBF9AA2D39D74758283E79073DEE9EA5FBFEE7FFF
|
||||
BEFBDEFF559D020001FEC2D63FB1A1A7DF316D4CFFB88686BEC7B4205ABF635A
|
||||
F37D71DAF43E71DAD12DC1479C9801F10D96A00C232C74B2E74EEAACFDE3B475
|
||||
7D4E5CBCD96BFFD1EFF7102BA51E1AD9568D05A473926BFD8F69F3E87369966B
|
||||
FCE3B5002139A646F3F2C4C6A5E81DE3B8C36F8911E69F821F5BDF228E9BB42B
|
||||
897D95DB943FF4F0638511CA8C2630D9ACF8698483150698FC87BE45B87E715A
|
||||
D859620433621EA839010B0B36C01B39CB21287735ECAD38CADA238B0DAC9F37
|
||||
F8845D66AA83A9F9AB60987A0E0C3E3D0D1EFC7D02F825BF047DE347C3D8DF66
|
||||
4189BE8A8D2117DB1FE74E5C5CC20E80C0EC55A0B5E8604E5A08F43E3212EEF8
|
||||
79383C173F89CD63924CAE886FE284B0072136F9BDA16817D0DFBAF3DB18B6EF
|
||||
C1C1D07D9F1F44E5ED850365F2F0CB31961F166E627E2FC859056105DF415275
|
||||
2AC34FA83C092B33BE82C9C9F3A0ABB2370424CC459EE4E11337D331960FA64C
|
||||
803A4B03B8FAABC5D8748AF285A70F3D0F46ABBCFA481A0CCA0D05BFE32FC36C
|
||||
553084E747C1C9EAD30CF744E5295897110EAFC5064087EDDD60E2617FF45F27
|
||||
0B3FA6DCC034D80775D2FBE848B8F3BFC3212C2B9CE17FAE5E079D76FA227657
|
||||
F0D9DA1122B2A260BF4CFE29774817E34ECE76C472CAF179506FD6C278F4BB63
|
||||
4437688FD8439443C184DC4C4A65FEE7C91983744DFA7E366E22D34917C5DDDC
|
||||
EF6EE0F32D62EF190A9A860AD8AE61BEE779B1E6B533594D9B2D368B7577C15E
|
||||
CBD484D9F00CC692F88ECC8EB4503B9EDF44FD5AB8371861B018943A8BFE82D5
|
||||
6635EB2CBA0AA3C5188DED8FCBC78A6D0785993DA1246328333A0668DBE2FD8B
|
||||
267D1C14ABA340A3AAC34F909AAD48558B9F915094FE826CDC62F54388994C38
|
||||
D673272CFA5FD643DD8E20A8090F80AA8D53A0FA3F0B40FB631858738F5BD878
|
||||
1A552268D20679869D3E19FB1BACB94996865D0BA17AF9A350FDC930B8F8D110
|
||||
A8FCD720285F723F942EEC079AA0BBA1F09DBFC1852D33C1921D6F417C3D68D4
|
||||
139BC19E84FED8CCA7F65AEB434743DDA74F40FDAABF43EDCAC7A176C5A350F5
|
||||
F130FB188BEF87920FFA4011E2E72FB81DF2DFBD0774495156BAD6ED18764E0C
|
||||
845DF7E993A0FDFC29D0AD7E06ED5968F8E269D0AEC17A927A000CA77E80CA65
|
||||
8F41D987FDA1F8BDDE50F0664F383FF756C89D7D0BE81223AD6C1E45AA818D63
|
||||
A94A264EEA568F66D8FA35A3C1B8762C18D7BD00863563C0787493A38611F765
|
||||
8BEF8392F7EF85A2B7EF84BC79DD21676667C899DF13CC59F1165BD1D978173A
|
||||
01E2BB1E396940BF09DBBCFE65B06E7C154C5F8D03737284035F777433542C79
|
||||
00F1ED1CE5CDEF01B9B3BA40D6B48E50B26EA25D6325EAE725DC44914E289684
|
||||
AF0B7D96F94DD8D64DAF81F9EB179DF0B7D8F12906E4FFFCDB387E0748F76F8F
|
||||
F14EC278AB7770FCB6A46FD26015EAA46EE508D022DF862FC7D8FD466C3697A4
|
||||
ED97F95F4EFC38E167067400F5A43650B5F7DFF6FC20ECA2AC5E349FFAC820A6
|
||||
41D209698662AB0F1B857118C5626C4AD87609FF4838C6D78FC7B7179C27FE67
|
||||
DC8CF83740DAC4EBA0782DE7283FDD174A54C3E8B87A53005C081EC8E650BBE2
|
||||
31D4268EB17B11E8B6CD61E319E3B73AF01B7EDDC872A07CF538285F3F85E927
|
||||
7B7A27C8F4BF1ED2260850B0EC291E035E4FF098F29238257D577D3C14F43FAF
|
||||
B18361BDD7ED5F09FAD86F2EE9E7970D50BD6B093B477F95BB96B2D8A64F6E67
|
||||
C75FFE34C74F1FC26A15F9BF2D107DEACB7287E6A18BBBE42FE118D3631D5F0D
|
||||
69871DD8F45775700D644EBD9E714FF897F1C362A0AAD51E5A03C541BD59CCCA
|
||||
16F5878A4F868359A3968C6173796CC83F8DBAF7858C293E0C9BAC7AEF4A8CEF
|
||||
D91A3CDD86EB33D282B58AEA89E6DDBBB0B6F466B9531682EB5C511AB8FB23EC
|
||||
7381775C86AD9EDC162C394C9F110EFD97AAC7D27CA8561504FA324D14BE7507
|
||||
D35EF19281602C3CEB123B770162A3DE455EC84AD64EE2DCA78D71AA0F895407
|
||||
A956911E48D3F90B7AB0DC2CF8A01F58AA8A1DD8E68B1AC4EED5083B735637AC
|
||||
0F09581F54718DEB8F7A30D526AA8354ABA89E50CEE4CE24EB0CF90B1F006369
|
||||
36B37341FD1C5AB9C48B0F3424EEC0FAA6D24151C600D7EB15D656ACB13406C5
|
||||
8C3447399F857949B943FE12AE1A73488A4D7E336C7B7D7EBDE93511C7C07950
|
||||
1DA45A95EEEF63E7C009538C25F14D9C30BF4BD2C67BB6EEA60DB215AA12284E
|
||||
A485AAEF57304D535E92D131D518A613B61E23DFEE3869CA48575807F95AEEB4
|
||||
BEA3BE4983CE3AF1CEDAD86B15AF27F6BC6CD3AACF5A96096DD40A21828C8E5B
|
||||
FB390EE2FE2D4D817145A3E396E109D7A5450BD355D142B0E86BC62EE16E119F
|
||||
8EC539511FEA4BD778827D364AE88A183F8958E9BB8521EEF0E99CD88676E88F
|
||||
7D42976638E8A65208A71C3C2885AD0A85D0D61D3E9DA33E12DE52C83FB79C28
|
||||
8418DED784739E223DEF921FD12FA530955D633FBFDF155738F60C891FFECEE7
|
||||
9BC227C3380438B8520A6F48CFA56C117C10F33CE76487ABF935874F86B83B79
|
||||
9F73B1B182E3FE42A5144673BF2D67BF17EEF1165FB55BB817CF5B992EA285E7
|
||||
1CE32A84F5D486B18D73177B4FF0395602EB172DAC95B4C572FF57BAC5DF2BDC
|
||||
827DCC6474EC165F297CCE7DFD55829FC1B99FDF947E71CE4F9235D5077103F9
|
||||
3CD5127C351F33B0A5750479798BE3A749F00F737E56B7141F751AC6B17E716E
|
||||
43FF8FB7181F311816623A6A8E4218C9E7643BBB47F0F31A7BB7701F61707D3E
|
||||
29ADEDD896CDC7F8C16BEE15C2018E91E55C23302EE31DF98D31F282F777C5EB
|
||||
91A37F3493DF56EA2F83F320316FF1BA4877FD5262848ED8275EE2C78FA883C1
|
||||
6EEBF91EE121E95A817D8F252B840E4DF942E725F3102D15FDFA1AF36F21191D
|
||||
539B539FA8BC6DC20D1EAFB74AE115BCE68C13862B3B8DF17AA905EBFA1388B1
|
||||
9CB8C2CF9368BF61DB416A43DC1157F36F4BB416503D44BE67B9D0E32C3AE76E
|
||||
BD68CA3277093D390756CEB1E18C42E87DD9B8D8266A99FAD23532F43C8AAFA3
|
||||
DFA9F608C3F0B81E4D29C95325B5615D194A7DB89647798ACFF3408F1A0AE579
|
||||
17C2732798EDA7EC6387709D85525FBA46661DFC95F429E684B8FE8BEBB79847
|
||||
D447BA56B9E39BE627F581AFC9B6AC9DC2ADE29C887732318FE81CAF97EBA573
|
||||
272C693CB8B6C92F3DF35B296CE0B1FD49BACF70363AC7EB8395AEE173D68BB5
|
||||
45A2053AFF1DE752CCD99FA4F94E7588D64FE47F11D69DE1623BF591D4A0330C
|
||||
C31E732BC7FE8C8D873A11AF495508DDC57D33ED595DD423E65F8A42E82CAE1F
|
||||
EC1A910FBBE6A8DF67D86F36D7723D69C2B9FED1BE98CE63BF0F553B851E341E
|
||||
AFF506E7BD1EAF8D215CCF74CD6C6AA7DCE19AA63173C5318807BE6F79C7C53E
|
||||
61099FF74007365ECB3194D27C94E43CD3B6187BE29ABEBBDAD7A77F2FF8F29A
|
||||
3F8FBE9F5608BDB82F4B9BA8C94BA90FF595EE9510E37637FB395A4BDF17352E
|
||||
E6A0735FB7FCA06678AE2E76B196BEC7C77EA4297E9A8B2FADA73C5641747FC3
|
||||
6A9F7D9E46DA2F3417DFE6F4491AE4B5F4327DD27D6A4EA4707373FA94915F8F
|
||||
10D7144F51339EE4D795AE0F9ED637F253AC6F623F4FEB9B27F5996AB284FBF3
|
||||
72EAF39FBDBE48D747B606BA591F994EBC581F5DADEFD27D02CF47AFD7F7D6DC
|
||||
9F48E3D60A168B73B9C9099FDA13D97DA5D4E85E5489F7ADCEED8D8DEE6DCD7C
|
||||
CF4BF7AF09D231B82E96B99897CB76BA47A776CCE58F384FCBA82FCFF1D7F918
|
||||
47BCC6E7CF12E8798933BEF45EF10AE22FBBAAF19BE05F363ED5205AC79B305E
|
||||
A7BCC1979317E7E4E2B7E0F9C3FF0DBF85B5E29C07F8AE6B457346D770CCE6F0
|
||||
BDE14A8A790DFF1AFE357C277CB10EDB7F2338D45C4D6E64F67B4093AB7ADDCA
|
||||
FB9346F5BA257B21DC2FA43AEF779AD96B795EDFECF77656E7FD4E73F89EC697
|
||||
F78DE6314BCADC2F74BA02F8CBF8735F8FC6F0065FF26CB9D93164E34BF617EC
|
||||
3E369AEDD5535B09DFADD65A03DF93B5FD6AC14FDB2D3C8CE7F6A05DE0F7FD2A
|
||||
E2DCC5B304D9F88833977ED7C37365786E337EFF82FF1E64A3DF5AE99984B7F8
|
||||
F44C8063C738E728DE978EE5F7FBFBBCC5E79C94B9CB7F7A6EC3EAD01EE1012F
|
||||
F189EF2DEEFA8BCFAC709C37BDC4A767159F35F95B87BDCE2DF192FFB3144BB7
|
||||
F7C7FC7733F1F722D9FEDBD7261BC5D2C5EF1AEDB13D19B12BCE4408377A834F
|
||||
F3E7BFF7EB2996C4377B4E837E637B32AF07D5F87D00F7673A3D8393A37FFE3F
|
||||
05FB5C3CBFAD206CBE8E558863785B9F4983A413F61C17F9264EE8B74ABCA6D4
|
||||
D331BCA93F72C6F0B6BE793A86A7F7A497DD9F460B015CAB03D4F698507CF25A
|
||||
F1594D8E241F06E0F77C7ADEF4577EE7EBDAFB5FD7DEFFBAF6FED7D5FFFED7C1
|
||||
323394EAAC60B2029436582106BFB7CAFB5F1A33981173D70903CCF8A60EC686
|
||||
56C3B4F08B1099A46563451699BC7FFF0BB18B6BAD30264C0B772DD2C29D1FD4
|
||||
C11B5BEAE1D6C072E8325703C34334A0A93143A4C6E4DDFB5F1640EC06B8F79F
|
||||
06E81B6C8298D316F63FBFFB528CD0755E09DC38230F1E0E2EC079D864BFFF45
|
||||
7C1327E477DF60236C4FBEFC7F96371DD6C24D33F3A1FDD46CD876AC1AF697CA
|
||||
9B4399CE06B3BEAD639C6C3A6A669887CED8FD8F4935B0CFD08335E0E39F0DE3
|
||||
C30AA104632EEBFD2F8CDD0B6155D033A80A94BF9B60E311234CD8687F0FEC95
|
||||
B555F0E5A13A884CAC83B69333E0F190F360B4D864E19306A7855741F737CBE1
|
||||
B6B72E408FB72BE1D575350C7F5CE805E43E1FAE0FC881EB26AABDF2FF40A999
|
||||
69B0F31C0D8B65B7F925F0625825C31FFB4519DC302D97F92E4C488388F81AD9
|
||||
FC53EE10478F7E54CC7442B11CB9A294E18FF8B810DA4DC964D80F2DCEB5EBC7
|
||||
9BF7BF50D7A4EF614BED3AF1F1CF82018BCE439B49E90E6C4DB519B61799BC7F
|
||||
FFCB62DD6CB1DAAC11713596D790678A25F1BD03BF533BE648EBBCFF65B42975
|
||||
26DB05A4C28C9F154613347AFFEB7FAE3291E94C7A0700000020000000200000
|
||||
00541300000000000078DAED5D097C14D5191F4039840AE5166F04B485AA5015
|
||||
0FAE620F6AB545B904412887807228871C6241901B946AABD0CA7D660394BB80
|
||||
B4094D45A408266413C2E6DE1C9B0D49487637C926BBFBF5FBDEBCD9BCCCEE86
|
||||
C9EE6CD436FBFB7DBF9DCCBCF7FEDFFBEE3733FB020012FC1F936480465DA31C
|
||||
8BBA46DB3391200065521B6AAB373EC7064D846D75C7E7F3DE9CE5828B36F04B
|
||||
744D914318F0D9D881B015D22CA35A9123462BFEF317CBC2C483367CBDA91EDF
|
||||
5E4FF5F43F458FC6386099C9095F16B9C0EA7443A5C783DF2EF6F7523CFF085E
|
||||
0F17F65B09E570BDC20DF42974D921C6160B870B63E0EC8D4B505059C2CEE723
|
||||
2F338DE5BA637F98E664E36738AD30376B233C617C0D7AC68D85472E8D82EE17
|
||||
86408FF383E1F584A590569A0D1E6CB73ED5A9EBBC69CC0B8EAB30D0340B1E4F
|
||||
98043D63C7C2F3C6B76097E5380CBA3C05BAC60C82CE5103A1C7D941F0EF82FF
|
||||
B0F67AC881F44D32A7790F34CD86C78C32F6C3974642A4F57326937DB927E081
|
||||
E867E1BE337DE1AE93BDE1C1937D21D56E66BA08D51EC8D6E833377B23624F84
|
||||
5E713236C9FCA0F50CBBB63FF724DC7BA60FC3BEE3784FE870A4078C3B3F8D5D
|
||||
7BCF149A1ECE15BAA0B0D286FA9ECCF42D630F8587CEBD00072CA7194664CE09
|
||||
B8FB546FE8C4B1DB1EEC066D221F80EBE545F045A12B247CF2B17F95C4B27993
|
||||
BEF7E69D8408249279AAC3CCF053EC19B033E300EC4837C0E694DDF0D31303E0
|
||||
F6BD9DE0EF59A7C1521E1A7E05FAF711F4319A37D99A96CFC6A4CDD07C673BD8
|
||||
69DA034EB727E4F9937FF7F8CF5066E7BB728EC2DE9C63B03BEB30A43832185E
|
||||
B22D0DB6A7ED836D297BE02FD7B6C1C3877A43D36D2DE178E6DF439EBFACFF12
|
||||
E8FEE560E8463E163DD06BE7FBCC8719FE5E947D2BC37D28F33BD9BC9B6E6D09
|
||||
4D3E6B01F965051013A2FE9772FBA7D842D88A9D773ADE0BF6651E62D776A745
|
||||
32ECDB76B665F3BEF5B36630F4F470766DC93567B51AB4B644FE4B7E4C71ED27
|
||||
185B443BDF9EBA8F616C31ED94E78DD8B7FCB519B4DEDA16928B53595EE8F56F
|
||||
C7391D6AF811481E8C6B9E074FF585F687BB331F7B0CED7C63D216AFBE69DEAD
|
||||
B7B481A8EC280A7F4443755C472CA431D31D6637C596B6FBBBC00FF674F2EABB
|
||||
E9E6164CE6A9C5A96E8E3D3F0C6BC9E16E705B59FE7316B94F649D821DA6DDCC
|
||||
CE0BCB0B5962747BDC79F8352C8CEBD91648145C4FBB3C2E8B073C15F44D7F23
|
||||
BD81D4FC7BBC566F043909FD20C7B81EB28D6791AE22D93925F2736BF17A5FD6
|
||||
562F5CB3B91964C7CFC3B1AD48A091F2203BE16DD63714EC2CE3701CCBAC8CEB
|
||||
8A3F03A54757C18D4F4641C1EA5F82F59D9E6059F013B02EEB0FF91F0C869203
|
||||
8BA122EEA4C84726E4C40F0902BB01F65D82E461B8DF1C07DBA657A170F1638C
|
||||
0ADEED05D7DF7914F2173E0C796FFF182C731E84ECB71E80AC19F741E61B7742
|
||||
EEFB03A1ECCB7D0A0F3846C22A1CB3A146EC86D82782FA7ACC71506A980FC5CB
|
||||
9E16E829B8F15E6F285AFC38E383F1308FF3F06667304FBF07D2A7DE01A9AFB5
|
||||
87FC4D13718C58CE47FC5E4D3C64195730ECD40BE0F8EB38B02DEF03B615FDC0
|
||||
BEB23FD856F66354B2FC19B8B1F4C92A1E500796B93F82DC595DB90CEE82F4C9
|
||||
1D2065626B30BF37005CC9E7651E728CEFDF047B18C98BE66D47EC12C4B6AF1A
|
||||
008E3528CF753F87D2B53F67C7F655FDA1CC300FDC25F9485628D93103ACF37B
|
||||
0832B81B65D011522761ACFF7D4B302FE9A7C8C113D01E989DCBB6566A58C0B0
|
||||
1DAB0730CCF20F7E05CE0F7FCD888E4BD73E0B1EC4563EEEE23C2E83872087D9
|
||||
C1BD90813A487BAD1DE2B782A4579B83E54F63AA6C322DADA90F7E8E71015DAF
|
||||
BC7C0C65FB349333CD95F02AFEF81BA8FCF805A4DF8273C37350BEFE973E75CD
|
||||
F5771E415BFC11E4CCEAC27490F17A27C46F0F29137E08D710FFEA2B4DA1ECBC
|
||||
81F39030D727B670FFB66D1AC3EC8C644C73A73913B6FBD397C0FDC94B50F9D1
|
||||
0B786E900F7EFEC247981D127EF64CC2BF13D226B787E4F1ADE0DAD81688DF04
|
||||
D2173DADC8C0522D46515C63FEFD39B32986BFB23F93B38CFF5BF030FC17193E
|
||||
C9C467FE886F45FCDCD96883027ECA789A7F0B481CD5188C231A4239CA97DB62
|
||||
1F41F6EB99DE8FAC60FE4DB64D365F4AF2475993CC2B3E7A5E9EFB865FFB95BF
|
||||
1C0B64F99B49FF4CFEA87FC21FCBF1873784FC9DB31519AC15EC3E9ACEDDF8F3
|
||||
48E64FE4DF25EF3F030EB4FDD235CFCA3CA0CC69DE744CE77CF0D1FEF214FB9B
|
||||
5E856F42FB27FD137EFCF006553AC831FED38B9F6DBC46E70A56FD82C5B52294
|
||||
41F1D2A7B8FFF56772205D102EF33FD48DFA639DDF9DFBDFFDB2FF4D21FF6B83
|
||||
F8B743D2E8669030F256881F2681E98DFB95F95F15F06D748EE239C9B160514F
|
||||
285A8276807A6072D83211CAFFF10938B64E623CD139F547F6BD2E90B7F60528
|
||||
3AB80CB297FF026DBF3598C671FC976F61F809A36F53F06D027E099DB32C201B
|
||||
EAEEE5816CC1F697B1E8E095DCD15DE0D8BF08797BC2073F77763728DC3E1D3C
|
||||
2EB9ADC755C1629F227BB23D863FA685825F2CE027B1F92FEDC764487E24F3F0
|
||||
28384E6DA80E843CD822E6FBE0176D9F51C5A7E21311EFC2559C7B22973D93FF
|
||||
34AFFC1305FF8BA2739443C97E2C73BAB1784E3A2DFCD30886A9E6C1E7A3C2A6
|
||||
F967FCA10FF37BE388465EFCF477FDD85F8E711D9DA3FC4DB1936238F9119305
|
||||
EAB578F76CFF98013E1EE425F793713E7327BABE6BAE920F570BF87DE95CC595
|
||||
532C77510ECD9E79BFCC07CA837829DA3153130F0A76D298DB18B6117D4EC477
|
||||
622D21E35F795A157FF3E87CEECA412C7764601D417E44F2608431AD60EB341F
|
||||
3907C46636D7A81AB62AFE56AF05A85EC36BCEAF0F63DCECC0F237D511C44B26
|
||||
C6528AA754DBE46F9EE297073576C2CBD5B1E331F6957D1529E3671967FBE43F
|
||||
CA89941BC90E374D60BE4BF93B75523B16C72997C9DFEDC0BA71BCAFFF7D3A9E
|
||||
E99BE28C7ADE44B955F937DD6FFE657680B501AB3F62216BE900163B297F510E
|
||||
A5382E7FB76254786CBD6C0F480547D6B2FC4A3146F17391D2DE79123C9971BC
|
||||
FE4878B1C61A886A24CA8558339917F745793667F98BE288FCDD82C99811D9F7
|
||||
A8261CD777CE0A7655FD850B754DF527D68AACFE8CC5BA653424A20F931F1396
|
||||
FCDDD82B677FF355F49DFBF16865DE44BB595DADB9FE666B0E567F975F3C0499
|
||||
4B06C858E84F6A9FF29DF35355B656FBFA5BD0C59597B07F86B29E707E7382E5
|
||||
6FF2238AA3944B884CD33AB3B896BF6B0E6B23AC3FD251E683435A0331BFC07A
|
||||
8D7C56FBFA8BDACE0968E7C151435633B13526CB17893C6FDBD8B17C6E0DEAED
|
||||
99A064FD3D23A3416A712542FA88888EEB1A1F7167C41BD0DE91E8F85BC05F22
|
||||
E02F09174E7CA4F4EA1583743C21421AAC159FDA521FEA1B2C6ED21EA92D8EF1
|
||||
370503A9502B3EB555AEA16D1C4C3C28B5A9A56D75C4BE46011B9097CFB5E253
|
||||
5BB12F523C8DA911BB35B64F12FA7A8C91D21FCF19A4665AF1A92DF5A1BE821C
|
||||
AEC6ED967E5833BED400DB1E12B09DF111D29060ED0F3187E2F50A511735DAB4
|
||||
419A20CEFB4AA4F452A8F6CF7910E530CE5F3BD309A9095ECF14C65CA797FFA1
|
||||
0C3F14E6958E3C34F6E367138536396A7D87827FF1A8741BB6CB156C79820FBE
|
||||
413AE3C58F94DED43BFEA00CDE0AE44BDCE62BB97E5C57F6481DF4C64F3820DD
|
||||
816DDDBC4FC5E5BF49AD8478D54F90FD579AFC34525AECB5293CD614B30DD2D7
|
||||
821DF611643349C0DFAA11FF599215233CD698337609321B2FD8DEDB02FE4AAD
|
||||
71326EBFF41091E65C1221AD16F0E7087CCD116C6F551873E63A7F368EF29B2C
|
||||
F0B5256CB93442DAEEC5479D0BF6DF47F08DAFC3866F902E2B387106E9296F7C
|
||||
30482D05DFA8D4E27F41D46B1D151F272CD32EE976156FFFA84DFCA9357EA434
|
||||
5BB0F1337E6C63BC703D3B7687D45CCF5A9562BAA0FBB10162B459880F6BC262
|
||||
F7062923506EA17A4DCCBF81727F2DB1878BF917FF1E1DB0FD12A921B6392AF0
|
||||
504EFD83C6364823580D5335DE61AA716ACC95B22F88F517F9C57AD28F565CB2
|
||||
1D9EF3DDC238896A9B0FD8FF807417D58CAA1A3213E73397EAE240FD2E19A476
|
||||
3C969BC5BE684B7157F74A9D6A233BAA15B1EF09150F8A3C2E23CE36F4A9B5CC
|
||||
B6F098C716B7BA3D621F13736D103A1C53CD77B4530EF2F78A4EFEDB98AF83CE
|
||||
AAEC494D4E6C1B4D3CFBABF1F420B22DCAF7144328A6B1B886BC21DEC0DAD8E8
|
||||
F78D680D87729D89F31E59437E1D496D6ABBDEABD1FEF64B8F514D8654A6D87F
|
||||
C23EA9978F8DEC977A0AF65FC67C629FF47888396B98CAEF4CBC4638EBC746A3
|
||||
79BB64D10F698C10EC7E281F272DD620DD4F7E8CE7AC3C87797303ADD3B8AF5B
|
||||
297EC61D903A531F7E6E6808F8ADA9BEA53CA0E4639CFB54CE530AE986EB2799
|
||||
E79629DEF88B7D787DDC3AC49AE93C8D8D6B84E7E8EFA828E916E4E18ADAF7E9
|
||||
9CC12035E2EB89E7F8F9F33ADC7F59CAE5B8C11B9BB176C3BFCF215DE4740E6D
|
||||
F249416E1B781DB5B436799A6C452D2FFC7B566DEB52659D437D7DF48918EA9C
|
||||
8EE79F10F2858BC99CE68D6B46FE37D9DBBC5AD4D9F3BC63D1BA5396E179EF58
|
||||
44826FF2FC05DC66CB7D7298C6F55DA0F5A158CF287EA1ACF32856215FA5E4B3
|
||||
E43764BB643FA44392A3B84E224ADB2A35C5B1A7D33A15C98164A7633A47F730
|
||||
543A9D4363D05834268D4D7E4C5884E98DA93C6E90EFD6A8D7BDD2DDD82EB686
|
||||
FCF70DD52E358D413144886333918F514ABCA2F8413EACF891FAFE0CD5311C27
|
||||
01E7FB3BAAABAF1E967E80E3BC48F7B7F8B5CB6A39087E3BD51BBF4806BC3EA0
|
||||
D82DC44F562FA963379739ABE3FCC989CF2B89F79FA6B66F316650FCF6974378
|
||||
1C4DE6639C53C5A1AF78DF80CFAF9438AC8E3B349612336F56D3636CF9A93F7F
|
||||
E7760635DD6BA7FA96E3D8FCC5031AFBA675E74DF049DF1AF04B82C127D93019
|
||||
F997FF79ADF257F715E49FECEF9E26D902AF2DBDB9846C4635C634E53EAEBF7A
|
||||
9AD7EB7EED8F6C59F01DBA1E4D36CFEDFA956AFE873E42BE12E0FEE825850792
|
||||
03C99BC95C969B898F7FC95FED4B3E4DBE5DCDFFD0F785F863BAD93A81AF8BBE
|
||||
09147F2817DE6C9DC3D777C94AFC11E32FC5C69BC55F9A1BC997EBD4C6E90BCC
|
||||
21AFABE7ED2FFEF2DAC81B7FB96D6DADF3FC83394FB48FBACEBF6AFBFE36EB8F
|
||||
DAD65F546BA9EB2FF17E5A30F597D6FA93F95180FA53F15BBDEA4FBFF537FAB0
|
||||
379655D5DF299C87A97AD6DFE2FA83FC867C57891F621CE5F187C52F8A21BCC6
|
||||
097DFDE1BBFE527273B41F9B53E2B749AFF597D737E5FAD4BBFE5462B73A8754
|
||||
5B7F624C21DD7CD7D7DFC8674C10F7766A4DE4A7B107A5F67EF0A1AE887C54CD
|
||||
8372AD06F9D4785D4B3FBA2F28E4FF447A16A627BEBF6771EA7E346F216E5DA8
|
||||
6B7C8507F5F9BAC4F777BE1EFFFB8F5F9B7EC1E2074B3AE087129F6342C50FC3
|
||||
33D0EF347E98F2614C2DF0C392FB6A8B5F87F2AEC7AFC7AFC7AFC7AFC7AFC7FF
|
||||
D6F0EB9AEA7AFD7DB3BA50277EDCCA33E050F5150279E85EB05EF61204DF1EFE
|
||||
CEF8F46F055F7E9735681EF4586F85C2835EEBBD6079D073BD190C0FBAAF77D1
|
||||
17141E94FBC361B6FF1AE34318F16382598FEB85AFD7B8DF757CBA87673448EF
|
||||
F36791764E97D0D697D17DCE70E2F3E70C2535E8B738D06F5642C5E7D8CA7BB4
|
||||
871167007B9F437ED7F467C27BB37E7F37130A3EBF6F5AC29F672CA8E13EDC42
|
||||
450E6A5D8482CFF5CDDFDFBD69FFA3FE9EBD8582AF3C7326996B78663550790E
|
||||
AE233E3D63062DEFA4D3FB11FEDEC1D0035FCBEF2C8577308A75C4BFCC6B8B9F
|
||||
69F95D8CEEF2E7CF80918E68D0FF31DEF63DBDF0D97BDD284F7E7F7B610DCFAA
|
||||
17F1FE0E938EFE27BCDBA2C49FA364E7640F8CE4DF221D53BDB3B099DEE7D733
|
||||
FE721E8A03C6DF48F63E9C5F1E787E8E0935FFD0FBF7640FFC1D03F6FE073D5B
|
||||
247D27EFC0DC849835C921FCF9576A80989F567BEE48BF69D2C8833EF93F781E
|
||||
F4AB3F82E341D7FA07B1D4F640BF570FF3FAB3FA1ADB97077B1D3D8F8F51C981
|
||||
7E8F5C86F35FF1FFBCDF7FFDFEFFF5FBFFD7EFFF5FBFFF7FFD7EF1F5F43FBBFF
|
||||
7FA10BF2CA3D50E906F65D67FBFF3B3DF2BE7B76379CBEE2843DE74AE1646C19
|
||||
E4DBE4FF0B908FBC8473FFFF14AB1BC67FE6807B661541A79985D061DA756833
|
||||
C5026D2667C3C88FAD60B254846DFFFF7F255542F74576B86FAE03EE9D6387BE
|
||||
2BEC7022D6094F2C2980D69373E1F60999D0614A06FC33DEA1EFFEFF28739A77
|
||||
F7450EE83CAF0CBA2C7042EFE54EC82F9175612D71C3436F5BA1D5A42C683E2E
|
||||
0DDA4D4A86648B93E942AFFDFF49E634EFAE0B2BE099D51EB866F154DB9B2E21
|
||||
BB12BACECA61F84D469B60E80759BAEDFF4FB675CFAC1B886F87C79739218963
|
||||
173AE46F450ED7722BA1CB9B66867FEBC804ECE70A79FF7FF2AD5368E7646B77
|
||||
CF2A8158B36CE749B96ED8145DC18EFF7CA694CD9F3E1753CBA1F12BD7A0E188
|
||||
0438F6750958CADCA1EDFF8F707BBF2C453BCF673C5C4875419CD9058FFEC106
|
||||
EB4F9631CC35C7EDD06DB6052EA73BE18BA432B865E4556830DC08DBA28BC0E9
|
||||
8690E74FFEDD76AA85F1D071FA75B86346215201AC3B51CAF0571FB5A1ED9BBD
|
||||
BA6FF4722248C3E2F9FC3DBAE8BFCDE42CE663C447BBD7F3D8F7EA633686BFF2
|
||||
4831C36E3A2605E79EC4E6DE688491E95FAFFDFF29B6907FB79C68667E4644B8
|
||||
F4597EA8089ABD9A02B78E4A627AA7B90F5997A9DFFEFFA8038A6B1D31B6D03C
|
||||
9B8F4B67F4AEA190612C8AB8CE74AE60B71A97C8FCDF8AFDF4DCFF3FCA58EAA1
|
||||
D8423A26EA38390566EDB042BB89D798CC15EC28A3236CFBFFA7E455B887AC37
|
||||
43E351895E4C22D237C93C35CF19DEFDFF3DC0F6FF2FB0B9DC472F96C0D6A822
|
||||
66E7857617DFFF1FEA6EFF7FB7C7E2F140057DD7B4FFFF7F01A96A53C9
|
||||
}
|
||||
end
|
||||
object popLastDirs: TPopupMenu
|
||||
Images = ImageList
|
||||
Alignment = paRight
|
||||
Left = 330
|
||||
Top = 64
|
||||
end
|
||||
end
|
||||
|
||||
@ -6,33 +6,43 @@ interface
|
||||
|
||||
uses
|
||||
Classes, SysUtils, Forms, Controls, Dialogs, StdCtrls, EditBtn, FileUtil,
|
||||
LazUTF8, LazFileUtils, LCLIntf, SynEdit, SynHighlighterHTML;
|
||||
LazUTF8, LazFileUtils, LCLIntf, Buttons, Menus, IniFiles,
|
||||
SynEdit, SynHighlighterHTML;
|
||||
|
||||
type
|
||||
|
||||
{ TMainForm }
|
||||
|
||||
TMainForm = class(TForm)
|
||||
btnCreateHTML: TButton;
|
||||
btnSave: TButton;
|
||||
btnShow: TButton;
|
||||
btnClose: TButton;
|
||||
bbtnClose: TBitBtn;
|
||||
bbtnCreateHTML: TBitBtn;
|
||||
bbtnSave: TBitBtn;
|
||||
bbtnShow: TBitBtn;
|
||||
cbDarkMode: TCheckBox;
|
||||
DirectoryEdit: TDirectoryEdit;
|
||||
ImageList: TImageList;
|
||||
popLastDirs: TPopupMenu;
|
||||
sbtnLastDirs: TSpeedButton;
|
||||
SynEdit: TSynEdit;
|
||||
SynHTMLSyn: TSynHTMLSyn;
|
||||
TaskDialog: TTaskDialog;
|
||||
procedure bbtnCloseClick(Sender: TObject);
|
||||
procedure bbtnCreateHTMLClick(Sender: TObject);
|
||||
procedure bbtnSaveClick(Sender: TObject);
|
||||
procedure bbtnShowClick(Sender: TObject);
|
||||
procedure cbDarkModeChange(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure DirectoryEditChange(Sender: TObject);
|
||||
procedure btnCreateHTMLClick(Sender: TObject);
|
||||
procedure btnSaveClick(Sender: TObject);
|
||||
procedure btnShowClick(Sender: TObject);
|
||||
procedure btnCloseClick(Sender: TObject);
|
||||
procedure DirectoryEditEditingDone(Sender: TObject);
|
||||
procedure FormClose(Sender: TObject; var CloseAction: TCloseAction);
|
||||
procedure FormCreate(Sender: TObject);
|
||||
procedure FormShow(Sender: TObject);
|
||||
procedure LastDirClick(Sender: TObject);
|
||||
procedure sbtnLastDirsClick(Sender: TObject);
|
||||
private
|
||||
fn: String;
|
||||
ImgDir: String;
|
||||
function GetDestFileName: String;
|
||||
Config: TIniFile;
|
||||
LastDirsMax: Integer;
|
||||
procedure InfoMsg(const AMsg: String);
|
||||
procedure ErrorMsg(const AMsg: String);
|
||||
public
|
||||
@ -48,29 +58,89 @@ implementation
|
||||
|
||||
{ TMainForm }
|
||||
|
||||
procedure TMainForm.FormShow(Sender: TObject);
|
||||
procedure TMainForm.FormCreate(Sender: TObject);
|
||||
var
|
||||
i: Integer;
|
||||
MenItem: TMenuItem;
|
||||
begin
|
||||
ImgDir := CleanAndExpandDirectory('../../images/general_purpose/');
|
||||
if DirectoryExists(ImgDir) then
|
||||
DirectoryEdit.Text := ImgDir
|
||||
else
|
||||
DirectoryEdit.Text := CleanAndExpandDirectory(GetCurrentDir);
|
||||
LastDirsMax := 9;
|
||||
for i := 0 to LastDirsMax do
|
||||
begin
|
||||
MenItem := TMenuItem.Create(popLastDirs);
|
||||
MenItem.OnClick := @LastDirClick;
|
||||
MenItem.ImageIndex := 6;
|
||||
popLastDirs.Items.Add(MenItem);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.FormShow(Sender: TObject);
|
||||
var
|
||||
i: Integer;
|
||||
begin
|
||||
Config := TIniFile.Create('IconTableConfig.ini');
|
||||
try
|
||||
Top := Config.ReadInteger('Position', 'Top', 100);
|
||||
Left := Config.ReadInteger('Position', 'Left', 100);
|
||||
Width := Config.ReadInteger('Position', 'Width', 100);
|
||||
Height := Config.ReadInteger('Position', 'Height', 100);
|
||||
WindowState := wsNormal;
|
||||
Application.ProcessMessages;
|
||||
WindowState := TWindowState(Config.ReadInteger('Position', 'WindowState', 0));
|
||||
|
||||
for i := 0 to LastDirsMax do
|
||||
begin
|
||||
popLastDirs.Items[i].Caption := Config.ReadString('LastDirs', 'LastDir' + i.ToString, '');
|
||||
popLastDirs.Items[i].Visible := popLastDirs.Items[i].Caption > '';
|
||||
end;
|
||||
|
||||
cbDarkMode.Checked := Config.ReadBool('Options', 'DarkMode', False);
|
||||
finally
|
||||
Config.Free;
|
||||
end;
|
||||
|
||||
if (popLastDirs.Items[0].Caption = '') and (DirectoryExists(CleanAndExpandDirectory('../../images/general_purpose/'))) then
|
||||
begin
|
||||
popLastDirs.Items[0].Caption := CleanAndExpandDirectory('../../images/general_purpose/');
|
||||
popLastDirs.Items[0].Visible := popLastDirs.Items[0].Caption > '';
|
||||
end;
|
||||
|
||||
if DirectoryExists(popLastDirs.Items[0].Caption) then
|
||||
DirectoryEdit.Directory := popLastDirs.Items[0].Caption;
|
||||
|
||||
sbtnLastDirs.Enabled := popLastDirs.Items[0].Caption > '';
|
||||
end;
|
||||
|
||||
procedure TMainForm.FormClose(Sender: TObject; var CloseAction: TCloseAction);
|
||||
var
|
||||
i: Integer;
|
||||
begin
|
||||
if WindowState = wsMinimized then
|
||||
WindowState := wsNormal;
|
||||
|
||||
Config := TIniFile.Create('IconTableConfig.ini');
|
||||
try
|
||||
Config.WriteInteger('Position', 'Top', RestoredTop);
|
||||
Config.WriteInteger('Position', 'Left', RestoredLeft);
|
||||
Config.WriteInteger('Position', 'Width', RestoredWidth);
|
||||
Config.WriteInteger('Position', 'Height', RestoredHeight);
|
||||
Config.WriteInteger('Position', 'WindowState', Integer(WindowState));
|
||||
|
||||
for i := 0 to LastDirsMax do
|
||||
Config.WriteString('LastDirs', 'LastDir' + i.ToString, popLastDirs.Items[i].Caption);
|
||||
|
||||
Config.WriteBool('Options', 'DarkMode', cbDarkMode.Checked);
|
||||
finally
|
||||
Config.Free;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.cbDarkModeChange(Sender: TObject);
|
||||
begin
|
||||
btnSave.Enabled := False;
|
||||
btnShow.Enabled := False;
|
||||
bbtnSave.Enabled := False;
|
||||
bbtnShow.Enabled := False;
|
||||
end;
|
||||
|
||||
procedure TMainForm.DirectoryEditChange(Sender: TObject);
|
||||
begin
|
||||
btnCreateHTML.Enabled := (DirectoryEdit.Text <> '') and DirectoryExists(DirectoryEdit.Text);
|
||||
if btnCreateHtml.Enabled then
|
||||
btnCreateHTML.SetFocus;
|
||||
end;
|
||||
|
||||
procedure TMainForm.btnCreateHTMLClick(Sender: TObject);
|
||||
procedure TMainForm.bbtnCreateHTMLClick(Sender: TObject);
|
||||
var
|
||||
AllFileList: TStringList;
|
||||
IcoFileList: TStringList;
|
||||
@ -90,7 +160,10 @@ var
|
||||
IconGroups: Integer = 0;
|
||||
BodyFontColor: String = ' color: #000000;';
|
||||
BodyBackColor: String = ' background-color: #ffffff;';
|
||||
InfoFontColor: String = ' color: #000000;';
|
||||
InfoBackColor: String = ' background-color: #ffffe0;';
|
||||
HoverFontColor: String = ' color: #ffffff;';
|
||||
HoverBackColor: String = ' background-color: #303030;';
|
||||
begin
|
||||
try
|
||||
AllFileList := TStringList.Create;
|
||||
@ -101,8 +174,6 @@ begin
|
||||
Screen.BeginWaitCursor;
|
||||
SynEdit.Lines.BeginUpdate;
|
||||
|
||||
ImgDir := CleanAndExpandDirectory(DirectoryEdit.Text);
|
||||
|
||||
FindAllFiles(AllFileList, ImgDir, '*.png', False);
|
||||
|
||||
if AllFileList.Count = 0 then
|
||||
@ -141,7 +212,10 @@ begin
|
||||
begin
|
||||
BodyFontColor := ' color: #ffffff;';
|
||||
BodyBackColor := ' background-color: #303030;';
|
||||
InfoFontColor := ' color: #ffffff;';
|
||||
InfoBackColor := ' background-color: #000000;';
|
||||
HoverFontColor := ' color: #000000;';
|
||||
HoverBackColor := ' background-color: #ffffff;';
|
||||
end;
|
||||
|
||||
SynEdit.Lines.Clear;
|
||||
@ -152,11 +226,12 @@ begin
|
||||
SynEdit.Lines.Add('<meta charset="UTF-8">');
|
||||
SynEdit.Lines.Add('<style media="all">');
|
||||
SynEdit.Lines.Add(' body {font-family: sans-serif; font-size: 16px; font-weight: 400; margin: 0 auto; padding: 30px 0px 80px 0px;' + BodyBackColor + BodyFontColor + '}');
|
||||
SynEdit.Lines.Add(' td.topleft {border-bottom: 5px solid #ddd; padding: 15px; text-align: left;' + InfoBackColor + '}');
|
||||
SynEdit.Lines.Add(' td.topcenter {border-bottom: 5px solid #ddd; padding: 15px; text-align: center;' + InfoBackColor + '}');
|
||||
SynEdit.Lines.Add(' table {border-collapse: collapse; margin-left: auto; margin-right: auto;}');
|
||||
SynEdit.Lines.Add(' tr:hover {' + HoverBackColor + HoverFontColor + '}');
|
||||
SynEdit.Lines.Add(' td {border-bottom: 1px solid #ddd; padding: 15px; text-align: left;}');
|
||||
SynEdit.Lines.Add(' .info_container {margin: 0 auto; width: 500px; box-shadow: 0px 0px 5px 3px rgba(192, 192, 192, 0.37); padding: 15px; margin-top: 30px;' + InfoBackColor + '}');
|
||||
SynEdit.Lines.Add(' td.topleft {border-bottom: 5px solid #ddd; padding: 15px; text-align: left;' + InfoBackColor + InfoFontColor + '}');
|
||||
SynEdit.Lines.Add(' td.topcenter {border-bottom: 5px solid #ddd; padding: 15px; text-align: center;' + InfoBackColor + InfoFontColor + '}');
|
||||
SynEdit.Lines.Add(' .info_container {margin: 0 auto; width: 500px; box-shadow: 0px 0px 5px 3px rgba(192, 192, 192, 0.37); padding: 15px; margin-top: 30px;' + InfoBackColor + InfoFontColor + '}');
|
||||
SynEdit.Lines.Add('</style>');
|
||||
SynEdit.Lines.Add('</head>');
|
||||
SynEdit.Lines.Add('<body>');
|
||||
@ -211,9 +286,9 @@ begin
|
||||
SynEdit.Lines.Add('</body>');
|
||||
SynEdit.Lines.Add('</html>');
|
||||
|
||||
btnSave.Enabled := True;
|
||||
btnSave.SetFocus;
|
||||
btnShow.Enabled := False;
|
||||
bbtnSave.Enabled := True;
|
||||
bbtnSave.SetFocus;
|
||||
bbtnShow.Enabled := False;
|
||||
finally
|
||||
AllFileList.Free;
|
||||
IcoFileList.Free;
|
||||
@ -225,35 +300,73 @@ begin
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.btnSaveClick(Sender: TObject);
|
||||
procedure TMainForm.bbtnSaveClick(Sender: TObject);
|
||||
begin
|
||||
fn := GetDestFileName;
|
||||
fn := ImgDir + 'IconTable.html';
|
||||
try
|
||||
SynEdit.Lines.SaveToFile(fn);
|
||||
InfoMsg('Saved as: ' + fn);
|
||||
btnShow.Enabled := True;
|
||||
btnShow.SetFocus;
|
||||
bbtnShow.Enabled := True;
|
||||
bbtnShow.SetFocus;
|
||||
except
|
||||
ErrorMsg('The file could not be saved as: ' + fn);
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.btnShowClick(Sender: TObject);
|
||||
procedure TMainForm.bbtnShowClick(Sender: TObject);
|
||||
begin
|
||||
fn := GetDestFileName;
|
||||
fn := ImgDir + 'IconTable.html';
|
||||
if FileExists(fn) then
|
||||
OpenURL(fn);
|
||||
btnClose.SetFocus;
|
||||
bbtnCreateHTML.SetFocus;
|
||||
end;
|
||||
|
||||
procedure TMainForm.btnCloseClick(Sender: TObject);
|
||||
procedure TMainForm.bbtnCloseClick(Sender: TObject);
|
||||
begin
|
||||
Close;
|
||||
end;
|
||||
|
||||
function TMainForm.GetDestFileName: String;
|
||||
procedure TMainForm.DirectoryEditEditingDone(Sender: TObject);
|
||||
var
|
||||
i: Integer;
|
||||
begin
|
||||
Result := AppendPathDelim(DirectoryEdit.Text) + 'IconTable.html';
|
||||
if DirectoryExists(DirectoryEdit.Directory) then
|
||||
begin
|
||||
ImgDir := CleanAndExpandDirectory(DirectoryEdit.Directory);
|
||||
bbtnCreateHTML.Enabled := True;
|
||||
|
||||
for i := 0 to LastDirsMax do
|
||||
if ImgDir = popLastDirs.Items[i].Caption then
|
||||
begin
|
||||
popLastDirs.Items[i].MenuIndex := 0;
|
||||
Exit;
|
||||
end;
|
||||
|
||||
popLastDirs.Items[LastDirsMax].Caption := ImgDir;
|
||||
popLastDirs.Items[LastDirsMax].MenuIndex := 0;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.DirectoryEditChange(Sender: TObject);
|
||||
begin
|
||||
bbtnCreateHTML.Enabled := DirectoryExists(DirectoryEdit.Directory);
|
||||
end;
|
||||
|
||||
procedure TMainForm.LastDirClick(Sender: TObject);
|
||||
begin
|
||||
if DirectoryExists(TMenuItem(Sender).Caption) then
|
||||
begin
|
||||
TMenuItem(Sender).MenuIndex := 0;
|
||||
DirectoryEdit.Directory := TMenuItem(Sender).Caption;
|
||||
end;
|
||||
end;
|
||||
|
||||
procedure TMainForm.sbtnLastDirsClick(Sender: TObject);
|
||||
var
|
||||
pt: TPoint;
|
||||
begin
|
||||
pt := sbtnLastDirs.ClientToScreen(Point(sbtnLastDirs.Width, sbtnLastDirs.Height));
|
||||
popLastDirs.PopUp(pt.X, pt.Y);
|
||||
end;
|
||||
|
||||
procedure TMainForm.InfoMsg(const AMsg: String);
|
||||
|
||||
Loading…
Reference in New Issue
Block a user