mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-10-25 12:41:31 +02:00
lcl: Standard Dialog Actions
git-svn-id: trunk@15112 -
This commit is contained in:
paul
parent
2c7ee0f8d9
commit
6abb9d2d98
@ -1,3 +1,9 @@
|
||||
This example shows current state of Standard actions in LCL
|
||||
|
||||
- v1: only Edit actions are implemented
|
||||
- v2: File action, dialog, action images
|
||||
|
||||
Example uses icons from this sets:
|
||||
|
||||
- Silk icon set 1.3 by Mark James (http://www.famfamfam.com/lab/icons/silk/)
|
||||
- Tango Icon Library (http://tango.freedesktop.org/Tango_Icon_Library)
|
||||
|
||||
@ -174,6 +174,18 @@ object Form1: TForm1
|
||||
Hint = 'Exit'
|
||||
ImageIndex = 8
|
||||
end
|
||||
object ColorSelect1: TColorSelect
|
||||
Category = 'Dialog'
|
||||
Caption = 'Select &Color...'
|
||||
Hint = 'Color Select'
|
||||
ImageIndex = 9
|
||||
end
|
||||
object FontEdit1: TFontEdit
|
||||
Category = 'Dialog'
|
||||
Caption = 'Select &Font...'
|
||||
Hint = 'Font Select'
|
||||
ImageIndex = 10
|
||||
end
|
||||
end
|
||||
object MainMenu1: TMainMenu
|
||||
Images = ImageList1
|
||||
@ -215,12 +227,21 @@ object Form1: TForm1
|
||||
Action = EditUndo1
|
||||
end
|
||||
end
|
||||
object MenuItem9: TMenuItem
|
||||
Caption = 'Dialogs'
|
||||
object MenuItem10: TMenuItem
|
||||
Action = ColorSelect1
|
||||
end
|
||||
object MenuItem12: TMenuItem
|
||||
Action = FontEdit1
|
||||
end
|
||||
end
|
||||
end
|
||||
object ImageList1: TImageList
|
||||
left = 242
|
||||
top = 32
|
||||
Bitmap = {
|
||||
4C69090000001000000010000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
4C690B0000001000000010000000FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF009A6B2731AA7E43A192601805FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00A87D4269CCB08BE0915D1409FFFFFF00FFFFFF00FFFF
|
||||
@ -508,7 +529,71 @@ object Form1: TForm1
|
||||
4FFF4C4C4CFF4A4A4AFF474747FF454545FF25679DFF3274A8FF3D7CAFFF4784
|
||||
B5FF4E8ABAFF3E7EADFF0C578FEAFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF001D639B1619609839145D9562105A
|
||||
92880D5890A4135C92FC0C578FED
|
||||
92880D5890A4135C92FC0C578FEDFFFFFF00FFFFFF00FFFFFF000DD8000304D0
|
||||
13540CD135AF15D255DA18D474F418D68CF113D8A2D40DDBB9A206E4D945FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF003AD5042220D009AF3AD7
|
||||
3DFF6AE67CFF88F3AAFF96F9C4FF97FBD3FF87F7DBFF68EFE0FF1AE7E5FA0AD5
|
||||
EB9805BBF412FFFFFF00FFFFFF00FFFFFF0065D800204CD50ECF74E158FFA1F6
|
||||
99FF9EFFA6FF7BFF9EFF70FFAEFF70FFC7FF7CFFE3FFA5FFFAFF98F4FBFF55D8
|
||||
F5FF0DB7F9B6008DFC11FFFFFF0080DE000677DA09B094E257FFBBF99DFF8AFF
|
||||
6EFF79FF76FF82FF97FF89FFB6FF87FFD1FF7EFFECFF6DFBFEFF76E8FFFF9BDF
|
||||
FCFF54BAFBFF0782F68EFFFFFF0096DF0052A0E138FFCBF697FFAEFF6CFFA4FF
|
||||
7AFF9DFF8DFF9BFFA3FFA4FFC4FFA2FFDFFF97FFF8FF85EFFFFF6ED3FFFF78C5
|
||||
FFFF92C5FCFF146EF4F60052F032B2E608ADC6EB67FFDDFF9BFFC5FF6FFFC3FF
|
||||
8CFFBEFFA1FFB9FFB3FFBDFFCFFFBDFFEEFFB0F8FFFF99DEFFFF7EC2FFFF63A3
|
||||
FFFF9EBDFFFF5983F8FF0336E28ACDEA0EDBE4F582FFE5FF6FFFE0FF79FFE0FF
|
||||
95FFDFFFAFFFDCFFC7FFDCFFE0FFD9FEFAFFC5E9FFFFA7CAFFFF87AAFFFF698B
|
||||
FFFF788EFFFF7386FBFF0822DDBEEAEC0EF4F9FA92FFFAFD64FFFAFD7BFFF9FD
|
||||
98FFFAFDB5FFFAFED3FFFAFEEFFFEFF3FFFFD0D5FFFFAFB3FFFF8D91FFFF6C6F
|
||||
FFFF6769FFFF8283FBFF090DD9DBF1DA0EF1FFF290FFFFE962FFFFE876FFFFE7
|
||||
93FFFFE7B0FFFFE6CAFFFFE5E5FFFCDEFDFFE1C6FFFFC2A6FFFFA184FFFF7E66
|
||||
FFFF7664FFFF887BF6FF1A08D5D8F5BF09D5FEDD80FFFFD16CFFFFC76BFFFFC7
|
||||
85FFFFC49EFFFFBDB3FFFFBFD0FFFFBFF1FFF4B0FFFFD696FFFFB679FFFF955E
|
||||
FFFF9977FFFF8265ECFF2A04D0B7FBA6009EFDBE60FFFFD09CFFFFA55BFFFFA2
|
||||
71FFFF9A84FFFF979BFFFF9FBFFFFF9FE0FFFE92FBFFE77CFFFFC966FFFFA84F
|
||||
FFFFBE95FDFF7240DDFF3600CC79FA82003EF87C0BFBFBB98EFFFF976AFFFF79
|
||||
5BFFFF716BFFFF7689FFFF7CADFFFF7BCDFFFF71EDFFF763FFFFD952FFFFCF7C
|
||||
FFFFB373ECFF5906CCEB4600CC22FFFFFF00F0560092F07744FFFCA692FFFF7B
|
||||
6FFFFF5158FFFF5A79FFFF5E9BFFFF5CBCFFFF57DAFFFF4CF7FFF17BFFFFD685
|
||||
F1FF9734CFFF6100C26FFFFFFF00FFFFFF00EB47000EE22A00AEE95240FFF885
|
||||
84FFFF969FFFFF7491FFFF609AFFFF60B7FFFF78D8FFFC92EFFFE871EAFFB632
|
||||
CCFF8900BD916D00CE05FFFFFF00FFFFFF00FFFFFF00E51E000CD3040085D404
|
||||
0CF1E14059FFEE6384FFF373A1FFF071B2FFE45AB6FFD236B4FFBE02B4E6AD00
|
||||
BA6E9700CC02FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D000
|
||||
072EC3001C7EBF0031B6BE0144D5BB005AD2B90072AEB8008A72C100AF21FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00D8874040D88B4385DA8E4994D989438FD8844090D884419AD373
|
||||
3A8ACC62320DC95B2E01FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00D7833E53E2A76CDEE9BC91FFE7BA8FFFE7B78BFFE2A471FBD67E
|
||||
42B6CB5C2F0AFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00D67D3B1CDD9656BAE3A973F2E1A873F5E1A471F7D3773E98CB5F
|
||||
3008FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00D4793C77E2A670F7DA8847ADD67E43A0E4AE82FFCF6D3A99FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00D1713822DE9B63E2DC965EDFCF693554CF693580E2A97CFFD16C3AA5FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00D06A
|
||||
3503D78042AADF9F6AF7CD663466C95D2F0ACC613388E1A679FFD57A44D2C24A
|
||||
2706FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00CF6A
|
||||
365CDF9D68F6DA8B52D1CB5F314EC7592E2ACD6737A0E1A67AFFD88653F2BF46
|
||||
250DFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00CC633215DB93
|
||||
5EEAE2A779FFD8834AD3CF6A3AB2CE6839B5D57A45D8E3A881FFD98656F9BE41
|
||||
231BFFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00CB5D3001D3743F9BE2A9
|
||||
7CFFCC663799FFFFFF00FFFFFF00FFFFFF00CC6337B1DFA077FFDA895AFFBB3E
|
||||
2222FFFFFF00FFFFFF00FFFFFF00FFFFFF00CA5C2F0ACB5F3044E1A475FFDA8C
|
||||
58ECC6522C3DFFFFFF00FFFFFF00BF452413C348277FDC966BFFDB8F60FFBD3F
|
||||
2154B6381E02FFFFFF00FFFFFF00FFFFFF00CE6838AEDA8F5DFEDB9060FFD783
|
||||
50EDC4502B8DBD422310BC3F222AC34D2BA2D07142EAD67E51FFD57C4DFFC655
|
||||
31BDB6391D31FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
|
||||
FF00FFFFFF00FFFFFF00FFFFFF00
|
||||
}
|
||||
end
|
||||
end
|
||||
|
||||
@ -50,39 +50,45 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+'leSaveAs'#11'FileSaveAs1'#8'Category'#6#4'File'#7'Caption'#6#11'Save &As...'
|
||||
+#4'Hint'#6#7'Save As'#10'ImageIndex'#2#7#0#0#9'TFileExit'#9'FileExit1'#8'Cat'
|
||||
+'egory'#6#4'File'#7'Caption'#6#5'E&xit'#4'Hint'#6#4'Exit'#10'ImageIndex'#2#8
|
||||
+#0#0#0#9'TMainMenu'#9'MainMenu1'#6'Images'#7#10'ImageList1'#4'left'#3#213#0#3
|
||||
+'top'#2' '#0#9'TMenuItem'#9'MenuItem8'#7'Caption'#6#4'File'#0#9'TMenuItem'#10
|
||||
+'MenuItem11'#6'Action'#7#9'FileOpen1'#0#0#9'TMenuItem'#10'MenuItem13'#6'Acti'
|
||||
+'on'#7#13'FileOpenWith1'#0#0#9'TMenuItem'#10'MenuItem16'#6'Action'#7#11'File'
|
||||
+'SaveAs1'#0#0#9'TMenuItem'#10'MenuItem17'#6'Action'#7#9'FileExit1'#0#0#0#9'T'
|
||||
+'MenuItem'#9'MenuItem1'#7'Caption'#6#4'Edit'#0#9'TMenuItem'#9'MenuItem2'#6'A'
|
||||
+'ction'#7#8'EditCut1'#0#0#9'TMenuItem'#9'MenuItem3'#6'Action'#7#9'EditCopy1'
|
||||
+#0#0#9'TMenuItem'#9'MenuItem4'#6'Action'#7#10'EditPaste1'#0#0#9'TMenuItem'#9
|
||||
+'MenuItem5'#6'Action'#7#14'EditSelectAll1'#0#0#9'TMenuItem'#9'MenuItem6'#6'A'
|
||||
+'ction'#7#11'EditDelete1'#0#0#9'TMenuItem'#9'MenuItem7'#6'Action'#7#9'EditUn'
|
||||
+'do1'#0#0#0#0#10'TImageList'#10'ImageList1'#4'left'#3#242#0#3'top'#2' '#6'Bi'
|
||||
+'tmap'#10#14'$'#0#0'Li'#9#0#0#0#16#0#0#0#16#0#0#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#154'k'
|
||||
+'''1'#170'~C'#161#146'`'#24#5#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
,#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#168'}Bi'#204
|
||||
+#176#139#224#145']'#20#9#255#255#255#0#255#255#255#0#255#255#255#0#146'`'#23
|
||||
+#6#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#170#129'Go'#214#189#159
|
||||
+#247#147'a'#25#16#255#255#255#0#255#255#255#0#150'f ,'#169#128'K'#203#255#255
|
||||
+#0#0#12'TColorSelect'#12'ColorSelect1'#8'Category'#6#6'Dialog'#7'Caption'#6
|
||||
+#16'Select &Color...'#4'Hint'#6#12'Color Select'#10'ImageIndex'#2#9#0#0#9'TF'
|
||||
+'ontEdit'#9'FontEdit1'#8'Category'#6#6'Dialog'#7'Caption'#6#15'Select &Font.'
|
||||
+'..'#4'Hint'#6#11'Font Select'#10'ImageIndex'#2#10#0#0#0#9'TMainMenu'#9'Main'
|
||||
+'Menu1'#6'Images'#7#10'ImageList1'#4'left'#3#213#0#3'top'#2' '#0#9'TMenuItem'
|
||||
+#9'MenuItem8'#7'Caption'#6#4'File'#0#9'TMenuItem'#10'MenuItem11'#6'Action'#7
|
||||
+#9'FileOpen1'#0#0#9'TMenuItem'#10'MenuItem13'#6'Action'#7#13'FileOpenWith1'#0
|
||||
+#0#9'TMenuItem'#10'MenuItem16'#6'Action'#7#11'FileSaveAs1'#0#0#9'TMenuItem'
|
||||
+#10'MenuItem17'#6'Action'#7#9'FileExit1'#0#0#0#9'TMenuItem'#9'MenuItem1'#7'C'
|
||||
+'aption'#6#4'Edit'#0#9'TMenuItem'#9'MenuItem2'#6'Action'#7#8'EditCut1'#0#0#9
|
||||
+'TMenuItem'#9'MenuItem3'#6'Action'#7#9'EditCopy1'#0#0#9'TMenuItem'#9'MenuIte'
|
||||
+'m4'#6'Action'#7#10'EditPaste1'#0#0#9'TMenuItem'#9'MenuItem5'#6'Action'#7#14
|
||||
+'EditSelectAll1'#0#0#9'TMenuItem'#9'MenuItem6'#6'Action'#7#11'EditDelete1'#0
|
||||
+#0#9'TMenuItem'#9'MenuItem7'#6'Action'#7#9'EditUndo1'#0#0#0#9'TMenuItem'#9'M'
|
||||
+'enuItem9'#7'Caption'#6#7'Dialogs'#0#9'TMenuItem'#10'MenuItem10'#6'Action'#7
|
||||
,#12'ColorSelect1'#0#0#9'TMenuItem'#10'MenuItem12'#6'Action'#7#9'FontEdit1'#0
|
||||
+#0#0#0#10'TImageList'#10'ImageList1'#4'left'#3#242#0#3'top'#2' '#6'Bitmap'#10
|
||||
+#14','#0#0'Li'#11#0#0#0#16#0#0#0#16#0#0#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#154'k''1'#170
|
||||
+'~C'#161#146'`'#24#5#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#168'}Bi'#204#176#139#224
|
||||
+#145']'#20#9#255#255#255#0#255#255#255#0#255#255#255#0#146'`'#23#6#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#172#131'Ku'#222#201#175#255#149'd'
|
||||
+#29#31#255#255#255#0#146'`'#23'&'#195#164'|'#235#181#144'c'#203#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#170#129'Go'#214#189#159#247#147'a'
|
||||
+#25#16#255#255#255#0#255#255#255#0#150'f ,'#169#128'K'#203#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#172#131'Ku'#222#201#175#255#149'd'#29#31
|
||||
+#255#255#255#0#146'`'#23'&'#195#164'|'#235#181#144'c'#203#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#175#135'P|'#231#213#193#255#149'e'#31'+'
|
||||
+#143'\'#18#27#197#167#131#231#213#188#157#225#181#147'db'#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#177#137'S'#132#238#223#206#255#151'f e'
|
||||
+#194#163'|'#218#233#216#197#253#169#130'N{'#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#179#140'W'#137#241#226#212#255#206#178#142
|
||||
+#244#245#235#224#255#166'J'#157#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#175#135'P|'#231#213#193#255#149'e'#31
|
||||
+'+'#143'\'#18#27#197#167#131#231#213#188#157#225#181#147'db'#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#177#137'S'#132#238#223#206#255#151'f '
|
||||
+'e'#194#163'|'#218#233#216#197#253#169#130'N{'#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#179#140'W'#137#241#226#212#255#206#178
|
||||
+#142#244#245#235#224#255#166'J'#157#255#255#255#0#255#255#255#0#255#255#255
|
||||
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#0#11#136#2#255#255#255#0#180#142'Z'#144#246#234#221#255#225#205
|
||||
+#180#255#177#141']'#191#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255
|
||||
+#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#3#13#140#31#27'&'
|
||||
@ -123,13 +129,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#255#255#255#0#203#134'U'#219#254#247#241#222#252#229#210#222#252#228#209#222
|
||||
+#251#226#204#222#249#221#196#222#234#195#157#255#230#191#150#255#228#187#146
|
||||
+#255#228#187#146#255#209#160'l'#245#208#158'm'#246#204#150'_'#218#196'yB~'
|
||||
+#178'g<'#9#255#255#255#0#203#134'T'#219#255#247#242#222#254#231#213#222#254
|
||||
,#178'g<'#9#255#255#255#0#203#134'T'#219#255#247#242#222#254#231#213#222#254
|
||||
+#231#213#222#253#229#209#222#250#224#202#222#229#190#150#255#255#255#254#255
|
||||
+#253#243#233#255#253#243#234#255#252#242#232#255#250#239#227#255#250#242#231
|
||||
+#255#234#187#136#255#207#133'U'#179#180'i='#12#203#133'S'#219#255#247#240#222
|
||||
+#255#231#213#222#253#231#214#222#253#230#212#222#252#228#208#222#228#187#147
|
||||
+#255#254#245#237#255#252#222#197#255#251#224#199#255#249#220#194#255#245#211
|
||||
,#180#255#254#249#243#255#250#226#196#255#236#193#147#255#195'}H'#147#202#132
|
||||
+#180#255#254#249#243#255#250#226#196#255#236#193#147#255#195'}H'#147#202#132
|
||||
+'R'#219#255#247#241#222#255#233#217#222#255#234#219#222#255#233#217#222#255
|
||||
+#231#215#222#228#187#146#255#254#246#240#255#252#226#205#255#252#227#205#255
|
||||
+#250#223#200#255#247#217#188#255#245#233#221#255#250#243#235#255#251#248#243
|
||||
@ -187,13 +193,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#182#182#255#182#182#182#255#182#182#182#255#181#181#181#255#181#181#181#255
|
||||
+#238#238#238#250'ZZZ'#132' c'#152#255'm'#179#223#255'P'#156#213#255'N'#152
|
||||
+#211#255'K'#148#209#255'L'#145#203#255'p'#142#167#255#241#241#241#255#233#233
|
||||
+#233#255#233#233#233#255#232#232#232#255#232#232#232#255#232#232#232#255#231
|
||||
,#233#255#233#233#233#255#232#232#232#255#232#232#232#255#232#232#232#255#231
|
||||
+#231#231#255#237#237#237#250'VVV'#132' c'#152#255'k'#177#222#255'M'#151#211
|
||||
+#255'K'#147#210#255'H'#143#208#255'J'#140#201#255'o'#139#165#255#241#241#241
|
||||
+#255#182#182#182#255#181#181#181#255#181#181#181#255#180#180#180#255#180#180
|
||||
+#180#255#180#180#180#255#237#237#237#250'SSS'#132' c'#152#255'i'#174#220#255
|
||||
+'J'#147#209#255'H'#143#208#255'F'#139#206#255'G'#136#199#255'l'#136#163#255
|
||||
,#240#240#240#255#232#232#232#255#232#232#232#255#231#231#231#255#231#231#231
|
||||
+#240#240#240#255#232#232#232#255#232#232#232#255#231#231#231#255#231#231#231
|
||||
+#255#231#231#231#255#231#231#231#255#237#237#237#250'OOO'#132' c'#152#255'h'
|
||||
+#171#220#255'H'#142#207#255'F'#139#206#255'C'#135#205#255'D'#132#198#255'h'
|
||||
+#133#161#255#240#240#240#255#180#180#180#255#180#180#180#255#180#180#180#255
|
||||
@ -251,13 +257,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#248#248#248#255#247#247#247#255#247#247#247#255#136#141#139#255#255#255#255
|
||||
+#0#255#255#255#0#133#138#136#255#249#249#249#255#219#195#173#255#220#196#174
|
||||
+#255#221#197#175#255#222#198#176#255#223#199#177#255#224#200#178#255#0#0#0
|
||||
+#255#247#247#247#255#249#249#249#255#248#248#248#255#247#247#247#255#136#141
|
||||
,#255#247#247#247#255#249#249#249#255#248#248#248#255#247#247#247#255#136#141
|
||||
+#139#255#255#255#255#0#255#255#255#0#133#138#136#254#248#248#248#255#248#248
|
||||
+#248#255#248#248#248#255#248#248#248#255#248#248#248#255#248#248#248#255#0#0
|
||||
+#0#255#248#248#248#255#0#0#0#255#248#248#248#255#248#248#248#255#248#248#248
|
||||
+#255#136#141#139#254#255#255#255#0#255#255#255#0#137#142#140#148#133#138#136
|
||||
+#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138
|
||||
,#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133
|
||||
+#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133#138#136#255#133
|
||||
+#138#136#255#133#138#136#255#138#143#141#148#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
@ -315,13 +321,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#0#5'y}'#17#0#160#196#255#173#243#251#255
|
||||
+'1'#225#246#255' '#227#250#255's'#236#250#255'o'#235#250#255'n'#232#247#255
|
||||
+'l'#232#247#248#20#161#188#212#20#163#193#213#5'y}'#28#0#0#0#0#0#0#0#0#0#0#0
|
||||
+#0#5'y}'#10#0#160#196#255#173#243#251#255'/'#224#246#255'2'#226#247#255')'
|
||||
,#0#5'y}'#10#0#160#196#255#173#243#251#255'/'#224#246#255'2'#226#247#255')'
|
||||
+#219#241#255'/'#224#245#255')'#219#241#255#22#205#227#255'6'#217#236#255'i'
|
||||
+#231#246#255'A'#206#227#254#19#163#193#228#5'y}2'#0#0#0#0#0#0#0#0#0#160#196
|
||||
+#255#173#243#251#255'/'#224#246#255'2'#226#248#255'2'#226#247#255'2'#226#247
|
||||
+#255'/'#224#245#255')'#219#241#255#29#210#232#255#29#210#232#255#29#210#232
|
||||
+#255'6'#217#236#255'@'#205#225#255#22#161#189#202#5'y}'#10#0#0#0#0#5'y~'#17#0
|
||||
,#160#196#255'y'#237#251#255'2'#226#248#255','#223#244#255#4#192#214#255#4#192
|
||||
+#160#196#255'y'#237#251#255'2'#226#248#255','#223#244#255#4#192#214#255#4#192
|
||||
+#214#255#4#192#214#255#29#210#232#255#29#210#232#255#29#210#232#255#11#200
|
||||
+#223#255'j'#229#243#255#27#171#197#248#21#160#188#203#0#0#0#0#0#0#0#0#5'y}'
|
||||
+#17#0#160#196#255'v'#237#251#255#4#195#218#255'v'#237#251#255'i'#234#249#255
|
||||
@ -379,13 +385,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#157#229#245#255#158#229#245#255#159#229#244#255#218#243#248#255'5'#148#218
|
||||
+#255#253#244#238#255#202#128'T'#249'6'#161#218#249#246#252#254#255#148#229
|
||||
+#248#255#147#229#248#255#147#229#248#255#145#229#248#255#147#219#233#255#147
|
||||
+#215#227#255#147#210#220#255#144#206#215#255#140#200#207#255#134#193#198#255
|
||||
,#215#227#255#147#210#220#255#144#206#215#255#140#200#207#255#134#193#198#255
|
||||
+#201#216#214#255'5'#148#218#255#197'tD'#232#202'S'#241'6'#154#218#248#242
|
||||
+#250#253#255#148#230#248#255#146#229#248#255#144#229#248#255#139#227#248#255
|
||||
+#134#226#247#255''#225#247#255'w'#222#246#255'l'#220#246#255'^'#217#244#255
|
||||
+'O'#213#243#255#204#242#251#255'5'#148#218#255#255#255#255#0#255#255#255#0'5'
|
||||
+#148#218#247#239#250#254#255#147#229#248#255#143#228#248#255#137#227#248#255
|
||||
,#130#225#247#255'z'#223#247#255'q'#222#246#255'g'#219#245#255'['#216#244#255
|
||||
+#130#225#247#255'z'#223#247#255'q'#222#246#255'g'#219#245#255'['#216#244#255
|
||||
+'M'#212#243#255'@'#209#242#255#202#242#251#255'5'#148#218#255#255#255#255#0
|
||||
+#255#255#255#0'3'#142#217#251#220#240#250#255#152#225#246#255#149#224#246#255
|
||||
+#146#223#246#255#142#222#245#255#137#220#245#255#133#218#244#255#128#217#244
|
||||
@ -443,13 +449,13 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#254#251#248#255#254#251#248#255#200#154'|'#255#199#152'y'#255#167'`1'#237
|
||||
+#186'j6'#143#185'i5'#181#184'i5'#238#183'h5'#255#181'h5'#255#180'g4'#255#178
|
||||
+'f4'#255#176'e3'#255#174'd3'#255#172'c2'#255#170'b2'#255#169'a2'#255#168'`1'
|
||||
+#255#167'`1'#254#166'`1'#241#168'a1'#196#255#255#255#0#255#255#255#0#255#255
|
||||
,#255#167'`1'#254#166'`1'#241#168'a1'#196#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0'm'#156
|
||||
+#212#137'j'#154#210#251'f'#151#207#238#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0'p'#158#214#219'm'#156#212#255#133
|
||||
,#177#218#255'Z'#145#185#255'`'#147#203#234#255#255#255#0#255#255#255#0#128
|
||||
+#177#218#255'Z'#145#185#255'`'#147#203#234#255#255#255#0#255#255#255#0#128
|
||||
+#128#128#255'~~~'#255'|||'#255'zzz'#255'www'#255'uuu'#255'rrr'#255'q'#158#212
|
||||
+#255'o'#158#214#255#135#178#220#255#171#211#232#255#169#208#230#255'X'#144
|
||||
+#184#255'Y'#142#198#234#255#255#255#0#255#255#255#0'}}}'#255#153#153#153#255
|
||||
@ -491,5 +497,100 @@ LazarusResources.Add('TForm1','FORMDATA',[
|
||||
+#255'>~'#173#255#12'W'#143#234#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#29'c'#155#22#25'`'#152'9'#20']'#149'b'#16'Z'#146#136#13'X'#144#164#19
|
||||
+'\'#146#252#12'W'#143#237#0#0#0
|
||||
+'\'#146#252#12'W'#143#237#255#255#255#0#255#255#255#0#255#255#255#0#13#216#0
|
||||
+#3#4#208#19'T'#12#209'5'#175#21#210'U'#218#24#212't'#244#24#214#140#241#19
|
||||
+#216#162#212#13#219#185#162#6#228#217'E'#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0':'#213#4'" '#208#9#175':'
|
||||
+#215'='#255'j'#230'|'#255#136#243#170#255#150#249#196#255#151#251#211#255#135
|
||||
+#247#219#255'h'#239#224#255#26#231#229#250#10#213#235#152#5#187#244#18#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0'e'#216#0' L'#213#14#207't'#225'X'#255
|
||||
+#161#246#153#255#158#255#166#255'{'#255#158#255'p'#255#174#255'p'#255#199#255
|
||||
+'|'#255#227#255#165#255#250#255#152#244#251#255'U'#216#245#255#13#183#249#182
|
||||
+#0#141#252#17#255#255#255#0#128#222#0#6'w'#218#9#176#148#226'W'#255#187#249
|
||||
+#157#255#138#255'n'#255'y'#255'v'#255#130#255#151#255#137#255#182#255#135#255
|
||||
+#209#255'~'#255#236#255'm'#251#254#255'v'#232#255#255#155#223#252#255'T'#186
|
||||
+#251#255#7#130#246#142#255#255#255#0#150#223#0'R'#160#225'8'#255#203#246#151
|
||||
+#255#174#255'l'#255#164#255'z'#255#157#255#141#255#155#255#163#255#164#255
|
||||
+#196#255#162#255#223#255#151#255#248#255#133#239#255#255'n'#211#255#255'x'
|
||||
+#197#255#255#146#197#252#255#20'n'#244#246#0'R'#240'2'#178#230#8#173#198#235
|
||||
,'g'#255#221#255#155#255#197#255'o'#255#195#255#140#255#190#255#161#255#185
|
||||
+#255#179#255#189#255#207#255#189#255#238#255#176#248#255#255#153#222#255#255
|
||||
+'~'#194#255#255'c'#163#255#255#158#189#255#255'Y'#131#248#255#3'6'#226#138
|
||||
+#205#234#14#219#228#245#130#255#229#255'o'#255#224#255'y'#255#224#255#149#255
|
||||
+#223#255#175#255#220#255#199#255#220#255#224#255#217#254#250#255#197#233#255
|
||||
+#255#167#202#255#255#135#170#255#255'i'#139#255#255'x'#142#255#255's'#134#251
|
||||
+#255#8'"'#221#190#234#236#14#244#249#250#146#255#250#253'd'#255#250#253'{'
|
||||
+#255#249#253#152#255#250#253#181#255#250#254#211#255#250#254#239#255#239#243
|
||||
+#255#255#208#213#255#255#175#179#255#255#141#145#255#255'lo'#255#255'gi'#255
|
||||
+#255#130#131#251#255#9#13#217#219#241#218#14#241#255#242#144#255#255#233'b'
|
||||
+#255#255#232'v'#255#255#231#147#255#255#231#176#255#255#230#202#255#255#229
|
||||
+#229#255#252#222#253#255#225#198#255#255#194#166#255#255#161#132#255#255'~f'
|
||||
+#255#255'vd'#255#255#136'{'#246#255#26#8#213#216#245#191#9#213#254#221#128
|
||||
+#255#255#209'l'#255#255#199'k'#255#255#199#133#255#255#196#158#255#255#189
|
||||
+#179#255#255#191#208#255#255#191#241#255#244#176#255#255#214#150#255#255#182
|
||||
+'y'#255#255#149'^'#255#255#153'w'#255#255#130'e'#236#255'*'#4#208#183#251#166
|
||||
+#0#158#253#190'`'#255#255#208#156#255#255#165'['#255#255#162'q'#255#255#154
|
||||
+#132#255#255#151#155#255#255#159#191#255#255#159#224#255#254#146#251#255#231
|
||||
+'|'#255#255#201'f'#255#255#168'O'#255#255#190#149#253#255'r@'#221#255'6'#0
|
||||
+#204'y'#250#130#0'>'#248'|'#11#251#251#185#142#255#255#151'j'#255#255'y['#255
|
||||
+#255'qk'#255#255'v'#137#255#255'|'#173#255#255'{'#205#255#255'q'#237#255#247
|
||||
+'c'#255#255#217'R'#255#255#207'|'#255#255#179's'#236#255'Y'#6#204#235'F'#0
|
||||
+#204'"'#255#255#255#0#240'V'#0#146#240'wD'#255#252#166#146#255#255'{o'#255
|
||||
+#255'QX'#255#255'Zy'#255#255'^'#155#255#255'\'#188#255#255'W'#218#255#255'L'
|
||||
+#247#255#241'{'#255#255#214#133#241#255#151'4'#207#255'a'#0#194'o'#255#255
|
||||
+#255#0#255#255#255#0#235'G'#0#14#226'*'#0#174#233'R@'#255#248#133#132#255#255
|
||||
+#150#159#255#255't'#145#255#255'`'#154#255#255'`'#183#255#255'x'#216#255#252
|
||||
+#146#239#255#232'q'#234#255#182'2'#204#255#137#0#189#145'm'#0#206#5#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#229#30#0#12#211#4#0#133#212#4#12#241#225
|
||||
+'@Y'#255#238'c'#132#255#243's'#161#255#240'q'#178#255#228'Z'#182#255#210'6'
|
||||
+#180#255#190#2#180#230#173#0#186'n'#151#0#204#2#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#208#0#7'.'#195#0#28
|
||||
+'~'#191#0'1'#182#190#1'D'#213#187#0'Z'#210#185#0'r'#174#184#0#138'r'#193#0
|
||||
+#175'!'#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#216
|
||||
+#135'@@'#216#139'C'#133#218#142'I'#148#217#137'C'#143#216#132'@'#144#216#132
|
||||
+'A'#154#211's:'#138#204'b2'#13#201'[.'#1#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#215#131'>S'
|
||||
+#226#167'l'#222#233#188#145#255#231#186#143#255#231#183#139#255#226#164'q'
|
||||
+#251#214'~B'#182#203'\/'#10#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#214'};'#28#221
|
||||
+#150'V'#186#227#169's'#242#225#168's'#245#225#164'q'#247#211'w>'#152#203'_0'
|
||||
+#8#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#212'y<w'#226#166'p'#247
|
||||
+#218#136'G'#173#214'~C'#160#228#174#130#255#207'm:'#153#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#209'q8"'#222#155'c'#226#220#150'^'#223#207'i5T'
|
||||
+#207'i5'#128#226#169'|'#255#209'l:'#165#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#208'j5'#3#215#128'B'#170#223#159'j'#247#205'f4f'#201']/'#10#204'a3'#136#225
|
||||
+#166'y'#255#213'zD'#210#194'J'''#6#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#207'j6\'#223#157'h'
|
||||
+#246#218#139'R'#209#203'_1N'#199'Y.*'#205'g7'#160#225#166'z'#255#216#134'S'
|
||||
+#242#191'F%'#13#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#204'c2'#21#219#147'^'#234#226#167'y'#255#216#131'J'
|
||||
+#211#207'j:'#178#206'h9'#181#213'zE'#216#227#168#129#255#217#134'V'#249#190
|
||||
+'A#'#27#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#203']0'#1#211't?'#155#226#169'|'#255#204'f7'#153#255#255#255#0#255#255#255#0
|
||||
,#255#255#255#0#204'c7'#177#223#160'w'#255#218#137'Z'#255#187'>""'#255#255#255
|
||||
+#0#255#255#255#0#255#255#255#0#255#255#255#0#202'\/'#10#203'_0D'#225#164'u'
|
||||
+#255#218#140'X'#236#198'R,='#255#255#255#0#255#255#255#0#191'E$'#19#195'H'''
|
||||
+#220#150'k'#255#219#143'`'#255#189'?!T'#182'8'#30#2#255#255#255#0#255#255#255
|
||||
+#0#255#255#255#0#206'h8'#174#218#143']'#254#219#144'`'#255#215#131'P'#237#196
|
||||
+'P+'#141#189'B#'#16#188'?"*'#195'M+'#162#208'qB'#234#214'~Q'#255#213'|M'#255
|
||||
+#198'U1'#189#182'9'#29'1'#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255
|
||||
+#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0
|
||||
+#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#255
|
||||
+#255#255#0#255#255#255#0#255#255#255#0#255#255#255#0#0#0#0
|
||||
]);
|
||||
|
||||
@ -14,6 +14,7 @@ type
|
||||
|
||||
TForm1 = class(TForm)
|
||||
ActionList1: TActionList;
|
||||
ColorSelect1: TColorSelect;
|
||||
Edit1: TEdit;
|
||||
EditCopy1: TEditCopy;
|
||||
EditCut1: TEditCut;
|
||||
@ -25,11 +26,14 @@ type
|
||||
FileOpen1: TFileOpen;
|
||||
FileOpenWith1: TFileOpenWith;
|
||||
FileSaveAs1: TFileSaveAs;
|
||||
FontEdit1: TFontEdit;
|
||||
ImageList1: TImageList;
|
||||
MainMenu1: TMainMenu;
|
||||
Memo1: TMemo;
|
||||
MenuItem1: TMenuItem;
|
||||
MenuItem10: TMenuItem;
|
||||
MenuItem11: TMenuItem;
|
||||
MenuItem12: TMenuItem;
|
||||
MenuItem13: TMenuItem;
|
||||
MenuItem16: TMenuItem;
|
||||
MenuItem17: TMenuItem;
|
||||
@ -40,6 +44,7 @@ type
|
||||
MenuItem6: TMenuItem;
|
||||
MenuItem7: TMenuItem;
|
||||
MenuItem8: TMenuItem;
|
||||
MenuItem9: TMenuItem;
|
||||
ToolBar1: TToolBar;
|
||||
ToolButton1: TToolButton;
|
||||
ToolButton2: TToolButton;
|
||||
|
||||
@ -391,10 +391,9 @@ type
|
||||
function GetDialog: TFontDialog;
|
||||
protected
|
||||
function GetDialogClass: TCommonDialogClass; override;
|
||||
public
|
||||
property Dialog: TFontDialog read GetDialog;
|
||||
published
|
||||
property Caption;
|
||||
property Dialog: TFontDialog read GetDialog;
|
||||
property Enabled;
|
||||
property HelpContext;
|
||||
property HelpKeyword;
|
||||
@ -418,10 +417,9 @@ type
|
||||
function GetDialog: TColorDialog;
|
||||
protected
|
||||
function GetDialogClass: TCommonDialogClass; override;
|
||||
public
|
||||
property Dialog: TColorDialog read GetDialog;
|
||||
published
|
||||
property Caption;
|
||||
property Dialog: TColorDialog read GetDialog;
|
||||
property Enabled;
|
||||
property HelpContext;
|
||||
property HelpKeyword;
|
||||
@ -687,7 +685,7 @@ end;
|
||||
function TCommonDialogAction.Handlestarget(Target: TObject): Boolean;
|
||||
begin
|
||||
// no target
|
||||
Result := True;
|
||||
Result := FDialog <> nil;
|
||||
end;
|
||||
|
||||
procedure TCommonDialogAction.ExecuteTarget(Target: TObject);
|
||||
@ -806,7 +804,7 @@ end;
|
||||
|
||||
function TFontEdit.GetDialogClass: TCommonDialogClass;
|
||||
begin
|
||||
Result:=inherited GetDialogClass;
|
||||
Result := TFontDialog;
|
||||
end;
|
||||
|
||||
{ TColorSelect }
|
||||
@ -818,7 +816,7 @@ end;
|
||||
|
||||
function TColorSelect.GetDialogClass: TCommonDialogClass;
|
||||
begin
|
||||
Result:=inherited GetDialogClass;
|
||||
Result := TColorDialog;
|
||||
end;
|
||||
|
||||
end.
|
||||
|
||||
Loading…
Reference in New Issue
Block a user