From c9e26ce99839c61b76e1daeceef412f7c2366a7d Mon Sep 17 00:00:00 2001 From: lazarus Date: Fri, 29 Dec 2000 13:14:05 +0000 Subject: [PATCH] Using the lresources.pp and registering components. This is a major change but will create much more flexibility for the IDE. Shane git-svn-id: trunk@78 - --- .gitattributes | 40 +- designer/lazarus_control_images.lrs | 760 +++++++++++ ide/compreg.pp | 244 ++++ ide/idecomp.pp | 1133 +++-------------- ide/lazres.pp | 83 ++ ide/lresources.pp | 291 +++++ ide/main.pp | 451 ++++--- images/laz_images.lrs | 1185 ++++++++++++++++++ images/newform.xpm | 168 --- images/newunit.xpm | 54 - images/openfile.xpm | 252 ---- images/save.xpm | 237 ---- images/saveall.xpm | 226 ---- images/{bitbtn.xpm => tbitbtn.xpm} | 0 images/{button.xpm => tbutton.xpm} | 0 images/{checkbox.xpm => tcheckbox.xpm} | 0 images/{combobox.xpm => tcombobox.xpm} | 0 images/{editbox.xpm => tedit.xpm} | 0 images/{label.xpm => tlabel.xpm} | 0 images/{listbox.xpm => tlistbox.xpm} | 0 images/{memo.xpm => tmemo.xpm} | 0 images/{menu.xpm => tmenu.xpm} | 0 images/tnotebook.xpm | 57 + images/toggleform.xpm | 210 ---- images/{popup.xpm => tpopupmenu.xpm} | 0 images/{radiobutton.xpm => tradiobutton.xpm} | 0 images/{speedbutton.xpm => tspeedbutton.xpm} | 0 images/{spinedit.xpm => tspinedit.xpm} | 0 images/viewforms.xpm | 212 ---- images/viewunits.xpm | 20 - lcl/controls.pp | 9 +- lcl/include/control.inc | 13 + lcl/include/wincontrol.inc | 22 + 33 files changed, 3069 insertions(+), 2598 deletions(-) create mode 100644 designer/lazarus_control_images.lrs create mode 100644 ide/compreg.pp create mode 100644 ide/lazres.pp create mode 100644 ide/lresources.pp create mode 100644 images/laz_images.lrs delete mode 100644 images/newform.xpm delete mode 100644 images/newunit.xpm delete mode 100644 images/openfile.xpm delete mode 100644 images/save.xpm delete mode 100644 images/saveall.xpm rename images/{bitbtn.xpm => tbitbtn.xpm} (100%) rename images/{button.xpm => tbutton.xpm} (100%) rename images/{checkbox.xpm => tcheckbox.xpm} (100%) rename images/{combobox.xpm => tcombobox.xpm} (100%) rename images/{editbox.xpm => tedit.xpm} (100%) rename images/{label.xpm => tlabel.xpm} (100%) rename images/{listbox.xpm => tlistbox.xpm} (100%) rename images/{memo.xpm => tmemo.xpm} (100%) rename images/{menu.xpm => tmenu.xpm} (100%) create mode 100644 images/tnotebook.xpm delete mode 100644 images/toggleform.xpm rename images/{popup.xpm => tpopupmenu.xpm} (100%) rename images/{radiobutton.xpm => tradiobutton.xpm} (100%) rename images/{speedbutton.xpm => tspeedbutton.xpm} (100%) rename images/{spinedit.xpm => tspinedit.xpm} (100%) delete mode 100644 images/viewforms.xpm delete mode 100644 images/viewunits.xpm diff --git a/.gitattributes b/.gitattributes index 21e28c7a27..55bdcf74f9 100644 --- a/.gitattributes +++ b/.gitattributes @@ -77,6 +77,7 @@ designer/customeditor.pp svneol=native#text/pascal designer/designer.pp svneol=native#text/pascal designer/designerwidget.pp svneol=native#text/pascal designer/filesystem.pp svneol=native#text/pascal +designer/lazarus_control_images.lrs svneol=native#text/pascal designer/objectinspector.pp svneol=native#text/pascal designer/propedits.pp svneol=native#text/pascal designer/test_obj_inspector.pp svneol=native#text/pascal @@ -107,6 +108,7 @@ examples/toolbar.pp svneol=native#text/pascal examples/trackbar.pp svneol=native#text/pascal ide/compiler.pp svneol=native#text/pascal ide/compileroptions.pp svneol=native#text/pascal +ide/compreg.pp svneol=native#text/pascal ide/customformeditor.pp svneol=native#text/pascal ide/dlgmessage.pp svneol=native#text/pascal ide/find_dlg.pp svneol=native#text/pascal @@ -118,6 +120,8 @@ ide/include/linux/lazconf.inc svneol=native#text/pascal ide/include/win32/lazconf.inc svneol=native#text/pascal ide/lazarus.pp svneol=native#text/pascal ide/lazconf.pp svneol=native#text/pascal +ide/lazres.pp svneol=native#text/pascal +ide/lresources.pp svneol=native#text/pascal ide/main.pp svneol=native#text/pascal ide/project.pp svneol=native#text/pascal ide/splash.pp svneol=native#text/pascal @@ -125,35 +129,29 @@ ide/testform.pp svneol=native#text/pascal ide/uniteditor.pp svneol=native#text/pascal ide/viewform_dlg.pp svneol=native#text/pascal ide/viewunit_dlg.pp svneol=native#text/pascal -images/bitbtn.xpm -text svneol=native#image/x-xpixmap -images/button.xpm -text svneol=native#image/x-xpixmap -images/checkbox.xpm -text svneol=native#image/x-xpixmap images/color.xpm -text svneol=native#image/x-xpixmap -images/combobox.xpm -text svneol=native#image/x-xpixmap images/default.xpm -text svneol=native#image/x-xpixmap -images/editbox.xpm -text svneol=native#image/x-xpixmap images/fonts.xpm -text svneol=native#image/x-xpixmap -images/label.xpm -text svneol=native#image/x-xpixmap +images/laz_images.lrs svneol=native#text/pascal images/lazarus.xpm -text svneol=native#image/x-xpixmap images/lazarus64.xpm -text svneol=native#image/x-xpixmap -images/listbox.xpm -text svneol=native#image/x-xpixmap -images/memo.xpm -text svneol=native#image/x-xpixmap -images/menu.xpm -text svneol=native#image/x-xpixmap images/mouse.xpm -text svneol=native#image/x-xpixmap -images/newform.xpm -text svneol=native#image/x-xpixmap -images/newunit.xpm -text svneol=native#image/x-xpixmap images/notebook.xpm -text svneol=native#image/x-xpixmap -images/openfile.xpm -text svneol=native#image/x-xpixmap images/penguin.xpm -text svneol=native#image/x-xpixmap -images/popup.xpm -text svneol=native#image/x-xpixmap -images/radiobutton.xpm -text svneol=native#image/x-xpixmap -images/save.xpm -text svneol=native#image/x-xpixmap -images/saveall.xpm -text svneol=native#image/x-xpixmap -images/speedbutton.xpm -text svneol=native#image/x-xpixmap -images/spinedit.xpm -text svneol=native#image/x-xpixmap -images/toggleform.xpm -text svneol=native#image/x-xpixmap -images/viewforms.xpm -text svneol=native#image/x-xpixmap -images/viewunits.xpm -text svneol=native#image/x-xpixmap +images/tbitbtn.xpm -text svneol=native#image/x-xpixmap +images/tbutton.xpm -text svneol=native#image/x-xpixmap +images/tcheckbox.xpm -text svneol=native#image/x-xpixmap +images/tcombobox.xpm -text svneol=native#image/x-xpixmap +images/tedit.xpm -text svneol=native#image/x-xpixmap +images/tlabel.xpm -text svneol=native#image/x-xpixmap +images/tlistbox.xpm -text svneol=native#image/x-xpixmap +images/tmemo.xpm -text svneol=native#image/x-xpixmap +images/tmenu.xpm -text svneol=native#image/x-xpixmap +images/tnotebook.xpm -text svneol=native#image/x-xpixmap +images/tpopupmenu.xpm -text svneol=native#image/x-xpixmap +images/tradiobutton.xpm -text svneol=native#image/x-xpixmap +images/tspeedbutton.xpm -text svneol=native#image/x-xpixmap +images/tspinedit.xpm -text svneol=native#image/x-xpixmap lcl/allunits.pp svneol=native#text/pascal lcl/buttons.pp svneol=native#text/pascal lcl/clipbrd.pp svneol=native#text/pascal diff --git a/designer/lazarus_control_images.lrs b/designer/lazarus_control_images.lrs new file mode 100644 index 0000000000..37675bc290 --- /dev/null +++ b/designer/lazarus_control_images.lrs @@ -0,0 +1,760 @@ + LazarusResources.Add('tbitbtn','XPM', + '/* XPM */'#10'static char * bitbtn_xpm[] = {'#10'"25 25 37 1",'#10'" '#9 + +'c None",'#10'".'#9'c #F8F8F8",'#10'"+'#9'c #FFFFFF",'#10'"@'#9'c #EFEFEF' + +'",'#10'"#'#9'c #F0F0F0",'#10'"$'#9'c #FCFCFC",'#10'"%'#9'c #030303",'#10 + +'"&'#9'c #BEBEBE",'#10'"*'#9'c #BFBFBF",'#10'"='#9'c #BABABA",'#10'"-'#9 + +'c #C1C1C1",'#10'";'#9'c #808080",'#10'">'#9'c #000000",'#10'",'#9'c #F4F' + +'4F4",'#10'"'''#9'c #007F00",'#10'")'#9'c #010101",'#10'"!'#9'c #C4C4C4",' + +#10'"~'#9'c #040404",'#10'"{'#9'c #B9B9B9",'#10'"]'#9'c #BBBBBB",'#10'"^' + +#9'c #C0C0C0",'#10'"/'#9'c #B8B8B8",'#10'"('#9'c #BCBCBC",'#10'"_'#9'c #F' + +'EFEFE",'#10'":'#9'c #7C7C7C",'#10'"<'#9'c #8B8B8B",'#10'"['#9'c #767676"' + +','#10'"}'#9'c #828282",'#10'"|'#9'c #878787",'#10'"1'#9'c #7A7A7A",'#10 + +'"2'#9'c #7F7F7F",'#10'"3'#9'c #888888",'#10'"4'#9'c #7D7D7D",'#10'"5'#9 + +'c #898989",'#10'"6'#9'c #020202",'#10'"7'#9'c #050505",'#10'"8'#9'c #C3C' + +'3C3",'#10'" ",'#10'" ",' + +#10'" ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" .+@++#+++++' + +'+++++$+% ",'#10'" +&&&&&&&&&&&*=*-*;> ",'#10'" ,&&&&''''&&))-&)!' + +')*;> ",'#10'" +&&&&''*&~&&)&){)*;> ",'#10'" .&&&''''&&>&&)&))-*;' + +'> ",'#10'" .''&]''&&&%&&)&)&)*;> ",'#10'" +''''''''&&&>{&)&)^)*;' + +'> ",'#10'" ,&''''/&&&&))(&)!)*;> ",'#10'" +&&&&&&&&&&&&&&&&;> ' + +'",'#10'" _:<[}|122222222345> ",'#10'" >6>7>)>>>>>>>>>>6>8 ",'#10 + +'" ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" "};'#10 + ); + LazarusResources.Add('tbutton','XPM', + '/* XPM */'#10'static char * button_xpm[] = {'#10'"25 25 50 1",'#10'" '#9 + +'c None",'#10'".'#9'c #F8F8F8",'#10'"+'#9'c #FFFFFF",'#10'"@'#9'c #EFEFEF' + +'",'#10'"#'#9'c #F0F0F0",'#10'"$'#9'c #FCFCFC",'#10'"%'#9'c #030303",'#10 + +'"&'#9'c #C1C1C1",'#10'"*'#9'c #BCBCBC",'#10'"='#9'c #BDBDBD",'#10'"-'#9 + +'c #C5C5C5",'#10'";'#9'c #BFBFBF",'#10'">'#9'c #BEBEBE",'#10'",'#9'c #BBB' + +'BBB",'#10'"'''#9'c #CCCCCC",'#10'")'#9'c #BABABA",'#10'"!'#9'c #808080",' + +#10'"~'#9'c #000000",'#10'"{'#9'c #F4F4F4",'#10'"]'#9'c #C8C8C8",'#10'"^' + +#9'c #C6C6C6",'#10'"/'#9'c #B8B8B8",'#10'"('#9'c #010101",'#10'"_'#9'c #C' + +'7C7C7",'#10'":'#9'c #C4C4C4",'#10'"<'#9'c #C0C0C0",'#10'"['#9'c #040404"' + +','#10'"}'#9'c #060606",'#10'"|'#9'c #050505",'#10'"1'#9'c #B9B9B9",'#10 + +'"2'#9'c #020202",'#10'"3'#9'c #C9C9C9",'#10'"4'#9'c #C3C3C3",'#10'"5'#9 + +'c #080808",'#10'"6'#9'c #070707",'#10'"7'#9'c #CACACA",'#10'"8'#9'c #B7B' + +'7B7",'#10'"9'#9'c #B6B6B6",'#10'"0'#9'c #CFCFCF",'#10'"a'#9'c #FEFEFE",' + +#10'"b'#9'c #7C7C7C",'#10'"c'#9'c #8B8B8B",'#10'"d'#9'c #767676",'#10'"e' + +#9'c #828282",'#10'"f'#9'c #878787",'#10'"g'#9'c #7A7A7A",'#10'"h'#9'c #7' + +'F7F7F",'#10'"i'#9'c #888888",'#10'"j'#9'c #7D7D7D",'#10'"k'#9'c #898989"' + +','#10'" ",'#10'" ",'#10 + +'" ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" .+@++#++++++++' + +'++$+% ",'#10'" +&*=-&; ;>,'';);&;!~ ",'#10'" {]>^/;(~&-~&~_:&;!~' + +' ",'#10'" +* <=~;<[>}/|=1&;!~ ",'#10'" .;-,&2<&~;2~-:<&;!~ ",' + +#10'" .;-,&2<;%3~]~->&;!~ ",'#10'" +* <=~;4~1~<5=<&;!~ ",'#10'" ' + +' {]>^/;(6/7|*~1:&;!~ ",'#10'" +&*=-&;*]8<^90)&;!~ ",'#10'" abcde' + +'fghhhhhhhhijk~ ",'#10'" ~2~|~(~~~~~~~~~~2~4 ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" "' + +','#10'" "};'#10 + ); + LazarusResources.Add('tcheckbox','XPM', + '/* XPM */'#10'static char * checkbox_xpm[] = {'#10'"25 25 42 1",'#10'" '#9 + +'c None",'#10'".'#9'c None",'#10'"+'#9'c #727272",'#10'"@'#9'c #7D7D7D",' + +#10'"#'#9'c #050505",'#10'"$'#9'c #000000",'#10'"%'#9'c #070707",'#10'"&' + +#9'c #030303",'#10'"*'#9'c #010101",'#10'"='#9'c #040404",'#10'"-'#9'c #B' + +'7B7B7",'#10'";'#9'c #FDFDFD",'#10'">'#9'c #FAFAFA",'#10'",'#9'c #FFFFFF"' + +','#10'"'''#9'c #FBFBFB",'#10'")'#9'c #BFBFBF",'#10'"!'#9'c #F5F5F5",'#10 + +'"~'#9'c #FCFCFC",'#10'"{'#9'c #B9B9B9",'#10'"]'#9'c #020202",'#10'"^'#9 + +'c #EDEDED",'#10'"/'#9'c #0D0D0D",'#10'"('#9'c #C4C4C4",'#10'"_'#9'c #F9F' + +'9F9",'#10'":'#9'c #0B0B0B",'#10'"<'#9'c #F8F8F8",'#10'"['#9'c #C1C1C1",' + +#10'"}'#9'c #C3C3C3",'#10'"|'#9'c #090909",'#10'"1'#9'c #0C0C0C",'#10'"2' + +#9'c #080808",'#10'"3'#9'c #F6F6F6",'#10'"4'#9'c #C5C5C5",'#10'"5'#9'c #0' + +'60606",'#10'"6'#9'c #BDBDBD",'#10'"7'#9'c #F7F7F7",'#10'"8'#9'c #C2C2C2"' + +','#10'"9'#9'c #C9C9C9",'#10'"0'#9'c #C7C7C7",'#10'"a'#9'c #BABABA",'#10 + +'"b'#9'c #B8B8B8",'#10'"c'#9'c #CACACA",'#10'".........................",' + +#10'".........................",'#10'".........................",'#10'"..' + +'.......................",'#10'".........................",'#10'"........' + +'.................",'#10'".........................",'#10'"......++++++++' + +'++++.......",'#10'"......@#$%$&$&*$=-;......",'#10'"......+$>,''>,,,;,);' + +'......",'#10'"......+=!$#,,~$$,{;......",'#10'"......+$,$$]^&$/'');.....' + +'.",'#10'"......+$_~$$:$],<[,......",'#10'"......+],;,&$|!~,.;......",'#10 + +'"......+$~,$=$$/,'');......",'#10'"......+1,$2$32$$''(;......",'#10'"...' + +'...+$,$$,,;$5,6;......",'#10'"......+],3,,;,,,7(;......",'#10'"......+$8' + +'960a)b6c};......",'#10'".......;;;;;;;;;;;;......",'#10'"...............' + +'..........",'#10'".........................",'#10'".....................' + +'....",'#10'".........................",'#10'"........................."}' + +';'#10 + ); + LazarusResources.Add('tcombobox','XPM', + '/* XPM */'#10'static char * combobox_xpm[] = {'#10'"20 20 167 2",'#10'" ' + +#9'c None",'#10'". '#9'c None",'#10'"+ '#9'c #000200",'#10'"@ '#9'c #1212' + +'12",'#10'"# '#9'c #000000",'#10'"$ '#9'c #040404",'#10'"% '#9'c #010103"' + +','#10'"& '#9'c #000002",'#10'"* '#9'c #FBF7FF",'#10'"= '#9'c #FFFAFF",' + +#10'"- '#9'c #F7F0FF",'#10'"; '#9'c #FFF7FF",'#10'"> '#9'c #F5ECFF",'#10 + +'", '#9'c #FFF6FF",'#10'"'' '#9'c #FCF5FF",'#10'") '#9'c #F7F1FF",'#10'"!' + +' '#9'c #FEFAFF",'#10'"~ '#9'c #FFFBFF",'#10'"{ '#9'c #FDFAFF",'#10'"] '#9 + +'c #000007",'#10'"^ '#9'c #FFFFFF",'#10'"/ '#9'c #FEFEFC",'#10'"( '#9'c #' + +'FFFFFA",'#10'"_ '#9'c #B9BBB0",'#10'": '#9'c #010300",'#10'"< '#9'c #070' + +'125",'#10'"[ '#9'c #0A032D",'#10'"} '#9'c #1A1245",'#10'"| '#9'c #0D043D' + +'",'#10'"1 '#9'c #130946",'#10'"2 '#9'c #0F063F",'#10'"3 '#9'c #160E3F",' + +#10'"4 '#9'c #160F38",'#10'"5 '#9'c #00001E",'#10'"6 '#9'c #120D2D",'#10 + +'"7 '#9'c #0C0821",'#10'"8 '#9'c #FFFCFF",'#10'"9 '#9'c #000009",'#10'"0 ' + +#9'c #FFFEFF",'#10'"a '#9'c #030301",'#10'"b '#9'c #000100",'#10'"c '#9'c' + +' #CCCEC3",'#10'"d '#9'c #FEFDFF",'#10'"e '#9'c #F6F4FF",'#10'"f '#9'c #F' + +'FFDFF",'#10'"g '#9'c #FBF8FF",'#10'"h '#9'c #FCF8FF",'#10'"i '#9'c #FAF6' + +'FF",'#10'"j '#9'c #FAF7FF",'#10'"k '#9'c #FEFCFF",'#10'"l '#9'c #010006"' + +','#10'"m '#9'c #7A7A7A",'#10'"n '#9'c #898989",'#10'"o '#9'c #BCBCBC",' + +#10'"p '#9'c #FAFBF3",'#10'"q '#9'c #FFFFFB",'#10'"r '#9'c #F2F3F7",'#10 + +'"s '#9'c #FEFFFF",'#10'"t '#9'c #FEFEFF",'#10'"u '#9'c #F4F2FD",'#10'"v ' + +#9'c #F6F5FA",'#10'"w '#9'c #C0C1C3",'#10'"x '#9'c #C1C2C6",'#10'"y '#9'c' + +' #B8B7BC",'#10'"z '#9'c #C6C5CB",'#10'"A '#9'c #020500",'#10'"B '#9'c #0' + +'00102",'#10'"C '#9'c #000005",'#10'"D '#9'c #040612",'#10'"E '#9'c #0000' + +'0B",'#10'"F '#9'c #000104",'#10'"G '#9'c #000207",'#10'"H '#9'c #F6FAF9"' + +','#10'"I '#9'c #FBFFFF",'#10'"J '#9'c #FBFEFF",'#10'"K '#9'c #ECEEFF",' + +#10'"L '#9'c #FBFDFF",'#10'"M '#9'c #FAFEFF",'#10'"N '#9'c #FAFDFF",'#10 + +'"O '#9'c #F9FBFF",'#10'"P '#9'c #FCFFFF",'#10'"Q '#9'c #000106",'#10'"R ' + +#9'c #FCFEFF",'#10'"S '#9'c #F4F6FF",'#10'"T '#9'c #0A0D2E",'#10'"U '#9'c' + +' #03052E",'#10'"V '#9'c #090A36",'#10'"W '#9'c #0C0B33",'#10'"X '#9'c #0' + +'C0A39",'#10'"Y '#9'c #0A0A3C",'#10'"Z '#9'c #0C0940",'#10'"` '#9'c #0A0A' + +'3E",'#10'" .'#9'c #0A0B39",'#10'"..'#9'c #0A0D30",'#10'"+.'#9'c #101227"' + +','#10'"@.'#9'c #F6FAFF",'#10'"#.'#9'c #050801",'#10'"$.'#9'c #000010",' + +#10'"%.'#9'c #F5F6FF",'#10'"&.'#9'c #F6F8FF",'#10'"*.'#9'c #F8F8FF",'#10 + +'"=.'#9'c #F5F4FF",'#10'"-.'#9'c #F8F5FF",'#10'";.'#9'c #F8F4FF",'#10'">.' + +#9'c #F8F3FF",'#10'",.'#9'c #F7F3FF",'#10'"''.'#9'c #F8F2FF",'#10'").'#9 + +'c #F8F7FF",'#10'"!.'#9'c #F6F9FF",'#10'"~.'#9'c #00001C",'#10'"{.'#9'c #' + +'8C000B",'#10'"].'#9'c #F9F6FF",'#10'"^.'#9'c #FBFBFF",'#10'"/.'#9'c #000' + +'013",'#10'"(.'#9'c #000020",'#10'"_.'#9'c #000022",'#10'":.'#9'c #F3F2FF' + +'",'#10'"<.'#9'c #F4F4FF",'#10'"[.'#9'c #F4F5FF",'#10'"}.'#9'c #F5F5FF",' + +#10'"|.'#9'c #F7F6FF",'#10'"1.'#9'c #F6F5FF",'#10'"2.'#9'c #000026",'#10 + +'"3.'#9'c #00001F",'#10'"4.'#9'c #000015",'#10'"5.'#9'c #F9FCFF",'#10'"6.' + +#9'c #F5F7FF",'#10'"7.'#9'c #F8FBFF",'#10'"8.'#9'c #F8FDFF",'#10'"9.'#9'c' + +' #000107",'#10'"0.'#9'c #111521",'#10'"a.'#9'c #F0F5FF",'#10'"b.'#9'c #E' + +'FF2FF",'#10'"c.'#9'c #F7F9FF",'#10'"d.'#9'c #F7FAFF",'#10'"e.'#9'c #F7F8' + +'FF",'#10'"f.'#9'c #F7F7FF",'#10'"g.'#9'c #F8FAFF",'#10'"h.'#9'c #F3F7FF"' + +','#10'"i.'#9'c #F6FBFF",'#10'"j.'#9'c #000300",'#10'"k.'#9'c #090D2A",' + +#10'"l.'#9'c #05072D",'#10'"m.'#9'c #0B0E3B",'#10'"n.'#9'c #080740",'#10 + +'"o.'#9'c #080647",'#10'"p.'#9'c #07064A",'#10'"q.'#9'c #07064C",'#10'"r.' + +#9'c #07054E",'#10'"s.'#9'c #070745",'#10'"t.'#9'c #08083A",'#10'"u.'#9'c' + +' #F5FAFF",'#10'"v.'#9'c #EFF4FA",'#10'"w.'#9'c #000602",'#10'"x.'#9'c #F' + +'3F4FF",'#10'"y.'#9'c #FCF9FF",'#10'"z.'#9'c #FBF9FF",'#10'"A.'#9'c #FBFA' + +'FF",'#10'"B.'#9'c #FBFCFF",'#10'"C.'#9'c #080C0F",'#10'"D.'#9'c #0B0B0D"' + +','#10'"E.'#9'c #01000E",'#10'"F.'#9'c #050414",'#10'"G.'#9'c #00000E",' + +#10'"H.'#9'c #00000C",'#10'"I.'#9'c #00010E",'#10'"J.'#9'c #040613",'#10 + +'". . . . . . . . . . . . . . . . . . . . ",'#10'"+ + + + + + + + + + + +' + +' + + @ # $ # % & ",'#10'"+ * = - ; ; > , '' ) = ! ~ { ] ^ / ( _ : ",'#10 + +'"+ ~ < [ } | 1 2 3 4 5 6 7 8 9 0 a b c + ",'#10'"+ d e f g * h ! i ! 8 j' + +' f k l ^ m n o # ",'#10'"+ p q ^ r s t t f u 0 s v s & w x y z ] ",'#10 + +'"+ + A b B C D E C & b b b b B F G C ] ] ",'#10'". . + H I J K L L L L M' + +' L N N M O P s & ",'#10'". . Q R S T U V W W X Y Z ` ...+.@.P #.",'#10 + +'". . $.%.O &.*.=.-.;.>.,.''.,.;.).O L !.b ",'#10'". . ~.O ).{.{.{.{.{.{.' + +'{.{.{.{.{.].*.^./.",'#10'". . (.{.{.{.{.{.{.{.{.{.{.{.{.{.{.{.{.(.",'#10 + +'". . _.{.{.:.:.<.[.[.}.S %.%.%.|.1.{.{.2.",'#10'". . 3.{.{.{.{.{.{.{.{.{' + +'.{.{.{.{.{.{.{.~.",'#10'". . 4.5.6.{.{.{.{.{.{.{.{.{.{.{.7.8.5.9.",'#10 + +'". . 0.a.5.7.b.c.d.d.c.e.f.f.e.g.h.i.I j.",'#10'". . C I L k.l.m.n.o.p.q' + +'.r.q.s.t...u.v.w.",'#10'". . b 5.c.J L x.y.h g g z.z.A.5.B.N I C.",'#10 + +'". . # D.C 9 E.F.G.H.E 9 ] ] 9 9 I.H.J.E ",'#10'". . . . . . . . . . . .' + +' . . . . . . . . "};'#10 + ); + LazarusResources.Add('tedit','XPM', + '/* XPM */'#10'static char * editbox_xpm[] = {'#10'"25 25 158 2",'#10'" ' + +#9'c None",'#10'". '#9'c None",'#10'"+ '#9'c #929292",'#10'"@ '#9'c #7474' + +'74",'#10'"# '#9'c #818181",'#10'"$ '#9'c #7C7C7C",'#10'"% '#9'c #7D7D7D"' + +','#10'"& '#9'c #777777",'#10'"* '#9'c #7E7E7E",'#10'"= '#9'c #878787",' + +#10'"- '#9'c #888888",'#10'"; '#9'c #7A7A7A",'#10'"> '#9'c #858585",'#10 + +'", '#9'c #7B7B7B",'#10'"'' '#9'c #8A8A8A",'#10'") '#9'c #868686",'#10'"!' + +' '#9'c #787878",'#10'"~ '#9'c #727272",'#10'"{ '#9'c #0B0B0B",'#10'"] '#9 + +'c #000000",'#10'"^ '#9'c #030303",'#10'"/ '#9'c #050505",'#10'"( '#9'c #' + +'0A0A0A",'#10'"_ '#9'c #040404",'#10'": '#9'c #FFFFFF",'#10'"< '#9'c #F9F' + +'9F9",'#10'"[ '#9'c #FCFCFC",'#10'"} '#9'c #FDFDFD",'#10'"| '#9'c #BEBEBE' + +'",'#10'"1 '#9'c #FFFDFF",'#10'"2 '#9'c #FEFEFE",'#10'"3 '#9'c #FDFFFE",' + +#10'"4 '#9'c #FDFEFF",'#10'"5 '#9'c #FDFDFF",'#10'"6 '#9'c #FDFBFF",'#10 + +'"7 '#9'c #FEFCFF",'#10'"8 '#9'c #FEFEFF",'#10'"9 '#9'c #FFFFFD",'#10'"0 ' + +#9'c #010000",'#10'"a '#9'c #FFFEFF",'#10'"b '#9'c #020202",'#10'"c '#9'c' + +' #C2C2C2",'#10'"d '#9'c #020003",'#10'"e '#9'c #FFFAFF",'#10'"f '#9'c #F' + +'EFCFD",'#10'"g '#9'c #FBFBFB",'#10'"h '#9'c #FEFFFF",'#10'"i '#9'c #FCFF' + +'FF",'#10'"j '#9'c #F8F8FF",'#10'"k '#9'c #AA4747",'#10'"l '#9'c #FCFDFF"' + +','#10'"m '#9'c #FEFFFD",'#10'"n '#9'c #FAFBF3",'#10'"o '#9'c #FFFFFA",' + +#10'"p '#9'c #030004",'#10'"q '#9'c #010103",'#10'"r '#9'c #FFFBFF",'#10 + +'"s '#9'c #FBFAFF",'#10'"t '#9'c #F6F9FF",'#10'"u '#9'c #FBFEFF",'#10'"v ' + +#9'c #F9FAFF",'#10'"w '#9'c #FBF9FF",'#10'"x '#9'c #F6F8FF",'#10'"y '#9'c' + +' #FCFBF6",'#10'"z '#9'c #FAF5F9",'#10'"A '#9'c #020005",'#10'"B '#9'c #E' + +'EECF9",'#10'"C '#9'c #FEFDFF",'#10'"D '#9'c #F8FBFF",'#10'"E '#9'c #F2F2' + +'FF",'#10'"F '#9'c #F4F6FF",'#10'"G '#9'c #000004",'#10'"H '#9'c #F5F5FD"' + +','#10'"I '#9'c #FCFBFF",'#10'"J '#9'c #F1EFFF",'#10'"K '#9'c #F5F1FF",' + +#10'"L '#9'c #F5F7FF",'#10'"M '#9'c #F8F2FF",'#10'"N '#9'c #000002",'#10 + +'"O '#9'c #000105",'#10'"P '#9'c #F7FBFF",'#10'"Q '#9'c #F4F3FF",'#10'"R ' + +#9'c #F1F4FF",'#10'"S '#9'c #F5F3FF",'#10'"T '#9'c #F9FBFF",'#10'"U '#9'c' + +' #F2F5FF",'#10'"V '#9'c #060A0B",'#10'"W '#9'c #000103",'#10'"X '#9'c #F' + +'BFFFF",'#10'"Y '#9'c #F4F8FF",'#10'"Z '#9'c #F3EFFF",'#10'"` '#9'c #F3F6' + +'FF",'#10'" .'#9'c #F5F2FF",'#10'"..'#9'c #F8FAFF",'#10'"+.'#9'c #F0F6FF"' + +','#10'"@.'#9'c #000202",'#10'"#.'#9'c #F9FEFF",'#10'"$.'#9'c #F8F1FF",' + +#10'"%.'#9'c #F1F1FF",'#10'"&.'#9'c #F7F1FF",'#10'"*.'#9'c #F7F9FF",'#10 + +'"=.'#9'c #010602",'#10'"-.'#9'c #000201",'#10'";.'#9'c #FAFAFF",'#10'">.' + +#9'c #F7F6FF",'#10'",.'#9'c #F5FBF9",'#10'"''.'#9'c #000300",'#10'").'#9 + +'c #050503",'#10'"!.'#9'c #FEFFFB",'#10'"~.'#9'c #FCFCFF",'#10'"{.'#9'c #' + +'FBFDFF",'#10'"].'#9'c #FBFCFF",'#10'"^.'#9'c #F5F8FF",'#10'"/.'#9'c #000' + +'200",'#10'"(.'#9'c #FEFFF4",'#10'"_.'#9'c #010200",'#10'":.'#9'c #C5C5C5' + +'",'#10'"<.'#9'c #F8F8F8",'#10'"[.'#9'c #8D8D8D",'#10'"}.'#9'c #FDFEF9",' + +#10'"|.'#9'c #FCFEF9",'#10'"1.'#9'c #FDFDFB",'#10'"2.'#9'c #FCFEFD",'#10 + +'"3.'#9'c #FCFEFB",'#10'"4.'#9'c #FCFFF2",'#10'"5.'#9'c #FCFFF4",'#10'"6.' + +#9'c #F9FAFE",'#10'"7.'#9'c #FCFFF6",'#10'"8.'#9'c #FFFFF3",'#10'"9.'#9'c' + +' #FEFFF5",'#10'"0.'#9'c #FFFFFB",'#10'"a.'#9'c #BCBCBC",'#10'"b.'#9'c #C' + +'2C2C0",'#10'"c.'#9'c #C3C0C7",'#10'"d.'#9'c #C2C1C6",'#10'"e.'#9'c #C2C0' + +'CB",'#10'"f.'#9'c #C2BFD0",'#10'"g.'#9'c #C3C1CE",'#10'"h.'#9'c #BEBFBA"' + +','#10'"i.'#9'c #C9CBC0",'#10'"j.'#9'c #BBBCB7",'#10'"k.'#9'c #BEBEBC",' + +#10'"l.'#9'c #B9B8B4",'#10'"m.'#9'c #C2C3BE",'#10'"n.'#9'c #B7B7B5",'#10 + +'"o.'#9'c #CACACA",'#10'"p.'#9'c #B5B5B5",'#10'"q.'#9'c #BBBBBB",'#10'"r.' + +#9'c #FAFAFC",'#10'"s.'#9'c #FDFAFF",'#10'"t.'#9'c #FDFCFA",'#10'"u.'#9'c' + +' #FDFBFC",'#10'"v.'#9'c #FDF9FF",'#10'"w.'#9'c #FCF8FF",'#10'"x.'#9'c #F' + +'EFDF9",'#10'"y.'#9'c #F8F8F0",'#10'"z.'#9'c #FFFEFC",'#10'"A.'#9'c #FAF7' + +'FE",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . ' + +'. . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . ' + +'. . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . ' + +'. . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . ' + +'. . ",'#10'". . + @ # # # # # # # # $ $ % & * = - ; > , '' ) ! ",'#10'".' + +' . ~ { ] ] ] ] ] ] ] ] ^ / ] ( ] ] ] ^ ] _ ] ] : ",'#10'". . # ] : : : :' + +' : : : : : < : [ : [ : } [ : : | : ",'#10'". . # ] 1 1 2 2 2 3 4 5 6 7 8' + +' < 9 ] 0 a b ] } c : ",'#10'". . * d e 1 f g h i i j k k l m n o a p a :' + +' : : ",'#10'". . * q 1 r 1 s l t u v k k w x 9 y z A a : : : ",'#10 + +'". . * q a B C k k k D E k k k k F h a G : : : : ",'#10'". . * q H l I' + +' J K k k L k k M k k t i N : : : : ",'#10'". . * O i P Q k k k k R k k' + +' S k k T U V h : : : ",'#10'". . * W X Y k k Z k k ` k k .k k ..+.@.h' + +' : : : ",'#10'". . * W u #.k k $.k k %.k k &.k k *.X =.h : : : ",'#10 + +'". . * -.i P ;.k k k k j k k k k >.u ,.''.m : : : ",'#10'". . @ ).!.i ' + +'i l ~.{.X X T ].{.^.i /.''.(._.] } :.<.",'#10'". . [.] }.|.1.2.l 3.4.5.h' + +' 6.!.7.(.4.8.9.0.<.: a.: ",'#10'". . '' ] b.c c.d.b.b.d.e.f.g.h.i.j.k.l.' + +'m.n.o.p.q.: ",'#10'". . $ r.s.s.s.6 t.u.s.v.w.s.x.y.z.a 1 A.: : : : } ",' + +#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . ' + +'. . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . ' + +'. . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . ' + +'. . . . . . "};'#10 + ); + LazarusResources.Add('tlabel','XPM', + '/* XPM */'#10'static char * label_xpm[] = {'#10'"25 25 37 1",'#10'" '#9'c' + +' None",'#10'". '#9'c #C8C8C8",'#10'"+'#9'c #000000",'#10'"@'#9'c #030303' + +'",'#10'"#'#9'c #060606",'#10'"$'#9'c #888888",'#10'"%'#9'c #010101",'#10 + +'"&'#9'c #050505",'#10'"*'#9'c #020202",'#10'"='#9'c #7E7E7E",'#10'"-'#9 + +'c #828282",'#10'";'#9'c #0A0A0A",'#10'">'#9'c #BFBFBF",'#10'",'#9'c #C5C' + +'5C5",'#10'"'''#9'c #C4C4C4",'#10'")'#9'c #8F8F8F",'#10'"!'#9'c #7B7B7B",' + +#10'"~'#9'c #838383",'#10'"{'#9'c #C9C9C9",'#10'"]'#9'c #B3B3B3",'#10'"^' + +#9'c #808080",'#10'"/'#9'c #BDBDBD",'#10'"('#9'c #BABABA",'#10'"_'#9'c #C' + +'ECECE",'#10'":'#9'c #7C7C7C",'#10'"<'#9'c #7F7F7F",'#10'"['#9'c #090909"' + +','#10'"}'#9'c #080808",'#10'"|'#9'c #7D7D7D",'#10'"1'#9'c #040404",'#10 + +'"2'#9'c #868686",'#10'"3'#9'c #8B8B8B",'#10'"4'#9'c #CACACA",'#10'"5'#9 + +'c #CFCFCF",'#10'"6'#9'c #0F0F0F",'#10'"7'#9'c #898989",'#10'"8'#9'c #CDC' + +'DCD",'#10'" ",'#10'" ",' + +#10'" ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" +@#+$ ",'#10'" +%+' + +'+ ",'#10'" +%&+*= ",'#10'" -;%>+%* ' + +' ",'#10'" ,%+='')++! ",'#10'" ~++{>]%+% ' + +'",'#10'" #%^/(_:+&< ",'#10'" {:+[+++++}++ ",'#10 + +'" %% |1+^ ",'#10'" 21+ +[+ ",'#10'" ' + +' ++3 =+#- ",'#10'" 4@@++5 +6++7 ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" "};'#10 + ); + LazarusResources.Add('tlistbox','XPM', + '/* XPM */'#10'static char * listbox_xpm[] = {'#10'"20 20 245 2",'#10'" ' + +#9'c None",'#10'". '#9'c #FFFFFF",'#10'"+ '#9'c #79797B",'#10'"@ '#9'c #8' + +'18085",'#10'"# '#9'c #7A797F",'#10'"$ '#9'c #848388",'#10'"% '#9'c #8485' + +'87",'#10'"& '#9'c #808183",'#10'"* '#9'c #7C7C84",'#10'"= '#9'c #7D7D89"' + +','#10'"- '#9'c #898795",'#10'"; '#9'c #7A7987",'#10'"> '#9'c #7A7A86",' + +#10'", '#9'c #82828A",'#10'"'' '#9'c #828284",'#10'") '#9'c #858583",'#10 + +'"! '#9'c #040500",'#10'"~ '#9'c #000100",'#10'"{ '#9'c #090907",'#10'"] ' + +#9'c #000002",'#10'"^ '#9'c #000005",'#10'"/ '#9'c #0A0911",'#10'"( '#9'c' + +' #908F94",'#10'"_ '#9'c #FDFCFF",'#10'": '#9'c #F6F5FD",'#10'"< '#9'c #F' + +'EFEFF",'#10'"[ '#9'c #FBFDFF",'#10'"} '#9'c #F2F6FF",'#10'"| '#9'c #FCFD' + +'FF",'#10'"1 '#9'c #FCFCFF",'#10'"2 '#9'c #F5F5FF",'#10'"3 '#9'c #FEFBFF"' + +','#10'"4 '#9'c #FEFCFF",'#10'"5 '#9'c #FCFBFF",'#10'"6 '#9'c #F8F7FD",' + +#10'"7 '#9'c #FDFEF8",'#10'"8 '#9'c #FFFFFD",'#10'"9 '#9'c #C3C2C8",'#10 + +'"0 '#9'c #7A7981",'#10'"a '#9'c #FFFDFF",'#10'"b '#9'c #0B0A1A",'#10'"c ' + +#9'c #0A0C25",'#10'"d '#9'c #0F1231",'#10'"e '#9'c #05052B",'#10'"f '#9'c' + +' #0D0C34",'#10'"g '#9'c #0E0D37",'#10'"h '#9'c #08062E",'#10'"i '#9'c #0' + +'F0E2E",'#10'"j '#9'c #080820",'#10'"k '#9'c #F5F6FA",'#10'"l '#9'c #0505' + +'03",'#10'"m '#9'c #FFFFFA",'#10'"n '#9'c #7C7B77",'#10'"o '#9'c #878586"' + +','#10'"p '#9'c #BEBCC1",'#10'"q '#9'c #020005",'#10'"r '#9'c #817F8A",' + +#10'"s '#9'c #FBF9FF",'#10'"t '#9'c #F5F3FF",'#10'"u '#9'c #F9FBFF",'#10 + +'"v '#9'c #F5F7FF",'#10'"w '#9'c #F2F3FF",'#10'"x '#9'c #F9F8FF",'#10'"y ' + +#9'c #F4F3FF",'#10'"z '#9'c #FBF8FF",'#10'"A '#9'c #FBFAFF",'#10'"B '#9'c' + +' #000000",'#10'"C '#9'c #050400",'#10'"D '#9'c #060503",'#10'"E '#9'c #B' + +'BB9BC",'#10'"F '#9'c #010002",'#10'"G '#9'c #83818E",'#10'"H '#9'c #FCF9' + +'FF",'#10'"I '#9'c #11102F",'#10'"J '#9'c #07093C",'#10'"K '#9'c #030444"' + +','#10'"L '#9'c #151659",'#10'"M '#9'c #000043",'#10'"N '#9'c #131258",' + +#10'"O '#9'c #040243",'#10'"P '#9'c #030037",'#10'"Q '#9'c #F9F9FF",'#10 + +'"R '#9'c #FAFAFF",'#10'"S '#9'c #020202",'#10'"T '#9'c #C1C2BC",'#10'"U ' + +#9'c #C9C8C3",'#10'"V '#9'c #B7B6B2",'#10'"W '#9'c #C2C0C1",'#10'"X '#9'c' + +' #060405",'#10'"Y '#9'c #82828C",'#10'"Z '#9'c #FBFBFF",'#10'"` '#9'c #E' + +'EF0FF",'#10'" .'#9'c #F5F8FF",'#10'"..'#9'c #F7F6FF",'#10'"+.'#9'c #F3F3' + +'FF",'#10'"@.'#9'c #F8F7FF",'#10'"#.'#9'c #F9F7FF",'#10'"$.'#9'c #F6F4FF"' + +','#10'"%.'#9'c #FCFFFF",'#10'"&.'#9'c #010100",'#10'"*.'#9'c #010000",' + +#10'"=.'#9'c #7E8387",'#10'"-.'#9'c #FBFEFF",'#10'";.'#9'c #F5F9FF",'#10 + +'">.'#9'c #090C39",'#10'",.'#9'c #070B4A",'#10'"''.'#9'c #02064F",'#10'")' + +'.'#9'c #020650",'#10'"!.'#9'c #05084F",'#10'"~.'#9'c #040847",'#10'"{.'#9 + +'c #050646",'#10'"].'#9'c #040349",'#10'"^.'#9'c #0C0C42",'#10'"/.'#9'c #' + +'000207",'#10'"(.'#9'c #FEFFFF",'#10'"_.'#9'c #BEC0BB",'#10'":.'#9'c #FFF' + +'FF8",'#10'"<.'#9'c #BDBEB8",'#10'"[.'#9'c #858994",'#10'"}.'#9'c #F8FCFF' + +'",'#10'"|.'#9'c #F3F6FF",'#10'"1.'#9'c #F7F9FF",'#10'"2.'#9'c #F3F5FF",' + +#10'"3.'#9'c #F2F4FF",'#10'"4.'#9'c #F4F6FF",'#10'"5.'#9'c #F7F7FF",'#10 + +'"6.'#9'c #F8F5FF",'#10'"7.'#9'c #F1F3FF",'#10'"8.'#9'c #FBFFFF",'#10'"9.' + +#9'c #00000B",'#10'"0.'#9'c #B9BCC5",'#10'"a.'#9'c #BABCB7",'#10'"b.'#9'c' + +' #FFFFFB",'#10'"c.'#9'c #777992",'#10'"d.'#9'c #F6F8FF",'#10'"e.'#9'c #F' + +'8F8FF",'#10'"f.'#9'c #AB172F",'#10'"g.'#9'c #030416",'#10'"h.'#9'c #B7B8' + +'BD",'#10'"i.'#9'c #FDFEFF",'#10'"j.'#9'c #C0C0C0",'#10'"k.'#9'c #010101"' + +','#10'"l.'#9'c #7D7DA1",'#10'"m.'#9'c #000019",'#10'"n.'#9'c #C9CCD5",' + +#10'"o.'#9'c #F4F4FE",'#10'"p.'#9'c #C8C8D0",'#10'"q.'#9'c #FFFEFF",'#10 + +'"r.'#9'c #7A79A1",'#10'"s.'#9'c #F8F6FF",'#10'"t.'#9'c #E7E7FF",'#10'"u.' + +#9'c #F7F4FF",'#10'"v.'#9'c #F8F1FF",'#10'"w.'#9'c #F8F2FF",'#10'"x.'#9'c' + +' #F0ECFF",'#10'"y.'#9'c #F9F6FF",'#10'"z.'#9'c #000023",'#10'"A.'#9'c #F' + +'BFCFF",'#10'"B.'#9'c #C2C1D1",'#10'"C.'#9'c #C5C4CC",'#10'"D.'#9'c #0302' + +'07",'#10'"E.'#9'c #6D6B92",'#10'"F.'#9'c #00001E",'#10'"G.'#9'c #BABCC9"' + +','#10'"H.'#9'c #C0C1C6",'#10'"I.'#9'c #000004",'#10'"J.'#9'c #8A8AA4",' + +#10'"K.'#9'c #FAF8FF",'#10'"L.'#9'c #02020C",'#10'"M.'#9'c #FAFCF9",'#10 + +'"N.'#9'c #C2C3BB",'#10'"O.'#9'c #F9FAF2",'#10'"P.'#9'c #BBBBB9",'#10'"Q.' + +#9'c #070709",'#10'"R.'#9'c #818090",'#10'"S.'#9'c #F2F1FF",'#10'"T.'#9'c' + +' #FAFDFF",'#10'"U.'#9'c #030500",'#10'"V.'#9'c #000200",'#10'"W.'#9'c #0' + +'60702",'#10'"X.'#9'c #7E7F84",'#10'"Y.'#9'c #FCFEFF",'#10'"Z.'#9'c #F8F9' + +'FF",'#10'"`.'#9'c #0B0C2B",'#10'" +'#9'c #08083A",'#10'".+'#9'c #080743"' + +','#10'"++'#9'c #141154",'#10'"@+'#9'c #050245",'#10'"#+'#9'c #090540",' + +#10'"$+'#9'c #100B4D",'#10'"%+'#9'c #09063B",'#10'"&+'#9'c #F9FAFF",'#10 + +'"*+'#9'c #01010B",'#10'"=+'#9'c #FEFFFA",'#10'"-+'#9'c #FCFDF5",'#10'";+' + +#9'c #BBBCB7",'#10'">+'#9'c #7C7D7F",'#10'",+'#9'c #F4F1FF",'#10'"''+'#9 + +'c #F2EFFF",'#10'")+'#9'c #FBF7FF",'#10'"!+'#9'c #F8F4FF",'#10'"~+'#9'c #' + +'F2EDFF",'#10'"{+'#9'c #F3F8F4",'#10'"]+'#9'c #070705",'#10'"^+'#9'c #C5C' + +'5C3",'#10'"/+'#9'c #797A7C",'#10'"(+'#9'c #FDFDFF",'#10'"_+'#9'c #09082A' + +'",'#10'":+'#9'c #110B55",'#10'"<+'#9'c #010051",'#10'"[+'#9'c #160F5C",' + +#10'"}+'#9'c #00003A",'#10'"|+'#9'c #100C47",'#10'"1+'#9'c #110E43",'#10 + +'"2+'#9'c #0C0938",'#10'"3+'#9'c #F9FCF5",'#10'"4+'#9'c #FEFFEF",'#10'"5+' + +#9'c #000300",'#10'"6+'#9'c #7E7D83",'#10'"7+'#9'c #C4C3C9",'#10'"8+'#9'c' + +' #86858A",'#10'"9+'#9'c #F2ECFF",'#10'"0+'#9'c #FBF5FF",'#10'"a+'#9'c #F' + +'4F2FF",'#10'"b+'#9'c #F0EFFF",'#10'"c+'#9'c #FEFFF6",'#10'"d+'#9'c #F6FB' + +'E5",'#10'"e+'#9'c #080C00",'#10'"f+'#9'c #BBBEB5",'#10'"g+'#9'c #C7C6CC"' + +','#10'"h+'#9'c #BBB9C6",'#10'"i+'#9'c #C1BFCA",'#10'"j+'#9'c #05040C",' + +#10'"k+'#9'c #7D7C82",'#10'"l+'#9'c #000007",'#10'"m+'#9'c #070614",'#10 + +'"n+'#9'c #00000F",'#10'"o+'#9'c #00020F",'#10'"p+'#9'c #00000C",'#10'"q+' + +#9'c #040519",'#10'"r+'#9'c #000014",'#10'"s+'#9'c #060513",'#10'"t+'#9'c' + +' #070904",'#10'"u+'#9'c #000009",'#10'"v+'#9'c #00000E",'#10'" ' + +' ",'#10'"+ @ # $ % & * = - ; > , '' ) ! ~ {' + +' ] ^ / ",'#10'"( _ : < [ } | 1 2 3 4 5 6 . ~ 7 8 < 9 ^ ",'#10'"0 a a b c' + +' d e f g h i j < k l m n o p q ",'#10'"r a s t u v w x y z A 5 5 < B 7 C' + +' D E F ",'#10'"G a H I J K L M N O P A Q R S T U V W X ",'#10'"Y x 4 Z `' + +' .` ..+.@.#.$.u %.] &.~ C *.B ",'#10'"=.-.;.>.,.''.).!.~.{.].^.-.%./.(.' + +'_.:.<.B ",'#10'"[.}.|.1.2.3.4.4.3.5.6.5.7.8.9.0.(.a.b.l ",'#10'"c.d.e.f.' + +'f.f.f.f.f.f.f...z Z g.%.h.i.j.k.",'#10'"l.f.f.f.f.f.f.f.f.f.f.f.f.f.m.n.' + +'o.p.q.] ",'#10'"r.f.f.s.v ;.t.u.v.w.x.y.f.f.z.A.B.Z C.D.",'#10'"E.f.f.f.' + +'f.f.f.f.f.f.f.f.f.f.F.G.< H.5 I.",'#10'"J.Z s f.f.f.f.f.f.f.f.Q K.1 L.M.' + +'N.O.P.Q.",'#10'"R.+...A 2.e.@.S.x 5.#.Z | T.] ~ U.V.W.B ",'#10'"X.Y.Z.`.' + +' +.+++@+#+#+$+%+&+%.*+(.=+-+;+l ",'#10'">+< Y.1 z ,+''+#.)+!+~+s Y.{+^ (' + +'.B ]+^+B ",'#10'"/+(+R _+:+<+[+}+|+1+2+1 3+4+5+3+'' 6+7+I.",'#10'"8+< < ' + +'3 9+0+6.s a+b+5 4.c+d+e+f+g+h+i+j+",'#10'"k+l+9.m+n+o+9.p+q+r+s+l+~ t+~ ' + +']+u+v+v+u+"};'#10 + ); + LazarusResources.Add('tmemo','XPM', + '/* XPM */'#10'static char * memo_xpm[] = {'#10'"25 25 110 2",'#10'" '#9 + +'c None",'#10'". '#9'c None",'#10'"+ '#9'c #C0C0C2",'#10'"@ '#9'c #848484' + +'",'#10'"# '#9'c #7F7F81",'#10'"$ '#9'c #818088",'#10'"% '#9'c #86858D",' + +#10'"& '#9'c #7C7B83",'#10'"* '#9'c #79787D",'#10'"= '#9'c #838385",'#10 + +'"- '#9'c #7B7B7B",'#10'"; '#9'c #8E8F8A",'#10'"> '#9'c #777872",'#10'", ' + +#9'c #81827C",'#10'"'' '#9'c #7B7C74",'#10'") '#9'c #7E7F79",'#10'"! '#9 + +'c #757670",'#10'"~ '#9'c #91928D",'#10'"{ '#9'c #8A8A8A",'#10'"] '#9'c #' + +'FCFBFF",'#10'"^ '#9'c #FFFDFF",'#10'"/ '#9'c #F6F3FF",'#10'"( '#9'c #F8F' + +'7FF",'#10'"_ '#9'c #FFFEFF",'#10'": '#9'c #FDFDFD",'#10'"< '#9'c #FFFFFD' + +'",'#10'"[ '#9'c #FBFCF7",'#10'"} '#9'c #FEFFF9",'#10'"| '#9'c #FEFFFA",' + +#10'"1 '#9'c #FFFFFB",'#10'"2 '#9'c #000000",'#10'"3 '#9'c #FFFCFF",'#10 + +'"4 '#9'c #F4F1FF",'#10'"5 '#9'c #F7F6FE",'#10'"6 '#9'c #F7F7F7",'#10'"7 ' + +#9'c #FEFEFC",'#10'"8 '#9'c #FAFAF8",'#10'"9 '#9'c #F6F6F4",'#10'"0 '#9'c' + +' #7C7C7C",'#10'"a '#9'c #020107",'#10'"b '#9'c #040019",'#10'"c '#9'c #F' + +'EFCFF",'#10'"d '#9'c #FDFCFF",'#10'"e '#9'c #F9F9FB",'#10'"f '#9'c #F8F8' + +'F8",'#10'"g '#9'c #FFFFFF",'#10'"h '#9'c #000002",'#10'"i '#9'c #7F7F7F"' + +','#10'"j '#9'c #FEFBFF",'#10'"k '#9'c #F5F0FF",'#10'"l '#9'c #FEFAFF",' + +#10'"m '#9'c #FBF7FF",'#10'"n '#9'c #F3EFFF",'#10'"o '#9'c #F8F6FF",'#10 + +'"p '#9'c #FEFDFF",'#10'"q '#9'c #FCFAFF",'#10'"r '#9'c #7E7E7E",'#10'"s ' + +#9'c #FBF9FF",'#10'"t '#9'c #F9F8FF",'#10'"u '#9'c #F9F9FF",'#10'"v '#9'c' + +' #F9F7FF",'#10'"w '#9'c #FFFBFF",'#10'"x '#9'c #070513",'#10'"y '#9'c #0' + +'B092E",'#10'"z '#9'c #00000B",'#10'"A '#9'c #F9FAFF",'#10'"B '#9'c #F8F9' + +'FF",'#10'"C '#9'c #F7F9FF",'#10'"D '#9'c #F8F8FF",'#10'"E '#9'c #F3F4FF"' + +','#10'"F '#9'c #FBFBFF",'#10'"G '#9'c #000004",'#10'"H '#9'c #F1F0FE",' + +#10'"I '#9'c #060709",'#10'"J '#9'c #F7F8FF",'#10'"K '#9'c #F7F7FF",'#10 + +'"L '#9'c #F6F4FF",'#10'"M '#9'c #000009",'#10'"N '#9'c #BFC0BB",'#10'"O ' + +#9'c #0A0931",'#10'"P '#9'c #F6F6FF",'#10'"Q '#9'c #FAFAFF",'#10'"R '#9'c' + +' #FCFDFF",'#10'"S '#9'c #05080D",'#10'"T '#9'c #000007",'#10'"U '#9'c #F' + +'BFAFF",'#10'"V '#9'c #00000C",'#10'"W '#9'c #787878",'#10'"X '#9'c #FEFE' + +'FF",'#10'"Y '#9'c #808080",'#10'"Z '#9'c #FBFDFF",'#10'"` '#9'c #FAFDFF"' + +','#10'" .'#9'c #F8FEFF",'#10'"..'#9'c #FBFEFF",'#10'"+.'#9'c #F6F8FF",' + +#10'"@.'#9'c #FCFFFF",'#10'"#.'#9'c #FDFFFA",'#10'"$.'#9'c #0E1204",'#10 + +'"%.'#9'c #FEFFFF",'#10'"&.'#9'c #FBFFFF",'#10'"*.'#9'c #FAFFFF",'#10'"=.' + +#9'c #FBFFFC",'#10'"-.'#9'c #FCFFFA",'#10'";.'#9'c #FAFDF2",'#10'">.'#9'c' + +' #000300",'#10'",.'#9'c #000100",'#10'"''.'#9'c #000200",'#10'").'#9'c #' + +'090D0C",'#10'"!.'#9'c #000201",'#10'"~.'#9'c #040500",'#10'". . . . . . ' + +'. . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . ' + +'. . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . ' + +'. . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",' + +#10'". . . . @ # $ % & * = - ; > , '' ) ! > ~ . . . . . ",'#10'". . . . {' + +' ] ^ / ^ ^ ( _ : < [ } | 1 1 2 . . . . . ",'#10'". . . . - _ 3 4 3 ^ ^ 5' + +' _ 6 < < 7 8 9 2 . . . . . ",'#10'". . . . 0 _ a a b a 3 c d _ e f g g g' + +' h . . . . . ",'#10'". . . . i ^ j k l m n j j o c d p q p a . . . . . "' + +','#10'". . . . r p s t t t t t t u v s o l w x . . . . . ",'#10'". . . .' + +' r p a a a a a a a a a a a y s z . . . . . ",'#10'". . . . r p A B C C C' + +' C D D t E q F p G . . . . . ",'#10'". . . . r p a a a a a a a a a a e u' + +' H I . . . . . ",'#10'". . . . r p u ( J J K K K K ( L o q c M . . . . .' + +' ",'#10'". . . . r p a a a a a a a a a a a O P z . . . . . ",'#10'". . .' + +' . r p A D D D J J K J D B s Q R S . . . . . ",'#10'". . . . r p a a a a' + +' a e e e a a a F A T . . . . . ",'#10'". . . . i p U t t D D D ( ( L t v' + +' F F V . . . . . ",'#10'". . . . W X a a a a a a a a a a a a R T . . . .' + +' . ",'#10'". . . . Y R Z ` Z ` ` .` ` ....+.@.#.$.. . . . . ",'#10'". .' + +' . . @ g %.@.@.@.@.&.&.&.*.*.=.-.;.>.. . . . . ",'#10'". . . . 0 h G G h' + +' ,.,.''.''.''.,.).!.,.~.,.. . . . . ",'#10'". . . . . . . . . . . . . . ' + +'. . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . ' + +'. . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . "};'#10 + ); + LazarusResources.Add('tmenu','XPM', + '/* XPM */'#10'static char * menu_xpm[] = {'#10'"25 25 206 2",'#10'" '#9 + +'c None",'#10'". '#9'c None",'#10'"+ '#9'c #BFC2BB",'#10'"@ '#9'c #837F96' + +'",'#10'"# '#9'c #817E9D",'#10'"$ '#9'c #77729A",'#10'"% '#9'c #8C86B4",' + +#10'"& '#9'c #817BAB",'#10'"* '#9'c #726F9A",'#10'"= '#9'c #7E7CA1",'#10 + +'"- '#9'c #8585A1",'#10'"; '#9'c #747589",'#10'"> '#9'c #81838F",'#10'", ' + +#9'c #73767B",'#10'"'' '#9'c #828387",'#10'") '#9'c #757678",'#10'"! '#9 + +'c #848587",'#10'"~ '#9'c #858688",'#10'"{ '#9'c #7F8180",'#10'"] '#9'c #' + +'7B7D7A",'#10'"^ '#9'c #7A7B73",'#10'"/ '#9'c #898B7D",'#10'"( '#9'c #828' + +'572",'#10'"_ '#9'c #BFC1BC",'#10'": '#9'c #7B7792",'#10'"< '#9'c #FEFAFF' + +'",'#10'"[ '#9'c #0A0432",'#10'"} '#9'c #070036",'#10'"| '#9'c #100843",' + +#10'"1 '#9'c #0D0743",'#10'"2 '#9'c #0D0842",'#10'"3 '#9'c #F8F5FF",'#10 + +'"4 '#9'c #FCFAFF",'#10'"5 '#9'c #FCFCFF",'#10'"6 '#9'c #FCFDFF",'#10'"7 ' + +#9'c #FEFDFF",'#10'"8 '#9'c #FEFEFF",'#10'"9 '#9'c #F9F9FF",'#10'"0 '#9'c' + +' #F8F8FF",'#10'"a '#9'c #FEFFFF",'#10'"b '#9'c #F8F8F8",'#10'"c '#9'c #F' + +'FFFFA",'#10'"d '#9'c #76786B",'#10'"e '#9'c #8B879E",'#10'"f '#9'c #130E' + +'37",'#10'"g '#9'c #FEF7FF",'#10'"h '#9'c #FDF5FF",'#10'"i '#9'c #F9F1FF"' + +','#10'"j '#9'c #0F0750",'#10'"k '#9'c #FCF6FF",'#10'"l '#9'c #080437",' + +#10'"m '#9'c #09072E",'#10'"n '#9'c #0E0D2D",'#10'"o '#9'c #EFEFFF",'#10 + +'"p '#9'c #FAFAFF",'#10'"q '#9'c #14112E",'#10'"r '#9'c #090625",'#10'"s ' + +#9'c #100D2A",'#10'"t '#9'c #FAF7FF",'#10'"u '#9'c #FEFCFF",'#10'"v '#9'c' + +' #797985",'#10'"w '#9'c #000005",'#10'"x '#9'c #7E7C8A",'#10'"y '#9'c #0' + +'60223",'#10'"z '#9'c #18133B",'#10'"A '#9'c #040030",'#10'"B '#9'c #140E' + +'4C",'#10'"C '#9'c #03003B",'#10'"D '#9'c #F7F3FF",'#10'"E '#9'c #FAFBFF"' + +','#10'"F '#9'c #F5F2FF",'#10'"G '#9'c #FEFBFF",'#10'"H '#9'c #F9F6FF",' + +#10'"I '#9'c #858496",'#10'"J '#9'c #828284",'#10'"K '#9'c #7F7F89",'#10 + +'"L '#9'c #7C7B8B",'#10'"M '#9'c #7D7B91",'#10'"N '#9'c #8986A1",'#10'"O ' + +#9'c #72728C",'#10'"P '#9'c #8C8DA2",'#10'"Q '#9'c #7D7F8B",'#10'"R '#9'c' + +' #7D8184",'#10'"S '#9'c #878C85",'#10'"T '#9'c #767C72",'#10'"U '#9'c #7' + +'E847A",'#10'"V '#9'c #000200",'#10'"W '#9'c #08090D",'#10'"X '#9'c #0000' + +'09",'#10'"Y '#9'c #00000D",'#10'"Z '#9'c #00000E",'#10'"` '#9'c #00000B"' + +','#10'" .'#9'c #7A7B80",'#10'"..'#9'c #85868A",'#10'"+.'#9'c #FCFEFF",' + +#10'"@.'#9'c #F7F7FF",'#10'"#.'#9'c #F9FDFF",'#10'"$.'#9'c #F9FEFF",'#10 + +'"%.'#9'c #FCFFFA",'#10'"&.'#9'c #F9FFEE",'#10'"*.'#9'c #FBFFEC",'#10'"=.' + +#9'c #000800",'#10'"-.'#9'c #797C81",'#10'";.'#9'c #F3F5FF",'#10'">.'#9'c' + +' #11103A",'#10'",.'#9'c #0A0A3C",'#10'"''.'#9'c #0A0B37",'#10'").'#9'c #' + +'0D1031",'#10'"!.'#9'c #070C22",'#10'"~.'#9'c #FAFEFF",'#10'"{.'#9'c #FAF' + +'FF9",'#10'"].'#9'c #FCFFF4",'#10'"^.'#9'c #000300",'#10'"/.'#9'c #C0C0C2' + +'",'#10'"(.'#9'c #C0C1BB",'#10'"_.'#9'c #C0C1BC",'#10'":.'#9'c #BEC0B5",' + +#10'"<.'#9'c #83868D",'#10'"[.'#9'c #FBFCFF",'#10'"}.'#9'c #F5F5FF",'#10 + +'"|.'#9'c #F7F5FF",'#10'"1.'#9'c #F5F6FF",'#10'"2.'#9'c #F4F6FF",'#10'"3.' + +#9'c #F9FCFF",'#10'"4.'#9'c #FCFFFF",'#10'"5.'#9'c #777A83",'#10'"6.'#9'c' + +' #F8F9FF",'#10'"7.'#9'c #0A0A3E",'#10'"8.'#9'c #0B0948",'#10'"9.'#9'c #0' + +'B0B47",'#10'"0.'#9'c #0A0C3F",'#10'"a.'#9'c #F9FBFF",'#10'"b.'#9'c #F2F5' + +'FE",'#10'"c.'#9'c #FCFFFD",'#10'"d.'#9'c #020500",'#10'"e.'#9'c #787B84"' + +','#10'"f.'#9'c #EDEBFF",'#10'"g.'#9'c #F6F4FF",'#10'"h.'#9'c #F0F2FF",' + +#10'"i.'#9'c #000100",'#10'"j.'#9'c #747780",'#10'"k.'#9'c #F6F7FF",'#10 + +'"l.'#9'c #020032",'#10'"m.'#9'c #100E4D",'#10'"n.'#9'c #070544",'#10'"o.' + +#9'c #13124C",'#10'"p.'#9'c #100E3D",'#10'"q.'#9'c #040509",'#10'"r.'#9'c' + +' #888B94",'#10'"s.'#9'c #FBF9FF",'#10'"t.'#9'c #FBF7FF",'#10'"u.'#9'c #F' + +'9F7FF",'#10'"v.'#9'c #EEEDFF",'#10'"w.'#9'c #F9FAFF",'#10'"x.'#9'c #0000' + +'07",'#10'"y.'#9'c #80838C",'#10'"z.'#9'c #0C0C26",'#10'"A.'#9'c #01002C"' + +','#10'"B.'#9'c #0A073E",'#10'"C.'#9'c #0E0A45",'#10'"D.'#9'c #120F46",' + +#10'"E.'#9'c #070431",'#10'"F.'#9'c #19183A",'#10'"G.'#9'c #0F0D25",'#10 + +'"H.'#9'c #050412",'#10'"I.'#9'c #0E0D15",'#10'"J.'#9'c #BFC1C0",'#10'"K.' + +#9'c #71747D",'#10'"L.'#9'c #FBFAFF",'#10'"M.'#9'c #FAF8FF",'#10'"N.'#9'c' + +' #F5F4FF",'#10'"O.'#9'c #BFC1BE",'#10'"P.'#9'c #84878E",'#10'"Q.'#9'c #0' + +'D0B30",'#10'"R.'#9'c #07042F",'#10'"S.'#9'c #0C0934",'#10'"T.'#9'c #0F0D' + +'34",'#10'"U.'#9'c #FDFAFF",'#10'"V.'#9'c #030007",'#10'"W.'#9'c #818286"' + +','#10'"X.'#9'c #FCFBFF",'#10'"Y.'#9'c #F4F4FF",'#10'"Z.'#9'c #F4F2FF",' + +#10'"`.'#9'c #FFFEFF",'#10'" +'#9'c #020005",'#10'".+'#9'c #C1C0BC",'#10 + +'"++'#9'c #7B7C7E",'#10'"@+'#9'c #070711",'#10'"#+'#9'c #000015",'#10'"$+' + +#9'c #000019",'#10'"%+'#9'c #08061B",'#10'"&+'#9'c #050414",'#10'"*+'#9'c' + +' #00000C",'#10'"=+'#9'c #05040C",'#10'"-+'#9'c #07060B",'#10'";+'#9'c #0' + +'10000",'#10'">+'#9'c #C1C0BB",'#10'",+'#9'c #CCCBC7",'#10'"''+'#9'c #C0C' + +'1B9",'#10'")+'#9'c #C4C5BF",'#10'"!+'#9'c #C3C4BC",'#10'"~+'#9'c #C2C1BF' + +'",'#10'"{+'#9'c #C5C4C2",'#10'"]+'#9'c #C0C2BD",'#10'"^+'#9'c #C3C4C6",' + +#10'"/+'#9'c #C0C0C0",'#10'". . . . . . . . . . . . . . . . . . . . . . .' + +' . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'".' + +' . @ # $ % & * = - ; > , '' ) ! ~ { ] ^ / ( . . . ",'#10'". . : < [ } | ' + +'1 2 3 4 5 6 7 8 9 0 8 a b c d . . . ",'#10'". . e < f g h i j k l m n o ' + +'p q r s t u v w . . . ",'#10'". . x u y z A B C D 4 p E 6 6 F G H G u I ' + +'. . . . ",'#10'". . J K L M N O P Q R S T U V W X Y Z ` . . . . . ",'#10 + +'". . . ..+.5 @.6 #.$.%.&.*.=.. . . . . . . . . . . ",'#10'". . . -.;.>.,' + +'.''.).!.~.{.].^.. . . . . . . . . . . ",'#10'":.. . <.[.}.|.1.2.3.$.4.%.' + +'V . . . . . . . . . . . ",'#10'". . . 5.6.7.8.9.0.a.$.b.c.d.. . . . . . ' + +'. . . . . ",'#10'". . . e.[.9 f.g.6.h.[.+.#.i.. . . . . . . . . . . ",' + +#10'". . . j.k.l.m.n.o.p.0 6 4.q.. . . . . . . . . . . ",'#10'"_.. . r.[.' + +'s.t.u.v.|.9 w.7 x.. . . . . . . . . . . ",'#10'". . . y.z.A.B.C.D.E.F.G.' + +'H.I.. . . . . . . . . . . ",'#10'". . . K.5 L.M.u.u.4 N.u 7 x.. . . . . ' + +'. . . . . . ",'#10'". . . P.6 Q.R.S.T.< G U.4 V.. . . . . . . . . . . ",' + +#10'". . . W.2.X.4 X.Y.|.u Z.`. +. . . . . . . . . . . ",'#10'". . . ++@+' + +'#+$+#+%+&+*+=+-+;+. . . . . . . . . . . ",'#10'". . . . . . . . . . . . ' + +'. . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . ' + +'. . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",' + +#10'"~+. . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . ' + +'. . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . ' + +'. . . . . . . . . . . . . "};'#10 + ); + LazarusResources.Add('tmouse','XPM', + '/* XPM */'#10'static char * mouse_xpm[] = {'#10'"25 25 52 1",'#10'" '#9'c' + +' None",'#10'".'#9'c None'#10'"+'#9'c #070244",'#10'"@'#9'c #000030",'#10 + +'"#'#9'c #00002C",'#10'"$'#9'c #FBFAFF",'#10'"%'#9'c #00001E",'#10'"&'#9 + +'c #0C0C2E",'#10'"*'#9'c #F7F8FF",'#10'"='#9'c #F8FBFF",'#10'"-'#9'c #000' + +'009",'#10'";'#9'c #000010",'#10'">'#9'c #FBFDFF",'#10'",'#9'c #FCFFFF",' + +#10'"'''#9'c #FBFCFE",'#10'")'#9'c #000200",'#10'"!'#9'c #02050A",'#10'"~' + +#9'c #F2F6F9",'#10'"{'#9'c #FBFDF8",'#10'"]'#9'c #FEFFFA",'#10'"^'#9'c #0' + +'70908",'#10'"/'#9'c #FCFEFB",'#10'"('#9'c #FCFEF9",'#10'"_'#9'c #F6F9F2"' + +','#10'":'#9'c #FFFFFA",'#10'"<'#9'c #000100",'#10'"['#9'c #FEFFFB",'#10 + +'"}'#9'c #F5F8F1",'#10'"|'#9'c #FFFFFD",'#10'"1'#9'c #000002",'#10'"2'#9 + +'c #FAFAF8",'#10'"3'#9'c #F9F9F7",'#10'"4'#9'c #0B0B0B",'#10'"5'#9'c #000' + +'004",'#10'"6'#9'c #030208",'#10'"7'#9'c #FDFDFF",'#10'"8'#9'c #07060E",' + +#10'"9'#9'c #FAFAFC",'#10'"0'#9'c #FFFEFF",'#10'"a'#9'c #000005",'#10'"b' + +#9'c #08080A",'#10'"c'#9'c #FDFDFD",'#10'"d'#9'c #040406",'#10'"e'#9'c #0' + +'8050E",'#10'"f'#9'c #010000",'#10'"g'#9'c #020003",'#10'"h'#9'c #090803"' + +','#10'"i'#9'c #FDFCF7",'#10'"j'#9'c #FFFEFA",'#10'"k'#9'c #040301",'#10 + +'"l'#9'c #010100",'#10'"m'#9'c #020200",'#10'".........................",' + +#10'".........................",'#10'".........................",'#10'"..' + +'.......................",'#10'".........................",'#10'"........' + +'+@...............",'#10'"........#$%..............",'#10'"........&*=-..' + +'...........",'#10'"........;>,'')............",'#10'"........!~,{]).....' + +'......",'#10'"........^/(]_:<..........",'#10'"........<[[}]]|1.........' + +'",'#10'"........1.|234156........",'#10'"........5.7..1...........",'#10 + +'"........8$51905..........",'#10'"........-a.bc.d..........",'#10'".....' + +'...e...f|0g.........",'#10'"............hijk.........",'#10'"...........' + +'..lm..........",'#10'".........................",'#10'".................' + +'........",'#10'".........................",'#10'".......................' + +'..",'#10'".........................",'#10'"........................."};' + +#10 + ); + LazarusResources.Add('tnotebook','XPM', + '/* XPM */'#10'static char * notebook_xpm[] = {'#10'"25 25 29 1",'#10'" '#9 + +'c None",'#10'".'#9'c #FFFFFF",'#10'"+'#9'c #080808",'#10'"@'#9'c #000000' + +'",'#10'"#'#9'c #C1C1C1",'#10'"$'#9'c #F8F8F8",'#10'"%'#9'c #F0F0F0",'#10 + +'"&'#9'c #FCFCFC",'#10'"*'#9'c #030303",'#10'"='#9'c #C5C5C5",'#10'"-'#9 + +'c #808080",'#10'";'#9'c #F4F4F4",'#10'">'#9'c #C4C4C4",'#10'",'#9'c #C0C' + +'0C0",'#10'"'''#9'c #FEFEFE",'#10'")'#9'c #7C7C7C",'#10'"!'#9'c #8B8B8B",' + +#10'"~'#9'c #767676",'#10'"{'#9'c #828282",'#10'"]'#9'c #878787",'#10'"^' + +#9'c #7A7A7A",'#10'"/'#9'c #7F7F7F",'#10'"('#9'c #888888",'#10'"_'#9'c #7' + +'D7D7D",'#10'":'#9'c #898989",'#10'"<'#9'c #020202",'#10'"['#9'c #050505"' + +','#10'"}'#9'c #010101",'#10'"|'#9'c #C3C3C3",'#10'" ' + +' ",'#10'" ",'#10'" ",' + +#10'" ",'#10'" ",'#10'" ' + +' ....+@@@@@@@@ ",'#10'" .###+###@###@ ",'#10'" .###' + +'+###@###@ ",'#10'" $.###%..........&.* ",'#10'" .###=######' + +'######-@ ",'#10'" ;#############>##-@ ",'#10'" .################' + +'-@ ",'#10'" $################-@ ",'#10'" $#####,##########-@ "' + +','#10'" .################-@ ",'#10'" ;################-@ ",'#10 + +'" .################-@ ",'#10'" '')!~{]^////////(_:@ ",'#10'" @' + +'<@[@}@@@@@@@@@@<@| ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' "};'#10 + ); + LazarusResources.Add('tpopupmenu','XPM', + '/* XPM */'#10'static char * popup_xpm[] = {'#10'"25 25 154 2",'#10'" '#9 + +'c None",'#10'". '#9'c None",'#10'"+ '#9'c #777978",'#10'"@ '#9'c #888C8F' + +'",'#10'"# '#9'c #7D8089",'#10'"$ '#9'c #7C7F8E",'#10'"% '#9'c #797B90",' + +#10'"& '#9'c #86879B",'#10'"* '#9'c #82828E",'#10'"= '#9'c #818086",'#10 + +'"- '#9'c #78777D",'#10'"; '#9'c #7E7D82",'#10'"> '#9'c #848486",'#10'", ' + +#9'c #88898B",'#10'"'' '#9'c #F9FCFF",'#10'") '#9'c #FAFCFF",'#10'"! '#9 + +'c #FBFDFF",'#10'"~ '#9'c #FBFBFF",'#10'"{ '#9'c #F0F1FF",'#10'"] '#9'c #' + +'FCFBFF",'#10'"^ '#9'c #FFFEFF",'#10'"/ '#9'c #FBFAFF",'#10'"( '#9'c #000' + +'002",'#10'"_ '#9'c #7A7E81",'#10'": '#9'c #F8FAFF",'#10'"< '#9'c #070920' + +'",'#10'"[ '#9'c #04072A",'#10'"} '#9'c #0A0B3B",'#10'"| '#9'c #13123C",' + +#10'"1 '#9'c #08061C",'#10'"2 '#9'c #FFFDFF",'#10'"3 '#9'c #F9F8FE",'#10 + +'"4 '#9'c #0C0B10",'#10'"5 '#9'c #818489",'#10'"6 '#9'c #FCFEFF",'#10'"7 ' + +#9'c #FAFBFF",'#10'"8 '#9'c #F9FAFF",'#10'"9 '#9'c #F7F6FF",'#10'"0 '#9'c' + +' #F6F6FF",'#10'"a '#9'c #FEFBFF",'#10'"b '#9'c #FCFAFF",'#10'"c '#9'c #F' + +'6F5FB",'#10'"d '#9'c #000004",'#10'"e '#9'c #C0C1BC",'#10'"f '#9'c #7E81' + +'86",'#10'"g '#9'c #F2F5FF",'#10'"h '#9'c #0A0A30",'#10'"i '#9'c #0C0C42"' + +','#10'"j '#9'c #000043",'#10'"k '#9'c #100E4D",'#10'"l '#9'c #EDEBF8",' + +#10'"m '#9'c #F9F7FF",'#10'"n '#9'c #010005",'#10'"o '#9'c #7A7D84",'#10 + +'"p '#9'c #F6F8FF",'#10'"q '#9'c #F6F3FF",'#10'"r '#9'c #FDF9FF",'#10'"s ' + +#9'c #FDFCFF",'#10'"t '#9'c #000005",'#10'"u '#9'c #7A7C89",'#10'"v '#9'c' + +' #FBFCFF",'#10'"w '#9'c #070838",'#10'"x '#9'c #00003E",'#10'"y '#9'c #0' + +'B0859",'#10'"z '#9'c #090551",'#10'"A '#9'c #0B0835",'#10'"B '#9'c #FEFC' + +'FF",'#10'"C '#9'c #F8F7FF",'#10'"D '#9'c #03030F",'#10'"E '#9'c #7C8197"' + +','#10'"F '#9'c #04082D",'#10'"G '#9'c #0A0C3F",'#10'"H '#9'c #0A0B4B",' + +#10'"I '#9'c #04034F",'#10'"J '#9'c #0E0B58",'#10'"K '#9'c #0D084B",'#10 + +'"L '#9'c #000034",'#10'"M '#9'c #0E0A3C",'#10'"N '#9'c #131138",'#10'"O ' + +#9'c #000017",'#10'"P '#9'c #7B7EA1",'#10'"Q '#9'c #050738",'#10'"R '#9'c' + +' #EBEAFF",'#10'"S '#9'c #F7F4FF",'#10'"T '#9'c #EFECFF",'#10'"U '#9'c #F' + +'9F5FF",'#10'"V '#9'c #070244",'#10'"W '#9'c #000030",'#10'"X '#9'c #0B0A' + +'34",'#10'"Y '#9'c #00001A",'#10'"Z '#9'c #807EAF",'#10'"` '#9'c #100D52"' + +','#10'" .'#9'c #09035D",'#10'"..'#9'c #110A74",'#10'"+.'#9'c #050073",' + +#10'"@.'#9'c #09016E",'#10'"#.'#9'c #09064D",'#10'"$.'#9'c #00002C",'#10 + +'"%.'#9'c #00001E",'#10'"&.'#9'c #020317",'#10'"*.'#9'c #7E7CA4",'#10'"=.' + +#9'c #0B054F",'#10'"-.'#9'c #040056",'#10'";.'#9'c #070062",'#10'">.'#9'c' + +' #0D075F",'#10'",.'#9'c #07043B",'#10'"''.'#9'c #0C0C2E",'#10'").'#9'c #' + +'F7F8FF",'#10'"!.'#9'c #F8FBFF",'#10'"~.'#9'c #000009",'#10'"{.'#9'c #828' + +'28C",'#10'"].'#9'c #F8F9FF",'#10'"^.'#9'c #FCFCFF",'#10'"/.'#9'c #000010' + +'",'#10'"(.'#9'c #FCFFFF",'#10'"_.'#9'c #FBFCFE",'#10'":.'#9'c #000200",' + +#10'"<.'#9'c #7F827B",'#10'"[.'#9'c #000100",'#10'"}.'#9'c #030502",'#10 + +'"|.'#9'c #04070C",'#10'"1.'#9'c #02050A",'#10'"2.'#9'c #F2F6F9",'#10'"3.' + +#9'c #FBFDF8",'#10'"4.'#9'c #FEFFFA",'#10'"5.'#9'c #070908",'#10'"6.'#9'c' + +' #FCFEFB",'#10'"7.'#9'c #FCFEF9",'#10'"8.'#9'c #F6F9F2",'#10'"9.'#9'c #F' + +'FFFFA",'#10'"0.'#9'c #FEFFFB",'#10'"a.'#9'c #F5F8F1",'#10'"b.'#9'c #FFFF' + +'FD",'#10'"c.'#9'c #FFFFFF",'#10'"d.'#9'c #FAFAF8",'#10'"e.'#9'c #F9F9F7"' + +','#10'"f.'#9'c #0B0B0B",'#10'"g.'#9'c #030208",'#10'"h.'#9'c #FDFDFF",' + +#10'"i.'#9'c #07060E",'#10'"j.'#9'c #FAFAFC",'#10'"k.'#9'c #08080A",'#10 + +'"l.'#9'c #FDFDFD",'#10'"m.'#9'c #040406",'#10'"n.'#9'c #C0C1B9",'#10'"o.' + +#9'c #08050E",'#10'"p.'#9'c #010000",'#10'"q.'#9'c #020003",'#10'"r.'#9'c' + +' #090803",'#10'"s.'#9'c #FDFCF7",'#10'"t.'#9'c #FFFEFA",'#10'"u.'#9'c #0' + +'40301",'#10'"v.'#9'c #010100",'#10'"w.'#9'c #020200",'#10'". . . . . . .' + +' . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . .' + +' . . . . . . . . . . . ",'#10'". . . . + @ # $ % & * = - ; > . . . . . .' + +' . . . . ",'#10'". . . . , '' ) ! ~ { ] ^ / ^ ( . . . . . . . . . . ",' + +#10'". . . . _ : < [ } | 1 2 ] 3 4 . . . . . . . . . . ",'#10'". . . . 5 ' + +'6 7 8 9 0 a b ^ c d . . . . . . . . . . ",'#10'". . . . f g h i j k a l ' + +'m ^ n . . . . . . . . . . ",'#10'". . . . o p / m q q r 2 2 s t . . . . ' + +'. . . . . . ",'#10'". . . . u v w x y z A a B C D . . . . . . . . . . ",' + +#10'". . . . E F G H I J K L M N O . . . . . . . . . . ",'#10'". . . . P ' + +'Q C R S T U V W X Y . . . . . . . . . . ",'#10'". . . . Z ` ...+.@.#.$.' + +'/ %.&.. . . . . . . . . . ",'#10'". . . . *.T =.-.;.>.,.''.).!.~.. . . .' + +' . . . . . . ",'#10'". . . . {.6 ].^.^.).8 /.! (._.:.. . . . . . . . . "' + +','#10'". . . . <.:.[.:.:.}.|.1.2.(.3.4.:.. . . . . . . . ",'#10'". . . .' + +' . . . . . . . 5.6.7.4.8.9.[.. . . . . . . ",'#10'". . . . . . . . . . .' + +' [.0.0.a.4.4.b.( . . . . . . ",'#10'". . . . . . . . . . . ( c.b.d.e.f.(' + +' d g.. . . . . ",'#10'". . . . . . . . . . . d c.h.c.c.( . . . . . . . .' + +' ",'#10'". . . . . . . . . . . i./ d ( j.^ d . . . . . . . ",'#10'". . .' + +' . . . . . . . . ~.t . k.l.c.m.. . . . . . . ",'#10'". . . . . . . . . .' + +' . o.. . . p.b.^ q.. . . . . . ",'#10'". . . . . . . . . . . . . . . r.s' + +'.t.u.. . . . . . ",'#10'". . . . . . . . . . . . . . . . v.w.. . . . . .' + +' . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . "};'#10 + ); + LazarusResources.Add('tradiobutton','XPM', + '/* XPM */'#10'static char * radiobutton_xpm[] = {'#10'"25 25 96 2",'#10'"' + +' '#9'c None",'#10'". '#9'c None",'#10'"+ '#9'c #BEBEBE",'#10'"@ '#9'c #' + +'BDBDBD",'#10'"# '#9'c #C1C1C1",'#10'"$ '#9'c #C2C2C2",'#10'"% '#9'c #C0C' + +'0BE",'#10'"& '#9'c #C0C0C2",'#10'"* '#9'c #C4C4C4",'#10'"= '#9'c #C0C1BC' + +'",'#10'"- '#9'c #C0BFC4",'#10'"; '#9'c #C5C5C5",'#10'"> '#9'c #C7C7C7",' + +#10'", '#9'c #C3C3C3",'#10'"'' '#9'c #BCBCBC",'#10'") '#9'c #808080",'#10 + +'"! '#9'c #848484",'#10'"~ '#9'c #777777",'#10'"{ '#9'c #7F7F7F",'#10'"] ' + +#9'c #B9B9B9",'#10'"^ '#9'c #020202",'#10'"/ '#9'c #000000",'#10'"( '#9'c' + +' #060606",'#10'"_ '#9'c #767676",'#10'": '#9'c #818181",'#10'"< '#9'c #F' + +'FFFFF",'#10'"[ '#9'c #FBFBFB",'#10'"} '#9'c #F8F8F8",'#10'"| '#9'c #7979' + +'79",'#10'"1 '#9'c #BEBEC0",'#10'"2 '#9'c #BEBDC2",'#10'"3 '#9'c #C7C6CB"' + +','#10'"4 '#9'c #B4B4B4",'#10'"5 '#9'c #838383",'#10'"6 '#9'c #FEFEFE",' + +#10'"7 '#9'c #787878",'#10'"8 '#9'c #8E8E8E",'#10'"9 '#9'c #7D7D7D",'#10 + +'"0 '#9'c #F6F6F6",'#10'"a '#9'c #C2C1C9",'#10'"b '#9'c #C2C1C6",'#10'"c ' + +#9'c #040404",'#10'"d '#9'c #F7F7F7",'#10'"e '#9'c #7B7C77",'#10'"f '#9'c' + +' #F7F9EE",'#10'"g '#9'c #C0C2B7",'#10'"h '#9'c #BFC0BB",'#10'"i '#9'c #F' + +'DFDFD",'#10'"j '#9'c #030303",'#10'"k '#9'c #81827C",'#10'"l '#9'c #FFFF' + +'F1",'#10'"m '#9'c #BEC1AE",'#10'"n '#9'c #0C0C0C",'#10'"o '#9'c #F3F3F3"' + +','#10'"p '#9'c #010101",'#10'"q '#9'c #82837D",'#10'"r '#9'c #F7FCE8",' + +#10'"s '#9'c #C4C6B9",'#10'"t '#9'c #868686",'#10'"u '#9'c #888888",'#10 + +'"v '#9'c #F9F9F9",'#10'"w '#9'c #7E7F7A",'#10'"x '#9'c #FEFFF3",'#10'"y ' + +#9'c #C0C1B9",'#10'"z '#9'c #BFBFBF",'#10'"A '#9'c #828280",'#10'"B '#9'c' + +' #F8FAF5",'#10'"C '#9'c #7E7E7E",'#10'"D '#9'c #878787",'#10'"E '#9'c #C' + +'1C2C4",'#10'"F '#9'c #AEAEAE",'#10'"G '#9'c #919191",'#10'"H '#9'c #7B7B' + +'7B",'#10'"I '#9'c #F0F0F0",'#10'"J '#9'c #F5F5F5",'#10'"K '#9'c #FDFDFF"' + +','#10'"L '#9'c #BFC0C4",'#10'"M '#9'c #BFBFC7",'#10'"N '#9'c #BBBBBB",' + +#10'"O '#9'c #7C7C7C",'#10'"P '#9'c #707070",'#10'"Q '#9'c #C0BFC5",'#10 + +'"R '#9'c #B7B7B7",'#10'"S '#9'c #C3C3C1",'#10'"T '#9'c #BFC1BE",'#10'"U ' + +#9'c #C6C6C6",'#10'"V '#9'c #C2C2C0",'#10'"W '#9'c #BFC2BB",'#10'"X '#9'c' + +' #C1C0BB",'#10'"Y '#9'c #BFC2B9",'#10'"Z '#9'c #C0C1BB",'#10'"` '#9'c #B' + +'FC1BC",'#10'" .'#9'c #C1C0BC",'#10'"..'#9'c #C1BFC0",'#10'"+.'#9'c #C3C3' + +'C5",'#10'"@.'#9'c #BFC0C5",'#10'". . . . . . . . . . . . . . . . . . . .' + +' . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",' + +#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . ' + +'. . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . ' + +'. . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . ' + +'. . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",' + +#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . ' + +'. . . { ^ / / ( ^ / _ . . . . . . . . . ",'#10'". . . . . . . : / : < < ' + +'[ } < ^ | . . . . . . . . ",'#10'". . . . . . . / 5 < 6 7 8 9 0 < 5 , . ' + +'. . . . . . ",'#10'". . . . . . . c < } / ^ / c / < d e f . . . . . . ",' + +#10'". . . . . . . / i 5 j c / j / 9 < k l . . . . . . ",'#10'". . . . . ' + +'. . n o 5 ^ / p / c 7 < q r . . . . . . ",'#10'". . . . . . . / < t / ( ' + +'p j p u v w x . . . . . . ",'#10'". . . . . . . / } < j / / j / < < A B ' + +'. . . . . . ",'#10'". . . . . . . : p 6 6 { C D v < ) i E . . . . . . ",' + +#10'". . . . . . . F G H < I < J < { z K L . . . . . . ",'#10'". . . . . ' + +'. . ; . N O 8 P 5 { } < + . . . . . . . ",'#10'". . . . . . . . . . v < ' + +'< d < ] R . . . . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . ' + +'. . . . . . ",'#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",' + +#10'". . . . . . . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . ' + +'. . . . . . . . . . . . . . . . . . . . ",'#10'". . . . . . . . . . . . ' + +'. . . . . . . . . . . . . "};'#10 + ); + LazarusResources.Add('tspeedbutton','XPM', + '/* XPM */'#10'static char * speedbutton_xpm[] = {'#10'"25 25 7 1",'#10'" ' + +#9'c None",'#10'".'#9'c #FFFFFF",'#10'"+'#9'c #BEBEBE",'#10'"@'#9'c #0000' + +'00",'#10'"#'#9'c #666666",'#10'"$'#9'c #FFFF00",'#10'"%'#9'c #BABABA",' + +#10'" ",'#10'" ",'#10'" ' + +' ",'#10'" ",'#10'" ' + +' ",'#10'" ................... ",'#10'" .++++++++++' + +'+++++++@ ",'#10'" .+++##########++++@ ",'#10'" .+++#$$$$$$$$#+++' + +'+@ ",'#10'" .++#$$$$$$$$#%++++@ ",'#10'" .+#$$$$$$$$#++++++@ "' + +','#10'" .+####$$$$$####+++@ ",'#10'" .++++#$$$$$$$$#+++@ ",'#10 + +'" .+++#$$$$$$$$#++++@ ",'#10'" .++#$$$$$$$$#+++++@ ",'#10'" .+' + +'+#####$$$$##++++@ ",'#10'" .++++++#$$$$$#++++@ ",'#10'" .+++++#$' + +'$$$##+++++@ ",'#10'" .++++#$$$##+++++++@ ",'#10'" .++++####+++++' + +'++++@ ",'#10'" .+++++++++++++++++@ ",'#10'" @@@@@@@@@@@@@@@@@@@ ' + +' ",'#10'" ",'#10'" ",' + +#10'" "};'#10 + ); + LazarusResources.Add('tspinedit','XPM', + '/* XPM */'#10'static char * spinedit_xpm[] = {'#10'"25 25 99 2",'#10'" ' + +#9'c None",'#10'". '#9'c #929292",'#10'"+ '#9'c #747474",'#10'"@ '#9'c #8' + +'18181",'#10'"# '#9'c #7C7C7C",'#10'"$ '#9'c #7D7D7D",'#10'"% '#9'c #7777' + +'77",'#10'"& '#9'c #7E7E7E",'#10'"* '#9'c #878787",'#10'"= '#9'c #888888"' + +','#10'"- '#9'c #7A7A7A",'#10'"; '#9'c #858585",'#10'"> '#9'c #7B7B7B",' + +#10'", '#9'c #8A8A8A",'#10'"'' '#9'c #868686",'#10'") '#9'c #787878",'#10 + +'"! '#9'c #727272",'#10'"~ '#9'c #0B0B0B",'#10'"{ '#9'c #000000",'#10'"] ' + +#9'c #030303",'#10'"^ '#9'c #050505",'#10'"/ '#9'c #0A0A0A",'#10'"( '#9'c' + +' #040404",'#10'"_ '#9'c #FFFFFF",'#10'": '#9'c #F9F9F9",'#10'"< '#9'c #F' + +'CFCFC",'#10'"[ '#9'c #FDFDFD",'#10'"} '#9'c #BEBEBE",'#10'"| '#9'c #FFFD' + +'FF",'#10'"1 '#9'c #AA4747",'#10'"2 '#9'c #FEFCFF",'#10'"3 '#9'c #FEFEFF"' + +','#10'"4 '#9'c #010000",'#10'"5 '#9'c #020202",'#10'"6 '#9'c #C2C2C2",' + +#10'"7 '#9'c #020003",'#10'"8 '#9'c #FFFAFF",'#10'"9 '#9'c #FCFDFF",'#10 + +'"0 '#9'c #FAFBF3",'#10'"a '#9'c #FFFFFA",'#10'"b '#9'c #FFFEFF",'#10'"c ' + +#9'c #010103",'#10'"d '#9'c #FFFBFF",'#10'"e '#9'c #FFFFFD",'#10'"f '#9'c' + +' #FEFFFF",'#10'"g '#9'c #000105",'#10'"h '#9'c #FCFFFF",'#10'"i '#9'c #0' + +'00103",'#10'"j '#9'c #FBFFFF",'#10'"k '#9'c #F8FAFF",'#10'"l '#9'c #FBFE' + +'FF",'#10'"m '#9'c #F9FEFF",'#10'"n '#9'c #000201",'#10'"o '#9'c #FEFFFD"' + +','#10'"p '#9'c #050503",'#10'"q '#9'c #FEFFFB",'#10'"r '#9'c #F9FBFF",' + +#10'"s '#9'c #FBFCFF",'#10'"t '#9'c #C5C5C5",'#10'"u '#9'c #F8F8F8",'#10 + +'"v '#9'c #8D8D8D",'#10'"w '#9'c #FDFEF9",'#10'"x '#9'c #FCFEF9",'#10'"y ' + +#9'c #FDFDFB",'#10'"z '#9'c #FCFEFB",'#10'"A '#9'c #FCFFF2",'#10'"B '#9'c' + +' #FCFFF6",'#10'"C '#9'c #FEFFF4",'#10'"D '#9'c #FFFFF3",'#10'"E '#9'c #F' + +'EFFF5",'#10'"F '#9'c #FFFFFB",'#10'"G '#9'c #BCBCBC",'#10'"H '#9'c #C2C2' + +'C0",'#10'"I '#9'c #C3C0C7",'#10'"J '#9'c #C2C1C6",'#10'"K '#9'c #C2C0CB"' + +','#10'"L '#9'c #C2BFD0",'#10'"M '#9'c #C3C1CE",'#10'"N '#9'c #BEBFBA",' + +#10'"O '#9'c #C9CBC0",'#10'"P '#9'c #BBBCB7",'#10'"Q '#9'c #BEBEBC",'#10 + +'"R '#9'c #B9B8B4",'#10'"S '#9'c #C2C3BE",'#10'"T '#9'c #B7B7B5",'#10'"U ' + +#9'c #CACACA",'#10'"V '#9'c #B5B5B5",'#10'"W '#9'c #BBBBBB",'#10'"X '#9'c' + +' #FAFAFC",'#10'"Y '#9'c #FDFAFF",'#10'"Z '#9'c #FDFBFF",'#10'"` '#9'c #F' + +'DFCFA",'#10'" .'#9'c #FDFBFC",'#10'"..'#9'c #FDF9FF",'#10'"+.'#9'c #FCF8' + +'FF",'#10'"@.'#9'c #FEFDF9",'#10'"#.'#9'c #F8F8F0",'#10'"$.'#9'c #FFFEFC"' + +','#10'"%.'#9'c #FAF7FE",'#10'" ' + +' ",'#10'" ",'#10 + +'" ",'#10'" ' + +' ",'#10'" ' + +' ",'#10'" . + @ @ @ @ @ @ @ @ # # $ % & * = - ;' + +' > , '' ) ",'#10'" ! ~ { { { { { { { { ] ^ { / { { { ] { ( { { _ ",' + +#10'" @ { _ _ _ _ _ _ _ _ _ : _ < _ < _ [ < _ _ } _ ",'#10'" @ { | ' + +'1 1 1 1 1 1 1 1 2 3 { { { 4 { 5 { [ 6 _ ",'#10'" & 7 8 1 1 1 1 1 1 1 ' + +'1 _ 9 { 0 a { 9 b { _ _ ",'#10'" & c | d | _ _ _ _ 1 1 _ _ { e { { ' + +'{ b { _ _ ",'#10'" & c b _ _ _ _ _ _ 1 1 _ _ { _ f b 9 _ { _ _ ",' + +#10'" & c _ _ _ _ _ _ 1 1 _ _ _ { { { { { { { _ _ ",'#10'" & g h ' + +'_ _ _ _ _ 1 1 _ _ _ { { { { { { { _ _ ",'#10'" & i j _ _ _ _ 1 1 _ ' + +'_ _ _ { _ k _ 9 f { _ _ ",'#10'" & i l m _ _ _ 1 1 _ _ _ _ { _ { { ' + +'{ f { 9 _ ",'#10'" & n h _ _ _ 1 1 _ _ _ _ _ { _ l { 9 o { _ _ ",' + +#10'" + p q h h 9 1 1 j j r s _ { { { { { { { [ t u ",'#10'" v { w ' + +'x y _ 9 z A _ _ _ _ B C A D E F u _ G _ ",'#10'" , { H 6 I J H H J K ' + +'L M N O P Q R S T U V W _ ",'#10'" # X Y Y Y Z ` .Y ..+.Y @.#.$.b | ' + +'%._ _ _ _ [ ",'#10'" ",' + +#10'" ",'#10'" ' + +' ",'#10'" ' + +' "};'#10 + ); + LazarusResources.Add('default','XPM', + '/* XPM */'#10'static char * default_xpm[] = {'#10'"15 14 9 1",'#10'" '#9 + +'c None",'#10'".'#9'c #D11B76",'#10'"+'#9'c #770D46",'#10'"@'#9'c #B21A75' + +'",'#10'"#'#9'c #14BC2D",'#10'"$'#9'c #09F41D",'#10'"%'#9'c #99155F",'#10 + +'"&'#9'c #17D323",'#10'"*'#9'c #127C1F",'#10'" . ",'#10'" +' + +'.@ ",'#10'" +.@ ",'#10'" ++.@@ ",'#10'" ++.@@' + +' # ",'#10'" +++.@@@ #### ",'#10'" +++.@@@ #$$$##",'#10'"+++%.@@@@#' + +'$$#&#",'#10'"+++%.@@@#*##&&#",'#10'"++%%.@@@#**#&&#",'#10'"..%%....#**#&' + +'&#",'#10'" #*### ",'#10'" ### ",'#10'" "' + +'};'#10 + ); diff --git a/ide/compreg.pp b/ide/compreg.pp new file mode 100644 index 0000000000..b3dcf0408c --- /dev/null +++ b/ide/compreg.pp @@ -0,0 +1,244 @@ +unit CompReg; +{ + Author: Mattias Gaertner + + Abstract: + All components that should be usable to the IDE must register themselves. + There is a list of all components. And every component can also be found + in the list of its component page. + + ToDo: + see XXX +} +{$MODE OBJFPC} + +interface + +uses Classes, SysUtils; + +type + TRegisteredComponentPage = class; + TRegisteredComponentList = class; + + TRegisteredComponent = class + // describes a single component + private + FPage:TRegisteredComponentPage; + FComponentClass:TComponentClass; + FIndexInPage:integer; + FUnitName:ShortString; + public + property Page:TRegisteredComponentPage read FPage; + property ComponentClass:TComponentClass read FComponentClass; + property IndexInPage:integer read FIndexInPage; + property UnitName:ShortString; + constructor Create(APage:TRegisteredComponentPage; TheIndexInPage:integer; + AUnitName:ShortString; AComponentClass:TComponentClass); + end; + + TRegisteredComponentPage = class + // describes the components in a single component page + private + FCount:integer; + FPageIndex:integer; + FName:ShortString; + FItems:TList; + FCompList:TRegisteredComponentList; + function GetItem(Index:integer):TRegisteredComponent; + Function GetCount : Integer; + public + property Items[Index:integer]:TRegisteredComponent read GetItem; default; + property Count:integer read GetCount; + property PageIndex:integer read FPageIndex; + property Name:ShortString read FName; + property CompList:TRegisteredComponentList read FCompList; + constructor Create(ACompList:TRegisteredComponentList; APageIndex:integer; + PageName:ShortString); + destructor Destroy; override; + end; + + TRegisteredComponentList = class + // a list of all registered components and all component pages + private + FItems:TList; + FPages:TList; + function GetItem(Index:integer):TRegisteredComponent; + function GetPage(Index:integer):TRegisteredComponentPage; + public + procedure RegisterComponents(const Page:ShortString; UnitName:ShortString; + ComponentClasses: array of TComponentClass); + property Items[Index:integer]:TRegisteredComponent read GetItem; default; + function Count:integer; + function FindComponentClassByName(Name:ShortString):TRegisteredComponent; + property Pages[Index:integer]:TRegisteredComponentPage read GetPage; + function PageCount:integer; + function FindPageByName(Name:ShortString):TRegisteredComponentPage; + procedure Clear; + constructor Create; + destructor Destroy; override; + end; + + +const + RegisterComponentsProc: procedure(const Page,UnitName:ShortString; + ComponentClasses: array of TComponentClass) = nil; + +procedure RegisterComponents(const Page,UnitName:ShortString; + ComponentClasses: array of TComponentClass); + + +implementation + + +procedure RegisterComponents(const Page,UnitName:ShortString; + ComponentClasses: array of TComponentClass); +begin + if Assigned(RegisterComponentsProc) then + RegisterComponentsProc(Page, UnitName, ComponentClasses) + else begin + // XXX ToDo: + {raise EComponentError.CreateRes(@SRegisterError);} + writeln('[RegisterComponents] Error: RegisterComponentsProc not assigned.'); + halt; + end; +end; + + +{ TRegisteredComponent } + +constructor TRegisteredComponent.Create(APage:TRegisteredComponentPage; + TheIndexInPage:integer; AUnitName:ShortString; + AComponentClass:TComponentClass); +begin + FPage:=APage; + FIndexInPage:=TheIndexInPage; + FComponentClass:=AComponentClass; + FUnitName:=AUnitName; +end; + +{ TRegisteredComponentPage } + +constructor TRegisteredComponentPage.Create(ACompList:TRegisteredComponentList; + APageIndex:integer; PageName:ShortString); +begin + FName:=PageName; + FCompList:=ACompList; + FPageIndex:=APageIndex; + FItems:=TList.Create; +end; + +destructor TRegisteredComponentPage.Destroy; +begin + FItems.Free; +end; + +function TRegisteredComponentPage.GetItem(Index:integer):TRegisteredComponent; +begin + Result:=TRegisteredComponent(FItems[Index]); +end; + +function TRegisteredComponentPage.GetCount:Integer; +begin + Result:= FItems.Count; +end; + + +{ TRegisteredComponentList } + +constructor TRegisteredComponentList.Create; +begin + FItems:=TList.Create; + FPages:=TList.Create; +end; + +destructor TRegisteredComponentList.Destroy; +begin + Clear; + FPages.Free; + FItems.Free; +end; + +procedure TRegisteredComponentList.Clear; +var a:integer; +begin + for a:=0 to FItems.Count-1 do + Items[a].Free; + FItems.Clear; + for a:=0 to FPages.Count-1 do + Pages[a].Free; + FPages.Clear; +end; + +function TRegisteredComponentList.GetItem(Index:integer):TRegisteredComponent; +begin + Result:=TRegisteredComponent(FItems[Index]); +end; + +function TRegisteredComponentList.Count:integer; +begin + Result:=FItems.Count; +end; + +function TRegisteredComponentList.FindComponentClassByName( + Name:ShortString):TRegisteredComponent; +var a:integer; +begin + Name:=uppercase(Name); + for a:=0 to FItems.Count-1 do begin + if uppercase(Items[a].FComponentClass.ClassName)=Name then begin + Result:=Items[a]; + exit; + end; + end; + Result:=nil; +end; + +procedure TRegisteredComponentList.RegisterComponents(const Page:ShortString; + UnitName:ShortString; ComponentClasses: array of TComponentClass); +var NewPage:TRegisteredComponentPage; + a:integer; + NewComp:TRegisteredComponent; +begin +Writeln('REGISTERING COMPONENT'); + + NewPage:=FindPageByName(Page); + if NewPage=nil then begin + NewPage:=TRegisteredComponentPage.Create(Self,FPages.Count,Page); + FPages.Add(NewPage); + end; + for a:=Low(ComponentClasses) to High(ComponentClasses) do begin + NewComp:=TRegisteredComponent.Create(NewPage,NewPage.Count,UnitName, + ComponentClasses[a]); + FItems.Add(NewComp); + NewPage.FItems.Add(NewComp); + end; +end; + +function TRegisteredComponentList.PageCount:integer; +begin + Result:=FPages.Count; +end; + +function TRegisteredComponentList.GetPage(Index:integer):TRegisteredComponentPage; +begin + Result:=TRegisteredComponentPage(FPages[Index]); +end; + +function TRegisteredComponentList.FindPageByName( + Name:ShortString):TRegisteredComponentPage; +var a:integer; +begin + Name:=uppercase(Name); + for a:=0 to FPages.Count-1 do begin + if uppercase(Pages.Name)=Name then begin + Result:=Pages[a]; + exit; + end; + end; + Result:=nil; +end; + + + +end. + diff --git a/ide/idecomp.pp b/ide/idecomp.pp index 9144a3e7a6..b8bf756a36 100644 --- a/ide/idecomp.pp +++ b/ide/idecomp.pp @@ -2,7 +2,7 @@ /*************************************************************************** idecomp.pp - ------------------- - TMain is the application toolbar window. + TIDEComponent Initial Revision : Sun Mar 28 23:15:32 CST 1999 @@ -28,7 +28,7 @@ interface uses classes,LclLinux,stdctrls,forms,buttons,menus,comctrls, - Spin, sysutils,Controls,graphics,extctrls, Dialogs,dlgMEssage; + Spin, sysutils,Controls,compreg,Graphics,extctrls; type @@ -38,1029 +38,236 @@ type ---------------------------------------------} TIDEComponent = class(TObject) private - FImage : String; - FClassName : String; //hold the main types classname - FClassType : TClass; - procedure SetImage(Value : String); + FSpeedButton : TSpeedButton; + FRegisteredComponent : TRegisteredComponent; protected Function LoadImageintoPixmap : TPixmap; public - constructor Create; virtual; - function CreateMethod(AOwner : TComponent) :Tcontrol; virtual; - procedure ClickMethod(sender : TObject); Virtual; - procedure DblClickMethod(sender : TObject); Virtual; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; Virtual; - property image : string read FImage write SetImage; - property ClassName : String read FClassName write FClassName; - property ClassType : TClass read FClassType write FClassType; + constructor Create; + destructor Destroy; override; + Function _Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; Virtual; + property SpeedButton : TSpeedButton read FSpeedButton write FSPeedbutton; + property RegisteredComponent : TRegisteredComponent read FRegisteredComponent write FRegisteredComponent; end; {------------------------------------------- This class keeps a list of TIDeComponents --------------------------------------------} - TIdeCompList = TList; + TIdeCompList = Class(TObject) + private + FItems : TList; + FCount : Integer; + Function GetCount : Integer; + public + constructor Create; + destructor Destroy; override; + + function FindCompbySpeedbutton(Value : TSpeedButton) : TIDEComponent; + function FindCompbyIndex(Value : Integer) : TIDEComponent; + function FindCompbyRegComponent(Value : TRegisteredComponent) : TIDEComponent; + + function Add(Value : TObject) : Integer; + function Delete(Value : TObject) : Boolean; + property Count : Integer read GetCount; + end; {------------------------------------------- These are the default components --------------------------------------------} -TIDEMouse = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEMenu = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEPopup = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEEdit = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDELabel = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEButton = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEMemo = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDECheckbox = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDERadioButton = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEListbox = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEComboBox = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDEBitBtn = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDESpeedbutton = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDESpinedit = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - -TIDENotebook = class(TIdeComponent) - public - function CreateMethod(AOwner : TComponent): TControl; override; - procedure ClickMethod(sender: TObject); override; - procedure DblClickMethod(sender: TObject); override; - constructor Create; override; - Function Speedbutton(AOwner : TComponent; nParent: TWinControl): TSpeedButton; override; - end; - var IDECompList : TIDECompList; +RegCompList:TRegisteredComponentList; implementation -uses Project,global; +uses Project,global,LResources; + + +{ TIDECompList } + +constructor TIDECompList.Create; +begin +inherited create; +FItems := TList.Create; +end; + +destructor TIDECompList.destroy; +begin +FItems.Destroy; +inherited; +end; + +function TIdeCompList.GetCount : Integer; +Begin +Result := FItems.Count; +end; + +function TIDECompList.FindCompbyIndex(Value : Integer) : TIDEComponent; +Begin +if Value < FItems.Count then + Result := TIDEComponent(FITems[Value]) else + Result := nil; + +end; + + +function TIDECompList.FindCompbySpeedbutton(Value : TSpeedButton) : TIDEComponent; +var +I : Integer; +Begin +for I := 0 to Count-1 do + Begin + Result := TIDeComponent(FItems[i]); + if (Result.SpeedButton = Value) then exit; + end; + Result := nil; + +end; + +function TIDECompList.FindCompbyRegComponent(Value : TRegisteredComponent) : TIDEComponent; +var +I : Integer; +Begin +for I := 0 to Count-1 do + Begin + Result := TIDeComponent(FItems[i]); + if (Result.RegisteredComponent = Value) then exit; + end; + Result := nil; + +end; + + +function TIdeCompList.Add(Value : TObject) : Integer; +Begin +Result := FItems.Add(Value); +end; + +function TIdeCompList.Delete(Value : TObject) : Boolean; +Begin +result := (FItems.IndexOf(Value) >= 0); +if Result then FItems.Delete(FItems.IndexOf(Value)); +end; + +{ TIDECOMPONENT } constructor TIDEComponent.Create; begin inherited create; -Fimage := 'images/mouse.xpm'; -FClassName := 'TIDECOMPONENT'; +IDECompList.Add(self); end; -Procedure TIDEComponent.SetImage(value : String); +destructor TIDEComponent.destroy; begin -if FileExists(value) then - fimage := Value; +IDECompList.Delete(self); +inherited; end; -Procedure TIDEComponent.ClickMethod(sender:TObject); -begin -end; - -Procedure TIDEComponent.DblClickMethod(sender : TObject); -begin -end; - -Function TIDEComponent.CreateMethod(AOwner : TComponent): TControl; -begin -result := nil; -end; - -Function TIDEComponent.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; +Function TIDEComponent._Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; var -Speedbtn : TSpeedbutton; -Pixmap1 : TPixmap; + Pixmap1 : TPixmap; Begin pixmap1 := LoadImageintoPixmap; - SpeedBtn := TSpeedButton.Create(aowner); - with SpeedBtn do + FSpeedButton := TSpeedButton.Create(aowner); + with FSpeedButton do Begin Parent := nParent; Flat := True; + Left := (FRegisteredComponent.IndexInPage+1)*26; Width := 25; Height := 25; Enabled := True; Glyph := Pixmap1; Visible := True; + end; -Result := Speedbtn; - +result := FSpeedButton; end; -Function TIDeComponent.LoadImageintoPixmap : TPixmap; -var -S : TStream; -Begin - S := TFileStream.Create(image, fmOpenRead); - try - Result := TPixmap.Create; - Result.TransparentColor := clBtnFace; - Result.LoadFromStream(S); - finally - S.Free; +function TIDEComponent.LoadImageIntoPixmap: TPixmap; + + function LoadResource(ResourceName:string; PixMap:TPixMap):boolean; + var + ms:TMemoryStream; + res:LResource; + begin + Result:=false; + res:=LazarusResources.Find(ResourceName); + if (res.Value<>'') then begin + if res.ValueType='XPM' then begin + ms:=TMemoryStream.Create; + try + ms.Write(res.Value[1],length(res.Value)); + ms.Position:=0; + PixMap.LoadFromStream(ms); + Result:=true; + finally + ms.Free; + end; + end; end; - -end; - - -{---------------------------------------} -constructor TIDEMouse.create; -begin -inherited create; -FImage := 'images/mouse.xpm'; -ClassName := 'TMOUSE'; //not really the classname for a mouse -//ClassType := TComponent; -end; - -function TIDEMouse.CreateMethod(AOwner : TComponent): TControl; -begin -//this doesn't create any control on the form -result := nil; -end; - -Procedure TIDEMouse.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEMouse.DblClickMethod(sender : TObject); -Begin -//need to add the form.create method here. -{ for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - } -end; - -Function TIDEMouse.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -begin -result := inherited Speedbutton(aowner,nparent); -Result.hint := 'Mouse Pointer'; -end; -{--------------------------------------------------} - - - -{---------------------------------------} -constructor TIDEMenu.create; -begin -inherited create; -FImage := 'images/menu.xpm'; -FClassName := 'TMenu'; -FClassType := TMenu; -end; - -function TIDEMenu.CreateMethod(AOwner : TComponent): TControl; -begin -//return another speedbutton to drop on the form -result := SpeedButton(AOwner, TWinControl(AOwner)); -end; - -Procedure TIDEMenu.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEMenu.DblClickMethod(sender : TObject); -Begin -//need to create a menu editor - -end; - -Function TIDEMenu.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -Result.hint := 'Menu'; -end; -{--------------------------------------------------} - - -{---------------------------------------} -constructor TIDEPopup.create; -begin -inherited create; -FImage := 'images/popup.xpm'; -FClassName := 'TPopup'; -FClassType := TPopupMenu; - -end; - -function TIDEPopup.CreateMethod(AOwner : TComponent): TControl; -begin -//return another speedbutton to drop on the form -result := SpeedButton(AOwner, TWinControl(AOwner)); -end; - -Procedure TIDEPopup.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEPopup.DblClickMethod(sender : TObject); -Begin -//need to create a popup menu editor - -end; - -Function TIDEPopup.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDEEdit.create; -begin -inherited create; -FImage := 'images/editbox.xpm'; -FClassName := 'TEdit'; -FClassType := TEdit; - -end; - -function TIDEEdit.CreateMethod(AOwner : TComponent): TControl; -begin -result := TEdit.Create(AOwner); -end; - -Procedure TIDEEdit.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEEdit.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T' + TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEEdit.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDELabel.create; -begin -inherited create; -FImage := 'images/label.xpm'; -FClassName := 'TLabel'; -FClassType := TLabel; -end; - -function TIDELabel.CreateMethod(AOwner : TComponent): TControl; -begin -result := TLabel.Create(AOwner); -end; - -Procedure TIDELabel.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDELabel.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDELabel.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDEButton.create; -begin -inherited create; -FImage := 'images/button.xpm'; -FClassName := 'TButton'; -FClassType := TButton; -end; - -function TIDEButton.CreateMethod(AOwner : TComponent): TControl; -begin -result := TButton.Create(AOwner); -end; - -Procedure TIDEButton.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEButton.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEButton.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDEMemo.create; -begin -inherited create; -FImage := 'images/memo.xpm'; -FClassName := 'TMemo'; -FClassType := TMemo; - -end; - -function TIDEMemo.CreateMethod(AOwner : TComponent): TControl; -begin -result := TMemo.Create(AOwner); -end; - -Procedure TIDEMemo.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEMemo.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEMemo.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - -{---------------------------------------} -constructor TIDECheckbox.create; -begin -inherited create; -FImage := 'images/checkbox.xpm'; -FClassName := 'TCheckbox'; -FClassType := TCheckBox; - -end; - -function TIDECheckbox.CreateMethod(AOwner : TComponent): TControl; -begin -result := TCheckbox.Create(AOwner); -end; - -Procedure TIDECheckbox.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDECheckbox.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDECheckbox.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDERadioButton.create; -begin -inherited create; -FImage := 'images/radiobutton.xpm'; -FClassName := 'TRadioButton'; -FClassType := TRadioButton; - -end; - -function TIDERadioButton.CreateMethod(AOwner : TComponent): TControl; -begin -result := TRadioButton.Create(AOwner); -end; - -Procedure TIDERadioButton.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDERadioButton.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDERadioButton.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDEListbox.create; -begin -inherited create; -FImage := 'images/listbox.xpm'; -FClassName := 'TListbox'; -FClassType := TListbox; - -end; - -function TIDEListbox.CreateMethod(AOwner : TComponent): TControl; -begin -result := TListbox.Create(AOwner); -end; - -Procedure TIDEListbox.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEListbox.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEListbox.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - -{---------------------------------------} -constructor TIDEComboBox.create; -begin -inherited create; -FImage := 'images/combobox.xpm'; -FClassName := 'TCombobox'; -FClassType := TComboBox; -end; - -function TIDEComboBox.CreateMethod(AOwner : TComponent): TControl; -begin -result := TComboBox.Create(AOwner); -end; - -Procedure TIDEComboBox.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEComboBox.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEComboBox.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - - -{---------------------------------------} -constructor TIDEBitbtn.create; -begin -inherited create; -FImage := 'images/bitbtn.xpm'; -FClassName := 'TBitbtn'; -FClassType := TBitBtn; -end; - -function TIDEBitBtn.CreateMethod(AOwner : TComponent): TControl; -begin -result := TBitBtn.Create(AOwner); -end; - -Procedure TIDEBitBtn.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDEBitBtn.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDEBitBtn.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - - -{---------------------------------------} -constructor TIDESpeedbutton.create; -begin -inherited create; -FImage := 'images/speedbutton.xpm'; -FClassName := 'TSpeedbutton'; -FClassType := TSpeedButton; -end; - -function TIDESpeedbutton.CreateMethod(AOwner : TComponent): TControl; -var -S : TStream; -Pixmap1 :TPixmap; -begin -result := TSpeedbutton.Create(AOwner); - S := TFileStream.Create('./images/default.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; end; -with TSpeedbutton(result) do - Begin - Glyph := Pixmap1; - Flat := False; +begin + Result:=TPixMap.Create; + Result.TransparentColor:=clBtnFace; + if not LoadResource + (FRegisteredComponent.ComponentClass.ClassName,Result) then + begin + LoadResource('default',Result); + end; +end; + + +{--------------------------------------------------} + + + + +procedure RegisterStandardComponents( + ARegisteredComponentList:TRegisteredComponentList); + + procedure RegisterComponents(const Page,UnitName:ShortString; + ComponentClasses: array of TComponentClass); + begin + ARegisteredComponentList.RegisterComponents(Page,UnitName,ComponentClasses); end; -end; - -Procedure TIDESpeedbutton.ClickMethod(sender : TObject); begin -inherited ClickMethod(Sender); -end; -Procedure TIDESpeedbutton.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; +// RegisterStandardComponents - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; + RegisterComponentsProc:=@RegisterComponents; + RegisterComponents('Standard','Menus',[TMenu,TPopupMenu]); + RegisterComponents('Standard','StdCtrls',[TEdit,TLabel,TMemo,TCheckBox + ,TListBox,TRadioButton,TComboBox,TScrollBar,TGroupBox,TToggleBox]); + RegisterComponents('Standard','Buttons',[TButton,TBitBtn,TSpeedButton]); + RegisterComponents('Additional','ExtCtrls',[TNoteBook,TTimer,TPaintBox + ,TBevel,TRadioGroup]); + RegisterComponents('Additional','ComCtrls',[TStatusBar,TListView,TProgressBar + ,TToolBar,TToolButton,TTrackBar]); + RegisterComponentsProc:=nil; end; -Function TIDESpeedButton.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - - -{---------------------------------------} -constructor TIDESpinedit.create; -begin -inherited create; -FImage := 'images/spinedit.xpm'; -FClassName := 'TSpinEdit'; -FClassType := TSpinEdit; -end; - -function TIDESpinedit.CreateMethod(AOwner : TComponent): TControl; -begin -Writeln('TIDESPinEdit.CreateMethod1'); -result := TSpinedit.Create(AOwner); -Writeln('TIDESPinEdit.CreateMethod2'); -end; - -Procedure TIDESpinedit.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDESpinedit.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDESpinedit.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - - - - -{---------------------------------------} -constructor TIDENotebook.create; -begin -inherited create; -FImage := 'images/notebook.xpm'; -FClassName := 'TNotebook'; -FClassType := TNotebook; -end; - -function TIDENotebook.CreateMethod(AOwner : TComponent): TControl; -begin -result := TNotebook.Create(AOwner); -end; - -Procedure TIDENotebook.ClickMethod(sender : TObject); -begin -inherited ClickMethod(Sender); -end; - -Procedure TIDENotebook.DblClickMethod(sender : TObject); -var -I : Integer; -NewLine : String; -Texts : String; -Begin -//need to add the onclick to the source. - for i := 0 to Project1.Unitlist.Count-1 do - begin - if TUnitInfo(Project1.Unitlist.items[i]).Formname = tform(tcontrol(sender).parent).name then break; - end; - - if I < Project1.Unitlist.Count then - Begin - NewLine := 'procedure '+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddControlLine(NewLine); - texts := 'T'+TUnitInfo(Project1.Unitlist.items[i]).FormName; - NewLine := 'Procedure '+Texts+'.'+tcontrol(sender).name+'click(Sender : TObject);'; - TUnitInfo(Project1.Unitlist.items[i]).AddProcedureLine(NewLine); - end; - - -end; - -Function TIDENotebook.Speedbutton(aowner : TComponent; nParent : TWinControl): TSpeedButton; -Begin -result := inherited Speedbutton(aowner,nparent); -end; - -{--------------------------------------------------} - - initialization -IdeCompList := TList.Create; +{$I designer/lazarus_control_images.lrs} +RegCompList := TRegisteredComponentList.Create; +RegisterStandardComponents(RegCompList); + +IdeCompList := TIDECompList.Create; + finalization IdeCompList.Destroy; - - +RegCompList.Destroy; end. diff --git a/ide/lazres.pp b/ide/lazres.pp new file mode 100644 index 0000000000..2db0aa4bce --- /dev/null +++ b/ide/lazres.pp @@ -0,0 +1,83 @@ +program lazres; +{ + Author: Mattias Gaertner + + Name: + lazres - creates an lazarus resource file from files + + Synopsis: + lazres resourcefilename filename1 [filename2 ... filenameN] + + Description: + lazres creates a lazarus resource file from filenameXXX. + +} + +{$mode objfpc} + +uses Classes, SysUtils, LResources; + +var + ResourceFilename,BinFilename,BinExt,ResourceName,ResourceType:AnsiString; + a:integer; + ResStream,BinStream:TFileStream; + +begin + if ParamCount<2 then begin + writeln('Usage: ',ExtractFileName(ParamStr(0)) + ,' resourcefilename filename1 [filename2 ... filenameN]'); + end else begin + ResourceFilename:=ParamStr(1); + try + ResStream:=TFileStream.Create(ResourceFilename,fmCreate); + except + writeln('ERROR: unable to create file '''+ResourceFilename+''''); + halt(1); + end; + try + for a:=2 to ParamCount do begin + BinFilename:=ParamStr(a); + write(BinFilename); + try + BinStream:=TFileStream.Create(BinFilename,fmOpenRead); + try + BinExt:=uppercase(ExtractFileExt(BinFilename)); + if BinExt='.LFM' then begin + ResourceType:='FORMDATA'; + ResourceName:=FindLFMClassName(BinStream); + if ResourceName='' then begin + writeln(' ERROR: no resourcename'); + halt(2); + end; + write( + ' ResourceName='''+ResourceName+''' Type='''+ResourceType+''''); + LFMtoLFCstream(BinStream,ResStream); + end else begin + ResourceType:=copy(BinExt,2,length(BinExt)-1); + ResourceName:=ExtractFileName(BinFilename); + ResourceName:=copy(ResourceName,1 + ,length(ResourceName)-length(BinExt)); + if ResourceName='' then begin + writeln(' ERROR: no resourcename'); + halt(2); + end; + write( + ' ResourceName='''+ResourceName+''' Type='''+ResourceType+''''); + BinaryToLazarusResourceCode(BinStream,ResStream + ,ResourceName,ResourceType); + end; + finally + BinStream.Free; + end; + except + writeln(' ERROR: unable to read file '''+BinFilename+''''); + halt(3); + end; + writeln(''); + end; + finally + ResStream.Free; + end; + end; +end. + diff --git a/ide/lresources.pp b/ide/lresources.pp new file mode 100644 index 0000000000..fc909686e0 --- /dev/null +++ b/ide/lresources.pp @@ -0,0 +1,291 @@ +unit lresources; +{ + Author: Mattias Gaertner + + Abstract: + This unit maintains and stores all lazarus resources in the global list + named LazarusResources. + A lazarus resource is an ansistring, with a name and a valuetype. Both, name + and valuetype, are ansistrings. + Lazarus resources are normally included via an include directive in the + initialization part of a unit. To create such include files use the + BinaryToLazarusResourceCode procedure. + To create a LFC file from an LFM file use the LFMtoLFCfile function which + transforms the LFM text to binary format and stores it as Lazarus resource + include file. + + ToDo: + The ResourceList is currently a sorted list, which is okay for hundreds + of resources. But stringtables consist normally of thousands of entries. + Therefore a special StringTable Resource is needed. + +} +{$mode objfpc} + +interface + +uses + Classes, SysUtils, Strings; + +type + PLResource = ^LResource; + LResource = record + Name: AnsiString; + ValueType: AnsiString; + Value: AnsiString; + end; + + TLResourceList = class(TObject) + FList:TList; + function FindPosition(Name:AnsiString):integer; + public + procedure Add(Name,ValueType,Value:AnsiString); + function Find(Name:AnsiString):LResource; + constructor Create; + destructor Destroy; override; + end; + +procedure BinaryToLazarusResourceCode(BinStream,ResStream:TStream; + ResourceName, ResourceType:AnsiString); +function LFMtoLFCfile(LFMfilename:ansistring):boolean; + // returns true if successful +function LFMtoLFCstream(LFMStream,LFCStream:TStream):boolean; + // returns true if successful +function FindLFMClassName(LFMStream:TStream):AnsiString; + + +var LazarusResources:TLResourceList; + +implementation + + +procedure BinaryToLazarusResourceCode(BinStream,ResStream:TStream; + ResourceName, ResourceType:AnsiString); +{ example ResStream: + LazarusResources.Add('ResourceName','ResourceType', + #123#45#34#78#18#72#45#34#78#18#72#72##45#34#78#45#34#78#184#34#78#145#34#78 + +#83#187#6#78#83 + ); +} +const LineEnd:string=#10; + RightMargin:integer=79; +var s,Indent:string; + p,x:integer; + c,h:char; + RangeString,NewRangeString:boolean; +begin + Indent:=' '; + s:=Indent+'LazarusResources.Add('''+ResourceName+''','''+ResourceType+''',' + +LineEnd; + ResStream.Write(s[1],length(s)); + p:=0; + Indent:=' '+Indent; + ResStream.Write(Indent[1],length(Indent)); + x:=length(Indent); + RangeString:=false; + while p=32) and (ord(c)<=127); + if NewRangeString then begin + if RangeString then + s:='' + else begin + s:=''''; + end; + s:=s+c; + if c='''' then s:=s+''''; + end else begin + if RangeString then begin + s:=''''; + end else + s:=''; + s:=s+'#'+IntToStr(ord(c)); + end; + inc(x,length(s)); + if (x>RightMargin) or ((NewRangeString) and (x=RightMargin)) then begin + if RangeString then begin + h:=''''; + ResStream.Write(h,1); + if NewRangeString then + s:=''''+s + else begin + s:=copy(s,2,length(s)-1); + end; + end; + ResStream.Write(LineEnd[1],length(LineEnd)); + s:=Indent+'+'+s; + x:=length(s); + end; + ResStream.Write(s[1],length(s)); + RangeString:=NewRangeString; + inc(p); + end; + if RangeString then begin + h:=''''; + ResStream.Write(h,1); + end; + Indent:=copy(Indent,3,length(Indent)-2); + s:=LineEnd+Indent+');'+LineEnd; + ResStream.Write(s[1],length(s)); +end; + +function FindLFMClassName(LFMStream:TStream):ansistring; +// the classname is the last word of the first line +var c:char; + StartPos,EndPos:integer; +begin + Result:=''; + StartPos:=-1; + c:=' '; + repeat + if (not (c in ['a'..'z','A'..'Z'])) then + StartPos:=LFMStream.Position; + LFMStream.Read(c,1); + if LFMStream.Position>1000 then exit; + until c in [#10,#13]; + if StartPos<0 then exit; + EndPos:=LFMStream.Position-1; + SetLength(Result,EndPos-StartPos); + LFMStream.Position:=StartPos; + LFMStream.Read(Result[1],length(Result)); + LFMStream.Position:=0; +end; + +function LFMtoLFCfile(LFMfilename:ansistring):boolean; +// returns true if successful +var LFMStream,LFCStream:TFileStream; + LFCfilename,LFMfilenameExt:ansistring; +begin + Result:=true; + try + LFMStream:=TFileStream.Create(LFMfilename,fmOpenRead); + try + LFMfilenameExt:=ExtractFileExt(LFMfilename); + LFCfilename:=copy(LFMfilename,1, + length(LFMfilename)-length(LFMfilenameExt))+'.lfc'; + LFCStream:=TFileStream.Create(LFCfilename,fmCreate); + try + Result:=LFMtoLFCstream(LFMStream,LFCStream); + finally + LFCStream.Free; + end; + finally + LFMStream.Free; + end; + except + Result:=false; + end; +end; + +function LFMtoLFCstream(LFMStream,LFCStream:TStream):boolean; +// returns true if successful +var FormClassName:ansistring; + BinStream:TMemoryStream; +begin + Result:=true; + try + FormClassName:=FindLFMClassName(LFMStream); + BinStream:=TMemoryStream.Create; + try + ObjectTextToBinary(LFMStream,BinStream); + BinStream.Position:=0; + BinaryToLazarusResourceCode(BinStream,LFCStream,FormClassName + ,'FORMDATA'); + finally + BinStream.Free; + end; + except + Result:=false; + end; +end; + +{ TLResourceList } + +constructor TLResourceList.Create; +begin + FList:=TList.Create; +end; + +destructor TLResourceList.Destroy; +var a:integer; + p:PLResource; +begin + for a:=0 to FList.Count-1 do begin + p:=FList[a]; + LResource(p^).Name:=''; + LResource(p^).ValueType:=''; + LResource(p^).Value:=''; + FreeMem(p); + end; + FList.Free; +end; + +procedure TLResourceList.Add(Name,ValueType,Value:AnsiString); +var NewPLResource:PLResource; + NewPos,cmp:integer; +begin + GetMem(NewPLResource,SizeOf(LResource)); + NewPLResource^.Name:=Name; + NewPLResource^.ValueType:=uppercase(ValueType); + NewPLResource^.Value:=Value; + if FList.Count=0 then begin + FList.Add(NewPLResource); + end else begin + NewPos:=FindPosition(Name); + if (NewPos<0) then begin + NewPos:=0; + end else if (NewPos=0) and (p0 then + l:=Result+1 + else + exit; + end; +end; + +initialization + LazarusResources:=TLResourceList.Create; + +finalization + LazarusResources.Free; + +end. + diff --git a/ide/main.pp b/ide/main.pp index 9a7f061fd7..ed441a69f4 100644 --- a/ide/main.pp +++ b/ide/main.pp @@ -32,7 +32,7 @@ uses Spin, project,sysutils, global, compileroptions, Controls, graphics, extctrls, Dialogs, dlgMEssage, Designer, process, idecomp, Find_dlg, FormEditor, AbstractFormEditor, - CustomFormEditor, ObjectInspector, ControlSelection, PropEdits, UnitEditor; + CustomFormEditor, ObjectInspector, ControlSelection, PropEdits, UnitEditor,CompReg; const STANDARDBTNCOUNT = 50; @@ -48,6 +48,7 @@ type Toolbutton2 : TToolButton; Toolbutton3 : TToolButton; Toolbutton4 : TToolButton; + GlobalMouseSpeedButton : TSpeedButton; Pixmap1 : TPixmap;//used to assign the tspeedbutton its image Bitmap1 : TBitmap; SpeedButton1 : TSpeedButton; @@ -155,7 +156,6 @@ type FCodeLastActivated : Boolean; //used for toggling between code and forms FControlLastActivated : TObject; Function CreateSeperator : TMenuItem; - Procedure SetBtnDefaults(Control : Pointer;I,Page : Integer); Function ReturnActiveUnitList : TUnitInfo; Procedure UpdateViewDialogs; protected @@ -167,8 +167,7 @@ type // Procedure Paint; override; Function ReturnFormName(Source : TStringList) : String; - Standardbtn : Array[1..STANDARDBTNCOUNT] of TSpeedbutton; - + SelectedComponent : TRegisteredComponent; public constructor Create(AOwner: TComponent); override; procedure LoadMainMenu; @@ -202,20 +201,52 @@ var TagInc : Integer; + implementation uses - TestForm, ViewUnit_dlg,ViewForm_dlg, Math; + TestForm, ViewUnit_dlg,ViewForm_dlg, Math,lresources; + { TForm1 } -constructor TForm1.Create(AOwner: TComponent); +constructor TForm1.Create(AOwner: TComponent); + + + + + function LoadResource(ResourceName:string; PixMap:TPixMap):boolean; + var + ms:TMemoryStream; + res:LResource; + begin + Result:=false; + res:=LazarusResources.Find(ResourceName); + if (res.Value<>'') then begin + if res.ValueType='XPM' then begin + ms:=TMemoryStream.Create; + try + ms.Write(res.Value[1],length(res.Value)); + ms.Position:=0; + PixMap.LoadFromStream(ms); + Result:=true; + finally + ms.Free; + end; + end; + end; + end; + var Filename : String; S : TStream; - i : Integer; + i,x : Integer; R : TRect; IDEControl : pointer; + + RegComp : TRegisteredComponent; + RegCompPage : TRegisteredComponentPage; + IDeComponent : TIdeComponent; begin inherited Create(AOwner); @@ -248,7 +279,8 @@ begin Width := ClientWidth; Show; end; -} +} + Notebook1 := TNotebook.Create(Self); Notebook1.Parent := Self; Notebook1.Align := alBottom; @@ -257,24 +289,68 @@ begin Notebook1.Top :=50+ 2; Notebook1.Width := ClientWidth; Notebook1.Height := 100; //ClientHeight - Notebook1.Top; - Notebook1.Pages.Strings[0] := 'Standard'; - Notebook1.Pages.Add('Additional'); - Notebook1.Pages.Add('Samples'); - Notebook1.Pages.Add('System'); - Notebook1.Pages.Add('Internet'); + + + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('tmouse',Pixmap1) then + begin + LoadResource('default',Pixmap1); + end; + + + + For I := 0 to RegCompList.PageCount-1 do + Begin + Writeln('I = '+inttostr(i)); + RegCompPage := RegCompList.Pages[i]; + if I = 0 then + Notebook1.Pages.Strings[i] := RegCompPage.Name + else + Notebook1.Pages.Add(RegCompPage.Name); + + GlobalMouseSpeedButton := TSpeedButton.Create(Self); + with GlobalMouseSPeedButton do + Begin + Parent := Notebook1.page[I]; + Enabled := True; + Width := 25; + Height := 25; + OnClick := @ControlClick; + Glyph := Pixmap1; + Visible := True; + Flat := True; + Name := 'GlobalMouseSpeedButton'+inttostr(i); + end; + + Writeln('REGCOMPPAGE.COUNT is '+Inttostr(RegCompPage.Count)); + for x := 0 to RegCompPage.Count-1 do + begin + Writeln('X = '+inttostr(x)); + RegComp := RegCompPage.Items[x]; + IDEComponent := TIDEComponent.Create; + IdeComponent.RegisteredComponent := RegComp; + IDEComponent._SpeedButton(Self,Notebook1.Page[i]); + IDEComponent.SpeedButton.OnClick := @ControlClick; + IDEComponent.SpeedButton.Hint := RegComp.ComponentClass.ClassName; + IDEComponent.SpeedButton.ShowHint := True; + end; + + + end; + Notebook1.PageIndex := 0; // Set it to the first page Notebook1.Show; Notebook1.OnPageChanged := @ControlClick; Notebook1.Name := 'Notebook1'; - S := TFileStream.Create('./images/viewunits.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; - end; + + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_viewunits',Pixmap1) then + begin + LoadResource('default',Pixmap1); + end; SpeedButton1 := TSpeedButton.Create(Self); with Speedbutton1 do Begin @@ -289,13 +365,11 @@ begin end; - S := TFileStream.Create('./images/viewforms.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_viewforms',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton2 := TSpeedButton.Create(Self); @@ -311,15 +385,11 @@ begin Name := 'Speedbutton2'; end; - - - S := TFileStream.Create('./images/newunit.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_newunit',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton3 := TSpeedButton.Create(Self); @@ -335,13 +405,12 @@ begin Name := 'Speedbutton3'; end; - S := TFileStream.Create('./images/openfile.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_openfile',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton4 := TSpeedButton.Create(Self); @@ -357,13 +426,11 @@ begin Name := 'Speedbutton4'; end; - S := TFileStream.Create('./images/save.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_save',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton5 := TSpeedButton.Create(Self); @@ -379,13 +446,11 @@ begin Name := 'Speedbutton5'; end; - S := TFileStream.Create('./images/saveall.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_saveall',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton6 := TSpeedButton.Create(Self); @@ -401,13 +466,11 @@ begin Name := 'Speedbutton6'; end; - S := TFileStream.Create('./images/toggleform.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_toggleform',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton7 := TSpeedButton.Create(Self); @@ -423,13 +486,11 @@ begin Name := 'Speedbutton7'; end; - S := TFileStream.Create('./images/newform.xpm', fmOpenRead); - try - Pixmap1 := TPixmap.Create; - Pixmap1.TransparentColor := clBtnFace; - Pixmap1.LoadFromStream(S); - finally - S.Free; + Pixmap1:=TPixMap.Create; + Pixmap1.TransparentColor:=clBtnFace; + if not LoadResource('btn_newform',Pixmap1) then + begin + LoadResource('default',Pixmap1); end; SpeedButton8 := TSpeedButton.Create(Self); @@ -445,111 +506,6 @@ begin Name := 'Speedbutton8'; end; - //start creating the components based on the TIDECOmponent classes - I := 1; - idecontrol := TIDEMouse.Create; - SetBtnDefaults(idecontrol,i,0); - inc(i); - idecontrol := TIDEMenu.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEPopup.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEEdit.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDELabel.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEButton.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEMemo.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDECheckbox.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDERadioButton.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEListbox.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - idecontrol := TIDEComboBox.Create; - SetBtnDefaults(idecontrol,I,0); - inc(i); - - //we want the mouse on the second tab too! - SetBtnDefaults(ideCompList.Items[0],i,1); - StandardBtn[i].Tag := 1; - inc(i); - idecontrol := TIDEBitbtn.Create; - SetBtnDefaults(idecontrol,I,1); - inc(i); - idecontrol := TIDESpeedbutton.Create; - SetBtnDefaults(idecontrol,I,1); - inc(i); - idecontrol := TIDENotebook.Create; - SetBtnDefaults(idecontrol,I,1); - inc(i); - - //we want the mouse on the second tab too! - SetBtnDefaults(ideCompList.Items[0],i,2); - StandardBtn[i].Tag := 1; - inc(i); - idecontrol := TIDESpinEdit.Create; - SetBtnDefaults(idecontrol,I,2); - inc(i); - - - StandardBtn[1].Down := True; - bpressed := 1; //the speedbutton that's pressed - -{ This spin edit code crashes} -{ Setting the parent is what does it} - -{ SpinEdit1 := TSpinEdit.Create(self); - with SpinEdit1 do - Begin - Parent := Notebook1.Page[0]; - Left := 350; - Width := 100; - Height := 25; -// Parent := Self; - Visible := True; -// OnClick := @ButtonClick; - end; - } - -{ cmdTest := TButton.Create(Self); - with cmdTest do - begin - Left := 350; - Width := 100; - Height := 25; - Parent := Notebook1.Page[0]; -// Parent := Self; - Caption := 'TestForm / Editor'; - Visible := True; - OnClick := @ButtonClick; - end; - } -{ ListBox1 := TListBox.Create(Self); - ListBox1.Parent:= Notebook1.Page[1]; - ListBox1.Left := 20; - ListBox1.Top := 20; - ListBox1.Height := 100; - ListBox1.Width := 100; - ListBox1.Align:= alClient; - ListBox1.Items.Add('Hello'); - ListBox1.Items.Add('world.'); - ListBox1.Items.Add('It''s just a perfect day.'); - ListBox1.Visible:= true; - - } - if Assigned(Toolbar1) then begin @@ -960,20 +916,6 @@ end; {------------------------------------------------------------------------------} {PRIVATE METHOD} -procedure TForm1.SetBtnDefaults(Control : Pointer; I,Page : Integer); -begin - ideCompList.Add(Control); - StandardBtn[i] := TIDEMouse(Control).Speedbutton(self,Notebook1.page[Page]); - if I > 1 then - StandardBtn[i].left := (Notebook1.page[Page].ControlCount-1)*26 - else - StandardBtn[i].left := 0; //the mouse - - StandardBtn[i].Top := 2; - StandardBtn[i].Tag := I; - StandardBtn[i].OnClick := @controlclick; -end; - function TForm1.CreateSeperator : TMenuItem; begin itmSeperator := TMenuItem.Create(Self); @@ -1129,48 +1071,84 @@ Procedure TForm1.ControlClick(Sender : TObject); var Page : Integer; I : Integer; + IDECOmp : TIDEComponent; + Speedbutton : TSpeedbutton; + Temp : TControl; begin - if bpressed > -1 then - if (bpressed = 1) and (sender <> Notebook1) then - // 1 is really just the FIRST one on the notebook page. - Begin - //raise the 1st button on that page. - Page := Notebook1.Pageindex; - For I := 0 to Notebook1.Page[Page].ControlCount-1 do - Begin - if (Notebook1.PAge[page].Controls[i] is TSpeedButton) then - Begin - TSpeedButton(Notebook1.PAge[page].Controls[i]).Down := False; - break; - end; - end; + if Sender is TSpeedButton then + Begin + SpeedButton := TSPeedButton(Sender); + Writeln('Speedbutton s Name is '+SpeedButton.name); + //find the IDECOmponent that has this speedbutton + IDEComp := IDECompList.FindCompbySpeedButton(SpeedButton); + if SelectedComponent <> nil then + TIDeComponent(IdeCompList.FindCompByRegComponent(SelectedComponent)).SpeedButton.Down := False + else + begin + Temp := nil; + Writeln('1'); + for i := 0 to Notebook1.Page[Notebook1.Pageindex].ControlCount-1 do + begin + if CompareText(TControl(Notebook1.Page[Notebook1.Pageindex].Controls[I]).Name, 'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)) = 0 then + begin + temp := TControl(Notebook1.Page[Notebook1.Pageindex].Controls[i]); + Break; + end; + end; + if temp <> nil then + TSpeedButton(Temp).down := False + else + Writeln('*****************ERROR - Control '+'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)+' not found'); + end; + if IDECOmp <> nil then + Begin + //draw this button down + SpeedButton.Down := True; + SelectedComponent := IDEComp.RegisteredComponent; + end + else + begin + SelectedComponent := nil; + Temp := nil; + Writeln('2'); + for i := 0 to Notebook1.Page[Notebook1.Pageindex].ControlCount-1 do + begin + if CompareText(TControl(Notebook1.Page[Notebook1.Pageindex].Controls[I]).Name, 'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)) = 0 then + begin + temp := TControl(Notebook1.Page[Notebook1.Pageindex].Controls[i]); + Break; + end; + end; + if temp <> nil then + TSpeedButton(Temp).down := True + else + Writeln('*****************ERROR - Control '+'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)+' not found'); + end; - end - else - StandardBtn[bpressed].Down := False; + end + else + Begin + //draw old speedbutton up + if SelectedComponent <> nil then + TIDeComponent(IdeCompList.FindCompByRegComponent(SelectedComponent)).SpeedButton.Down := False; + SelectedComponent := nil; + writeln('Setting speedbutton down'); + Temp := nil; + Writeln('3'); + for i := 0 to Notebook1.Page[Notebook1.Pageindex].ControlCount-1 do + begin + if CompareText(TControl(Notebook1.Page[Notebook1.Pageindex].Controls[I]).Name, 'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)) = 0 then + begin + temp := TControl(Notebook1.Page[Notebook1.Pageindex].Controls[i]); + Break; + end; + end; + if temp <> nil then + TSpeedButton(Temp).down := True + else + Writeln('*****************ERROR - Control '+'GlobalMouseSpeedButton'+inttostr(Notebook1.Pageindex)+' not found'); -if (Sender = Notebook1) then -begin -bpressed := 1; -end -else -bpressed := tspeedbutton(Sender).Tag; - -if bpressed = 1 then - begin - //depress the 1st button on that page. - Page := Notebook1.Pageindex; - For I := 0 to Notebook1.Page[Page].ControlCount-1 do - Begin - if (Notebook1.PAge[page].Controls[i] is TSpeedButton) then - Begin - TSpeedButton(Notebook1.PAge[page].Controls[i]).Down := True; - Break; - end; - end; - end - else - StandardBtn[bpressed].Down := True; + end; end; @@ -1352,7 +1330,7 @@ Begin end; Writeln(TComponent(Sender).Name+'.OnMouseUp at '+inttostr(x)+','+inttostr(y)); - if BPressed = 1 then + if SelectedComponent = nil then Begin //mouse pointer button pressed. if Sender is TCustomForm then SelectOnlyThisComponent(TComponent(Sender)); @@ -1376,8 +1354,7 @@ Begin NewWidth:=0; NewHeight:=0; end; - NewCI := TComponentInterface(FormEditor1.CreateComponent(ParentCI, - TComponentClass(TIdeComponent(ideComplist.items[bpressed-1]).ClassType) + NewCI := TComponentInterface(FormEditor1.CreateComponent(ParentCI,SelectedComponent.ComponentClass ,NewLeft,NewTop,NewWidth,NewHeight)); NewCI.SetPropByName('Visible',True); //Control).Visible := True; @@ -1748,6 +1725,9 @@ Begin end; +initialization +{$I images/laz_images.lrs} + end. @@ -1756,6 +1736,11 @@ end. { ============================================================================= $Log$ + Revision 1.24 2000/12/29 13:14:04 lazarus + Using the lresources.pp and registering components. + This is a major change but will create much more flexibility for the IDE. + Shane + Revision 1.23 2000/12/21 20:28:33 lazarus Project - RUN will run the program IF the program is the active unit in the Editor. Shane diff --git a/images/laz_images.lrs b/images/laz_images.lrs new file mode 100644 index 0000000000..d3620e9973 --- /dev/null +++ b/images/laz_images.lrs @@ -0,0 +1,1185 @@ + LazarusResources.Add('btn_newform','XPM', + '/* XPM */'#10'static char * newform_xpm[] = {'#10'"21 18 147 2",'#10'" ' + +#9'c None",'#10'". '#9'c #8D8E93",'#10'"+ '#9'c #7D8391",'#10'"@ '#9'c #7' + +'98194",'#10'"# '#9'c #80889D",'#10'"$ '#9'c #7C849B",'#10'"% '#9'c #747A' + +'94",'#10'"& '#9'c #8085A2",'#10'"* '#9'c #7B80A0",'#10'"= '#9'c #7F84A2"' + +','#10'"- '#9'c #7E81A0",'#10'"; '#9'c #7D819C",'#10'"> '#9'c #7A7C93",' + +#10'", '#9'c #818495",'#10'"'' '#9'c #797B88",'#10'") '#9'c #868992",'#10 + +'"! '#9'c #7C7B8D",'#10'"~ '#9'c #F9F9FF",'#10'"{ '#9'c #870013",'#10'"] ' + +#9'c #AE0013",'#10'"^ '#9'c #D30013",'#10'"/ '#9'c #FCF4FF",'#10'"( '#9'c' + +' #FEFAFF",'#10'"_ '#9'c #00000E",'#10'": '#9'c #858496",'#10'"< '#9'c #0' + +'A0627",'#10'"[ '#9'c #86868E",'#10'"} '#9'c #F7F9FF",'#10'"| '#9'c #F9FC' + +'FF",'#10'"1 '#9'c #FBFBFF",'#10'"2 '#9'c #FBFAFF",'#10'"3 '#9'c #EEEDFF"' + +','#10'"4 '#9'c #F8F5FF",'#10'"5 '#9'c #FAF8FF",'#10'"6 '#9'c #FBF7FF",' + +#10'"7 '#9'c #FEFBFF",'#10'"8 '#9'c #FEFCFF",'#10'"9 '#9'c #05040C",'#10 + +'"0 '#9'c #838486",'#10'"a '#9'c #FCFFFF",'#10'"b '#9'c #F2F7FA",'#10'"c ' + +#9'c #C6CBCE",'#10'"d '#9'c #F3F9F9",'#10'"e '#9'c #C3C7C6",'#10'"f '#9'c' + +' #C0C5C1",'#10'"g '#9'c #FCFFFD",'#10'"h '#9'c #C3C5C4",'#10'"i '#9'c #F' + +'EFFFF",'#10'"j '#9'c #CACBCD",'#10'"k '#9'c #F6F7FB",'#10'"l '#9'c #CCCB' + +'D1",'#10'"m '#9'c #010008",'#10'"n '#9'c #848685",'#10'"o '#9'c #F8FCFB"' + +','#10'"p '#9'c #C5CAC6",'#10'"q '#9'c #FCFFFB",'#10'"r '#9'c #D0D6CC",' + +#10'"s '#9'c #EFF3E5",'#10'"t '#9'c #C6CABB",'#10'"u '#9'c #F8FCEB",'#10 + +'"v '#9'c #C8CCBB",'#10'"w '#9'c #FAFCEE",'#10'"x '#9'c #D0D2C7",'#10'"y ' + +#9'c #FAFBF6",'#10'"z '#9'c #C1C1C3",'#10'"A '#9'c #FBF8FF",'#10'"B '#9'c' + +' #02000D",'#10'"C '#9'c #868686",'#10'"D '#9'c #FBFDFA",'#10'"E '#9'c #F' + +'EFFFB",'#10'"F '#9'c #C6C9C2",'#10'"G '#9'c #FCFFF4",'#10'"H '#9'c #C9CD' + +'BF",'#10'"I '#9'c #FEFFF1",'#10'"J '#9'c #BEC3AF",'#10'"K '#9'c #FEFFEF"' + +','#10'"L '#9'c #CBCEBD",'#10'"M '#9'c #F6F8EB",'#10'"N '#9'c #CACBC3",' + +#10'"O '#9'c #FFFFFD",'#10'"P '#9'c #C6C4C9",'#10'"Q '#9'c #010009",'#10 + +'"R '#9'c #FFFFFF",'#10'"S '#9'c #C2C2C0",'#10'"T '#9'c #C7C7C5",'#10'"U ' + +#9'c #FDFEF9",'#10'"V '#9'c #C4C5C0",'#10'"W '#9'c #FBFCF6",'#10'"X '#9'c' + +' #C9CAC4",'#10'"Y '#9'c #FFFFFA",'#10'"Z '#9'c #C1C2BC",'#10'"` '#9'c #C' + +'6C5C0",'#10'" .'#9'c #010000",'#10'"..'#9'c #828282",'#10'"+.'#9'c #FCFC' + +'FC",'#10'"@.'#9'c #C2C2C2",'#10'"#.'#9'c #F8F8F8",'#10'"$.'#9'c #C3C3C3"' + +','#10'"%.'#9'c #CECECE",'#10'"&.'#9'c #F9F9F9",'#10'"*.'#9'c #BEBEBC",' + +#10'"=.'#9'c #BEBDB9",'#10'"-.'#9'c #C4C4BC",'#10'";.'#9'c #060600",'#10 + +'">.'#9'c #858585",'#10'",.'#9'c #B3B3B5",'#10'"''.'#9'c #D3D3D3",'#10'")' + +'.'#9'c #C0C0BE",'#10'"!.'#9'c #FAFAF8",'#10'"~.'#9'c #CACAC8",'#10'"{.'#9 + +'c #C4C4C2",'#10'"].'#9'c #000000",'#10'"^.'#9'c #848484",'#10'"/.'#9'c #' + +'C4C4C6",'#10'"(.'#9'c #F5F5F7",'#10'"_.'#9'c #CBCBCD",'#10'":.'#9'c #F7F' + +'7F9",'#10'"<.'#9'c #CDCDCF",'#10'"[.'#9'c #F8F8FA",'#10'"}.'#9'c #C8C8CA' + +'",'#10'"|.'#9'c #D4D4D4",'#10'"1.'#9'c #808080",'#10'"2.'#9'c #F9F9FB",' + +#10'"3.'#9'c #CAC9CE",'#10'"4.'#9'c #FFFEFF",'#10'"5.'#9'c #C6C5CD",'#10 + +'"6.'#9'c #FFFDFF",'#10'"7.'#9'c #C9C7D4",'#10'"8.'#9'c #F7F5FF",'#10'"9.' + +#9'c #CDCBD8",'#10'"0.'#9'c #C9C8D0",'#10'"a.'#9'c #F7F6FC",'#10'"b.'#9'c' + +' #C5C5C7",'#10'"c.'#9'c #F4F6F3",'#10'"d.'#9'c #000200",'#10'"e.'#9'c #9' + +'49494",'#10'"f.'#9'c #060606",'#10'"g.'#9'c #000002",'#10'"h.'#9'c #0403' + +'08",'#10'"i.'#9'c #000005",'#10'"j.'#9'c #000007",'#10'"k.'#9'c #000009"' + +','#10'"l.'#9'c #04020F",'#10'"m.'#9'c #08070F",'#10'"n.'#9'c #020204",' + +#10'"o.'#9'c #0D0F0C",'#10'"p.'#9'c #000100",'#10'" ' + +' ",'#10'" ",' + +#10'" ",'#10'" . + @ # $ % ' + +'& * = - ; > , '' ) ",'#10'" ! ~ { { { { { ] ] ^ ^ / ^ ( _ ' + +' ",'#10'" : { { { { ] ] ] ^ ^ ^ ^ ^ < _ ",'#10'" [ } |' + +' 1 1 2 3 2 4 5 6 7 8 8 9 ",'#10'" 0 a b c d e a f g h i j k l' + +' m ",'#10'" n o p q r s t u v w x y z A B ",'#10'" ' + +' C D E F G H I J K L M N O P Q ",'#10'" C R S O T U V W X Y Z' + +' Y ` Y . ",'#10'" ..+.R @.#.$.R %.&.*.O =.Y -.;. ",'#10 + +'" >.R ,.R ''.R ).O T !.~.O {.!.]. ",'#10'" ^.R R /.(./.R ' + +'_.:.<.[.}.R |.]. ",'#10'" 1.2.3.4.5.6.7.8.9.6.0.a.b.c.d. ' + +'",'#10'" e.f.g.h.i.j.k.l.k.k.m.i.n.o.p. ",'#10'" ' + +' ",'#10'" ' + +' "};'#10 + ); + LazarusResources.Add('btn_newunit','XPM', + '/* XPM */'#10'static char * newunit_xpm[] = {'#10'"16 16 35 1",'#10'" '#9 + +'c None",'#10'".'#9'c None",'#10'"+'#9'c #BFC1BC",'#10'"@'#9'c #C1C1C1",' + +#10'"#'#9'c #000000",'#10'"$'#9'c #0C0C0C",'#10'"%'#9'c #C5C5C5",'#10'"&' + +#9'c #B4B4B4",'#10'"*'#9'c #FEFEFE",'#10'"='#9'c #FFFFFF",'#10'"-'#9'c #F' + +'AFAFA",'#10'";'#9'c #070707",'#10'">'#9'c #C8C8C8",'#10'",'#9'c #F3F3F3"' + +','#10'"'''#9'c #FCFCFC",'#10'")'#9'c #020202",'#10'"!'#9'c #090909",'#10 + +'"~'#9'c #F8F8F8",'#10'"{'#9'c #C4C4BC",'#10'"]'#9'c #010101",'#10'"^'#9 + +'c #FBFBFB",'#10'"/'#9'c #F0F0F0",'#10'"('#9'c #FDFDFD",'#10'"_'#9'c #F7F' + +'7F7",'#10'":'#9'c #BFBFBF",'#10'"<'#9'c #030303",'#10'"['#9'c #C6C6C6",' + +#10'"}'#9'c #B3B3B3",'#10'"|'#9'c #BDBDBD",'#10'"1'#9'c #0A0A0A",'#10'"2' + +#9'c #050505",'#10'"3'#9'c #040404",'#10'"4'#9'c #C8C6C9",'#10'"5'#9'c #C' + +'4C3C9",'#10'"6'#9'c #C4C2CD",'#10'"................",'#10'"..@##$##$##@%' + +'&..",'#10'"..@#*===-=;#.>..",'#10'"..@#*==*=,#=#@..",'#10'"..@#*===''*)#' + +'#!..",'#10'"..@#*==~===-=#..",'#10'"..@#*===~-===]..",'#10'"..@#*==^*=/(' + +'^#..",'#10'"..@#*====_===)..",'#10'"..@#*===-(=^(#..",'#10'"..:<_===^==(' + +'~;..",'#10'"..[]=_=(=(===#..",'#10'"..}]^=^==_-(^$..",'#10'"..|1##)<##$2' + +'#3..",'#10'"................",'#10'"................"};'#10 + ); + LazarusResources.Add('btn_openfile','XPM', + '/* XPM */'#10'static char * openfile_xpm[] = {'#10'"16 16 233 2",'#10'" ' + +#9'c None",'#10'". '#9'c #C0C2B5",'#10'"+ '#9'c #BFC2B9",'#10'"@ '#9'c #B' + +'FC2BB",'#10'"# '#9'c #BFC1BC",'#10'"$ '#9'c #B4BAB0",'#10'"% '#9'c #C2C7' + +'C0",'#10'"& '#9'c #C0C5BF",'#10'"* '#9'c #B5BAB6",'#10'"= '#9'c #CBCCCE"' + +','#10'"- '#9'c #C3C4C8",'#10'"; '#9'c #B9BABF",'#10'"> '#9'c #B9B9C1",' + +#10'", '#9'c #C0BFC7",'#10'"'' '#9'c #C1C3B6",'#10'") '#9'c #C1C2BA",'#10 + +'"! '#9'c #C0C3BC",'#10'"~ '#9'c #C1C2BD",'#10'"{ '#9'c #C0C2BF",'#10'"] ' + +#9'c #C0C2BD",'#10'"^ '#9'c #C4C6C1",'#10'"/ '#9'c #B9BEB8",'#10'"( '#9'c' + +' #020703",'#10'"_ '#9'c #000100",'#10'": '#9'c #000004",'#10'"< '#9'c #C' + +'6C7CC",'#10'"[ '#9'c #B7B7BF",'#10'"} '#9'c #C7C7D1",'#10'"| '#9'c #C1BF' + +'CA",'#10'"1 '#9'c #C3C2BE",'#10'"2 '#9'c #B6B5B3",'#10'"3 '#9'c #C7C7C7"' + +','#10'"4 '#9'c #C4C2C5",'#10'"5 '#9'c #BCBBC1",'#10'"6 '#9'c #C7C4CD",' + +#10'"7 '#9'c #BDBCC4",'#10'"8 '#9'c #B8B8C0",'#10'"9 '#9'c #000005",'#10 + +'"0 '#9'c #CBCCD1",'#10'"a '#9'c #B6B7BB",'#10'"b '#9'c #BDBEC2",'#10'"c ' + +#9'c #040507",'#10'"d '#9'c #C1C1C3",'#10'"e '#9'c #000000",'#10'"f '#9'c' + +' #C1C1C1",'#10'"g '#9'c #BBBAB5",'#10'"h '#9'c #CECEC4",'#10'"i '#9'c #B' + +'BB9AD",'#10'"j '#9'c #C2BFB8",'#10'"k '#9'c #C5C1BE",'#10'"l '#9'c #C0BB' + +'BF",'#10'"m '#9'c #BFBCC3",'#10'"n '#9'c #C7C6CE",'#10'"o '#9'c #C8C7CF"' + +','#10'"p '#9'c #B5B4BA",'#10'"q '#9'c #C5C6C8",'#10'"r '#9'c #B4B4B2",' + +#10'"s '#9'c #010200",'#10'"t '#9'c #C5C6C0",'#10'"u '#9'c #C5C4B2",'#10 + +'"v '#9'c #030400",'#10'"w '#9'c #090900",'#10'"x '#9'c #040400",'#10'"y ' + +#9'c #BCBC9A",'#10'"z '#9'c #CCCAB3",'#10'"A '#9'c #C9C5B9",'#10'"B '#9'c' + +' #C1BDBC",'#10'"C '#9'c #B8B6B9",'#10'"D '#9'c #BDBBBC",'#10'"E '#9'c #B' + +'DBEB9",'#10'"F '#9'c #C0BFBA",'#10'"G '#9'c #010100",'#10'"H '#9'c #B7B9' + +'AC",'#10'"I '#9'c #040300",'#10'"J '#9'c #EDF0B9",'#10'"K '#9'c #FFFFBD"' + +','#10'"L '#9'c #EBEDA4",'#10'"M '#9'c #0A0B00",'#10'"N '#9'c #070600",' + +#10'"O '#9'c #060400",'#10'"P '#9'c #141300",'#10'"Q '#9'c #030200",'#10 + +'"R '#9'c #D0CEC1",'#10'"S '#9'c #BFBFB3",'#10'"T '#9'c #BBBBB1",'#10'"U ' + +#9'c #C4C4BC",'#10'"V '#9'c #C4C3BF",'#10'"W '#9'c #060500",'#10'"X '#9'c' + +' #FFFFB8",'#10'"Y '#9'c #EEF58E",'#10'"Z '#9'c #FCFF94",'#10'"` '#9'c #E' + +'9EF85",'#10'" .'#9'c #FFFFB1",'#10'"..'#9'c #E7E89C",'#10'"+.'#9'c #E1E3' + +'A4",'#10'"@.'#9'c #FFFFD1",'#10'"#.'#9'c #090A00",'#10'"$.'#9'c #BCBAA3"' + +','#10'"%.'#9'c #C6C3BA",'#10'"&.'#9'c #BBB6BA",'#10'"*.'#9'c #C6C3CE",' + +#10'"=.'#9'c #C3BFCE",'#10'"-.'#9'c #0D0B00",'#10'";.'#9'c #E7EA8F",'#10 + +'">.'#9'c #FFFF98",'#10'",.'#9'c #F0F776",'#10'"''.'#9'c #FFFF92",'#10'")' + +'.'#9'c #F0EE89",'#10'"!.'#9'c #FFFFAF",'#10'"~.'#9'c #F8FBA2",'#10'"{.'#9 + +'c #FEFFAE",'#10'"].'#9'c #EFF0AA",'#10'"^.'#9'c #060600",'#10'"/.'#9'c #' + +'CECBA8",'#10'"(.'#9'c #C4C1AE",'#10'"_.'#9'c #D1CCC9",'#10'":.'#9'c #BEB' + +'9C0",'#10'"<.'#9'c #C3BDCB",'#10'"[.'#9'c #070300",'#10'"}.'#9'c #FEFEA8' + +'",'#10'"|.'#9'c #F2F582",'#10'"1.'#9'c #FFFF8F",'#10'"2.'#9'c #F2F37C",' + +#10'"3.'#9'c #0E0900",'#10'"4.'#9'c #0D0800",'#10'"5.'#9'c #0A0900",'#10 + +'"6.'#9'c #080A00",'#10'"7.'#9'c #0A0A00",'#10'"8.'#9'c #070500",'#10'"9.' + +#9'c #030000",'#10'"0.'#9'c #F6F4A7",'#10'"a.'#9'c #FFFF9D",'#10'"b.'#9'c' + +' #EFF07B",'#10'"c.'#9'c #111100",'#10'"d.'#9'c #7B7716",'#10'"e.'#9'c #8' + +'9852A",'#10'"f.'#9'c #818121",'#10'"g.'#9'c #7F8022",'#10'"h.'#9'c #8282' + +'2C",'#10'"i.'#9'c #7A7B2D",'#10'"j.'#9'c #7B7C3A",'#10'"k.'#9'c #84844E"' + +','#10'"l.'#9'c #75764E",'#10'"m.'#9'c #C3C2B0",'#10'"n.'#9'c #0A0800",' + +#10'"o.'#9'c #FFFFC5",'#10'"p.'#9'c #E7EA91",'#10'"q.'#9'c #0E1100",'#10 + +'"r.'#9'c #7E8211",'#10'"s.'#9'c #808310",'#10'"t.'#9'c #878B13",'#10'"u.' + +#9'c #7F8308",'#10'"v.'#9'c #83870E",'#10'"w.'#9'c #7B7F11",'#10'"x.'#9'c' + +' #818526",'#10'"y.'#9'c #797C2F",'#10'"z.'#9'c #7C7D43",'#10'"A.'#9'c #0' + +'40500",'#10'"B.'#9'c #C7C7AF",'#10'"C.'#9'c #C1C1B5",'#10'"D.'#9'c #E3E3' + +'AD",'#10'"E.'#9'c #7F842A",'#10'"F.'#9'c #767B15",'#10'"G.'#9'c #848B1B"' + +','#10'"H.'#9'c #747903",'#10'"I.'#9'c #7D8108",'#10'"J.'#9'c #7F820F",' + +#10'"K.'#9'c #858821",'#10'"L.'#9'c #797C23",'#10'"M.'#9'c #7F823B",'#10 + +'"N.'#9'c #0A0D00",'#10'"O.'#9'c #D2D3B1",'#10'"P.'#9'c #C0C1AF",'#10'"Q.' + +#9'c #C0C1BB",'#10'"R.'#9'c #050300",'#10'"S.'#9'c #070800",'#10'"T.'#9'c' + +' #7B7B45",'#10'"U.'#9'c #737631",'#10'"V.'#9'c #878A3B",'#10'"W.'#9'c #7' + +'B7F28",'#10'"X.'#9'c #82852A",'#10'"Y.'#9'c #7C7F28",'#10'"Z.'#9'c #8586' + +'36",'#10'"`.'#9'c #7B7B33",'#10'" +'#9'c #7A7A3E",'#10'".+'#9'c #C7C7A5"' + +','#10'"++'#9'c #B4B39F",'#10'"@+'#9'c #C1C1B7",'#10'"#+'#9'c #C0C0BE",' + +#10'"$+'#9'c #030100",'#10'"%+'#9'c #101000",'#10'"&+'#9'c #040600",'#10 + +'"*+'#9'c #040700",'#10'"=+'#9'c #060700",'#10'"-+'#9'c #090800",'#10'";+' + +#9'c #0E0B00",'#10'">+'#9'c #070400",'#10'",+'#9'c #C7C5AC",'#10'"''+'#9 + +'c #C3C3BB",'#10'")+'#9'c #C7C7C5",'#10'"!+'#9'c #C0C0C2",'#10'"~+'#9'c #' + +'C5C4C0",'#10'"{+'#9'c #B6B6AC",'#10'"]+'#9'c #C3C1B2",'#10'"^+'#9'c #C9C' + +'8B3",'#10'"/+'#9'c #C3C3A7",'#10'"(+'#9'c #BCBB9C",'#10'"_+'#9'c #CBCAAC' + +'",'#10'":+'#9'c #CBC7AE",'#10'"<+'#9'c #C8C6B1",'#10'"[+'#9'c #BEBBAA",' + +#10'"}+'#9'c #C5C3B6",'#10'"|+'#9'c #BDBAB3",'#10'"1+'#9'c #BFBEBC",'#10 + +'"2+'#9'c #C3C1C6",'#10'"3+'#9'c #BDBCC2",'#10'"4+'#9'c #C0BFC5",'#10'"5+' + +#9'c #BFBDC2",'#10'"6+'#9'c #C8C6C7",'#10'"7+'#9'c #C1C1BF",'#10'"8+'#9'c' + +' #B9B8B3",'#10'"9+'#9'c #C8C8C0",'#10'"0+'#9'c #C8C8BE",'#10'"a+'#9'c #B' + +'DBDB3",'#10'"b+'#9'c #BFBCB7",'#10'"c+'#9'c #BCB8B5",'#10'"d+'#9'c #CCCB' + +'C7",'#10'"e+'#9'c #BCBABB",'#10'"f+'#9'c #C8C6C9",'#10'"g+'#9'c #C4C3C9"' + +','#10'"h+'#9'c #B5B4BC",'#10'"i+'#9'c #C4C2CD",'#10'"j+'#9'c #BFBFC7",' + +#10'". + @ # # @ @ $ % & * = - ; > , ",'#10'"'' ) ! ~ { ~ ] ^ / ( _ : < [' + +' } | ",'#10'"1 2 3 4 5 6 7 8 9 0 a b c d e f ",'#10'"g h i j k l m n o p' + +' q 3 r s _ t ",'#10'"u v w x y z A B C D E F G w G H ",'#10'"I J K L M N' + +' O I P Q Q R S T U V ",'#10'"W X Y Z ` ...K +.@.#.$.%.&.*.=.",'#10'"-.;' + +'.>.,.''.).!.~.{.].^./.(._.:.<.",'#10'"[.}.|.1.2.3.4.5.6.7.7.8.O I Q 9.",' + +#10'"[.0.a.b.c.d.e.f.g.h.i.j.k.l.^.m.",'#10'"n.o.p.q.r.s.t.u.v.w.x.y.z.A.' + +'B.C.",'#10'"x D.M E.F.G.H.I.J.K.L.M.N.O.P.Q.",'#10'"R.S.T.U.V.W.X.Y.Z.`.' + +' +W .+++@+#+",'#10'"$+%+x &+*+S.=+-+8.;+>+,+u ''+)+!+",'#10'"~+{+]+^+/+(' + +'+_+:+<+[+}+|+1+2+3+4+",'#10'"5+6+7+8+9+0+a+b+c+d+e+f+g+h+i+j+"};'#10 + ); + LazarusResources.Add('btn_save','XPM', + '/* XPM */'#10'static char * save_xpm[] = {'#10'"16 16 218 2",'#10'" '#9 + +'c None",'#10'". '#9'c #CFCFCF",'#10'"+ '#9'c #B4B5AF",'#10'"@ '#9'c #C0C' + +'3B2",'#10'"# '#9'c #C0C2B4",'#10'"$ '#9'c #C0C0BE",'#10'"% '#9'c #C0BFC4' + +'",'#10'"& '#9'c #C0C0C2",'#10'"* '#9'c #C0BFC5",'#10'"= '#9'c #C0BECC",' + +#10'"- '#9'c #C6C5CB",'#10'"; '#9'c #B4B4B4",'#10'"> '#9'c #C1C3BE",'#10 + +'", '#9'c #BFC1BC",'#10'"'' '#9'c #B0B2AF",'#10'") '#9'c #CACCCB",'#10'"!' + +' '#9'c #BFBFBF",'#10'"~ '#9'c #000100",'#10'"{ '#9'c #000400",'#10'"] '#9 + +'c #000002",'#10'"^ '#9'c #000005",'#10'"/ '#9'c #00000C",'#10'"( '#9'c #' + +'000007",'#10'"_ '#9'c #000000",'#10'": '#9'c #010400",'#10'"< '#9'c #000' + +'200",'#10'"[ '#9'c #050704",'#10'"} '#9'c #BBBCBE",'#10'"| '#9'c #C1C1C1' + +'",'#10'"1 '#9'c #787C5B",'#10'"2 '#9'c #020600",'#10'"3 '#9'c #C5C6B6",' + +#10'"4 '#9'c #CAC9C4",'#10'"5 '#9'c #C6C5C1",'#10'"6 '#9'c #C0BEBF",'#10 + +'"7 '#9'c #C7C4CD",'#10'"8 '#9'c #CCC9D2",'#10'"9 '#9'c #C9C9CB",'#10'"0 ' + +#9'c #C3C4BC",'#10'"a '#9'c #C5C9B2",'#10'"b '#9'c #C6C8C7",'#10'"c '#9'c' + +' #010200",'#10'"d '#9'c #7A7C54",'#10'"e '#9'c #030600",'#10'"f '#9'c #C' + +'6C5B0",'#10'"g '#9'c #C7C7BD",'#10'"h '#9'c #C7C4BD",'#10'"i '#9'c #D0CF' + +'CB",'#10'"j '#9'c #C6C4C7",'#10'"k '#9'c #C4C2C7",'#10'"l '#9'c #C7C6C4"' + +','#10'"m '#9'c #BEC0B2",'#10'"n '#9'c #0C1200",'#10'"o '#9'c #000600",' + +#10'"p '#9'c #020300",'#10'"q '#9'c #C2C4C3",'#10'"r '#9'c #787B4E",'#10 + +'"s '#9'c #040600",'#10'"t '#9'c #D3D1BA",'#10'"u '#9'c #C7C4BB",'#10'"v ' + +#9'c #CCC7C1",'#10'"w '#9'c #C4C1BC",'#10'"x '#9'c #C7C3C4",'#10'"y '#9'c' + +' #C8C6C7",'#10'"z '#9'c #C7C6C2",'#10'"A '#9'c #C8C9B7",'#10'"B '#9'c #0' + +'10600",'#10'"C '#9'c #707650",'#10'"D '#9'c #BDBCC2",'#10'"E '#9'c #797B' + +'4C",'#10'"F '#9'c #070900",'#10'"G '#9'c #C1BCA8",'#10'"H '#9'c #CECAC1"' + +','#10'"I '#9'c #C5C0BC",'#10'"J '#9'c #D6D1CE",'#10'"K '#9'c #C3BDBD",' + +#10'"L '#9'c #CCC8C7",'#10'"M '#9'c #CDC9C6",'#10'"N '#9'c #C7C9B4",'#10 + +'"O '#9'c #010700",'#10'"P '#9'c #81865E",'#10'"Q '#9'c #010000",'#10'"R ' + +#9'c #BCBAC8",'#10'"S '#9'c #767849",'#10'"T '#9'c #0B0A00",'#10'"U '#9'c' + +' #CFC8B6",'#10'"V '#9'c #C8C0BD",'#10'"W '#9'c #D5CCCD",'#10'"X '#9'c #C' + +'6BDBE",'#10'"Y '#9'c #C9C0C3",'#10'"Z '#9'c #CCC6C8",'#10'"` '#9'c #C4BE' + +'BE",'#10'" .'#9'c #CBCAB8",'#10'"..'#9'c #6F744C",'#10'"+.'#9'c #08050C"' + +','#10'"@.'#9'c #BBB5D1",'#10'"#.'#9'c #010300",'#10'"$.'#9'c #808147",' + +#10'"%.'#9'c #070700",'#10'"&.'#9'c #D0CBAB",'#10'"*.'#9'c #C4BDAB",'#10 + +'"=.'#9'c #C4BDAD",'#10'"-.'#9'c #D2CCBE",'#10'";.'#9'c #D0CABC",'#10'">.' + +#9'c #C8C2B4",'#10'",.'#9'c #C9C3B3",'#10'"''.'#9'c #CACAA8",'#10'").'#9 + +'c #0F1400",'#10'"!.'#9'c #6D723A",'#10'"~.'#9'c #0C0904",'#10'"{.'#9'c #' + +'C2BECF",'#10'"].'#9'c #787E28",'#10'"^.'#9'c #7C801F",'#10'"/.'#9'c #080' + +'700",'#10'"(.'#9'c #0E0C00",'#10'"_.'#9'c #141200",'#10'":.'#9'c #070500' + +'",'#10'"<.'#9'c #0A0A00",'#10'"[.'#9'c #060600",'#10'"}.'#9'c #080E00",' + +#10'"|.'#9'c #727D17",'#10'"1.'#9'c #7F8A2E",'#10'"2.'#9'c #060800",'#10 + +'"3.'#9'c #B9B7AB",'#10'"4.'#9'c #010500",'#10'"5.'#9'c #79811E",'#10'"6.' + +#9'c #8A9121",'#10'"7.'#9'c #78782E",'#10'"8.'#9'c #7A7941",'#10'"9.'#9'c' + +' #7B7A42",'#10'"0.'#9'c #797744",'#10'"a.'#9'c #7E7B4E",'#10'"b.'#9'c #7' + +'B7A4C",'#10'"c.'#9'c #80804E",'#10'"d.'#9'c #777D35",'#10'"e.'#9'c #7F8B' + +'1F",'#10'"f.'#9'c #74801E",'#10'"g.'#9'c #C4C3B1",'#10'"h.'#9'c #BEBEBE"' + +','#10'"i.'#9'c #7C8323",'#10'"j.'#9'c #7A8119",'#10'"k.'#9'c #090700",' + +#10'"l.'#9'c #070100",'#10'"m.'#9'c #090400",'#10'"n.'#9'c #0D0900",'#10 + +'"o.'#9'c #060000",'#10'"p.'#9'c #050000",'#10'"q.'#9'c #050200",'#10'"r.' + +#9'c #080B00",'#10'"s.'#9'c #030C00",'#10'"t.'#9'c #747F33",'#10'"u.'#9'c' + +' #B8B7B5",'#10'"v.'#9'c #BDBDBD",'#10'"w.'#9'c #020500",'#10'"x.'#9'c #7' + +'B8127",'#10'"y.'#9'c #83882C",'#10'"z.'#9'c #070300",'#10'"A.'#9'c #0903' + +'00",'#10'"B.'#9'c #060100",'#10'"C.'#9'c #040000",'#10'"D.'#9'c #04000E"' + +','#10'"E.'#9'c #0A0219",'#10'"F.'#9'c #CAC6C7",'#10'"G.'#9'c #CCCCB2",' + +#10'"H.'#9'c #010A00",'#10'"I.'#9'c #828A4F",'#10'"J.'#9'c #010100",'#10 + +'"K.'#9'c #C2BFC8",'#10'"L.'#9'c #C3C3C3",'#10'"M.'#9'c #787F32",'#10'"N.' + +#9'c #7E8235",'#10'"O.'#9'c #060200",'#10'"P.'#9'c #0D0600",'#10'"Q.'#9'c' + +' #080300",'#10'"R.'#9'c #030010",'#10'"S.'#9'c #C7C2C6",'#10'"T.'#9'c #C' + +'FD1BC",'#10'"U.'#9'c #0C1300",'#10'"V.'#9'c #666C3C",'#10'"W.'#9'c #0809' + +'01",'#10'"X.'#9'c #BFBEC6",'#10'"Y.'#9'c #B9B9B9",'#10'"Z.'#9'c #7F8348"' + +','#10'"`.'#9'c #74783D",'#10'" +'#9'c #0A0500",'#10'".+'#9'c #05000E",' + +#10'"++'#9'c #01000E",'#10'"@+'#9'c #BEBFB1",'#10'"#+'#9'c #040900",'#10 + +'"$+'#9'c #757B57",'#10'"%+'#9'c #BDBCC4",'#10'"&+'#9'c #CACABE",'#10'"*+' + +#9'c #030500",'#10'"=+'#9'c #0A0C00",'#10'"-+'#9'c #030000",'#10'";+'#9'c' + +' #070400",'#10'">+'#9'c #050102",'#10'",+'#9'c #03000B",'#10'"''+'#9'c #' + +'01000C",'#10'")+'#9'c #050209",'#10'"!+'#9'c #070800",'#10'"~+'#9'c #C0C' + +'0C8",'#10'"{+'#9'c #B8B8B8",'#10'"]+'#9'c #BEBFB7",'#10'"^+'#9'c #C2C4AF' + +'",'#10'"/+'#9'c #C2C1AC",'#10'"(+'#9'c #CAC7C2",'#10'"_+'#9'c #BEBABB",' + +#10'":+'#9'c #C4C0BF",'#10'"<+'#9'c #C0BEC1",'#10'"[+'#9'c #C0BDC6",'#10 + +'"}+'#9'c #C6C4CF",'#10'"|+'#9'c #B4B3B8",'#10'"1+'#9'c #C3C4BF",'#10'"2+' + +#9'c #C1C3B6",'#10'"3+'#9'c #C3C5B8",'#10'"4+'#9'c #C4C6C5",'#10'"5+'#9'c' + +' #C5C6CB",'#10'". + @ # $ % & * = = - ; > , '' ) ",'#10'"! ~ { { ~ ] ] ^' + +' / / ( _ : < [ } ",'#10'"| < 1 2 3 4 5 6 7 8 9 0 { a < b ",'#10'"| c d e' + +' f g h i j k l m n o p q ",'#10'"| c r s t u v w x y z A B C ~ D ",'#10 + +'"| c E F G H I J K L M N O P Q R ",'#10'"| c S T U V W X Y Z ` .e ..+.@' + +'.",'#10'"| #.$.%.&.*.=.-.;.>.,.''.).!.~.{.",'#10'"| : ].^./.(._.:.:.<.[.' + +'}.|.1.2.3.",'#10'"| 4.5.6.7.8.9.0.a.b.c.d.e.f.e g.",'#10'"h.4.i.j.k.l.m.' + +'n.o.p.q.r.s.t.F u.",'#10'"v.w.x.y.z.A.B.C.D.E.F.G.H.I.J.K.",'#10'"L.s M.' + +'N.O.P.o.Q.D.R.S.T.U.V.W.X.",'#10'"Y.#.Z.`. +B.C.C..+++k @+#+$+~ %+",'#10 + +'"L.&+*+=+C.-+;+>+,+''+)+!+{ { _ ~+",'#10'"{+]+^+/+(+_+:+<+[+}+|+1+2+3+4+' + +'5+"};'#10 + ); + LazarusResources.Add('btn_saveall','XPM', + '/* XPM */'#10'static char * saveall_xpm[] = {'#10'"16 16 207 2",'#10'" ' + +#9'c None",'#10'". '#9'c #BFBFC1",'#10'"+ '#9'c #BFBEC3",'#10'"@ '#9'c #B' + +'FBFBD",'#10'"# '#9'c #C3C4BF",'#10'"$ '#9'c #BABBB5",'#10'"% '#9'c #C1C2' + +'BC",'#10'"& '#9'c #D2D3CE",'#10'"* '#9'c #B5B5B7",'#10'"= '#9'c #C9C8CE"' + +','#10'"- '#9'c #C4C3CB",'#10'"; '#9'c #C4C3C9",'#10'"> '#9'c #C1C1C1",' + +#10'", '#9'c #BCBDB7",'#10'"'' '#9'c #BABBB3",'#10'") '#9'c #CBCCC6",'#10 + +'"! '#9'c #C0C0C2",'#10'"~ '#9'c #C1BFC2",'#10'"{ '#9'c #C5C5C3",'#10'"] ' + +#9'c #B8B9B4",'#10'"^ '#9'c #080A00",'#10'"/ '#9'c #000200",'#10'"( '#9'c' + +' #010000",'#10'"_ '#9'c #0B090A",'#10'": '#9'c #010007",'#10'"< '#9'c #0' + +'10009",'#10'"[ '#9'c #040108",'#10'"} '#9'c #080800",'#10'"| '#9'c #0809' + +'00",'#10'"1 '#9'c #C2C0C1",'#10'"2 '#9'c #C2C1BF",'#10'"3 '#9'c #C0C0BE"' + +','#10'"4 '#9'c #BEBFB9",'#10'"5 '#9'c #020400",'#10'"6 '#9'c #7A7C6F",' + +#10'"7 '#9'c #010100",'#10'"8 '#9'c #C4C3C1",'#10'"9 '#9'c #CAC7CE",'#10 + +'"0 '#9'c #C5C2CB",'#10'"a '#9'c #C6C4C7",'#10'"b '#9'c #CAC9C5",'#10'"c ' + +#9'c #010200",'#10'"d '#9'c #BEC0AB",'#10'"e '#9'c #0B0E00",'#10'"f '#9'c' + +' #B7B6B4",'#10'"g '#9'c #C8C7C3",'#10'"h '#9'c #BEBDB8",'#10'"i '#9'c #0' + +'00100",'#10'"j '#9'c #030500",'#10'"k '#9'c #040400",'#10'"l '#9'c #0601' + +'05",'#10'"m '#9'c #030002",'#10'"n '#9'c #040000",'#10'"o '#9'c #030100"' + +','#10'"p '#9'c #010300",'#10'"q '#9'c #050800",'#10'"r '#9'c #D1D0CB",' + +#10'"s '#9'c #B3B3A9",'#10'"t '#9'c #C6C6BC",'#10'"u '#9'c #797C73",'#10 + +'"v '#9'c #BBBDB0",'#10'"w '#9'c #C7C7BD",'#10'"x '#9'c #C4C4BC",'#10'"y ' + +#9'c #CAC6C3",'#10'"z '#9'c #D0CDC8",'#10'"A '#9'c #C6C5B1",'#10'"B '#9'c' + +' #0E0E00",'#10'"C '#9'c #6B6E4F",'#10'"D '#9'c #040800",'#10'"E '#9'c #B' + +'8B8AC",'#10'"F '#9'c #030200",'#10'"G '#9'c #090B00",'#10'"H '#9'c #0906' + +'00",'#10'"I '#9'c #040100",'#10'"J '#9'c #040200",'#10'"K '#9'c #030400"' + +','#10'"L '#9'c #040600",'#10'"M '#9'c #717552",'#10'"N '#9'c #000400",' + +#10'"O '#9'c #BFC0AE",'#10'"P '#9'c #101000",'#10'"Q '#9'c #777A5F",'#10 + +'"R '#9'c #050700",'#10'"S '#9'c #C5C8BF",'#10'"T '#9'c #C6C7BF",'#10'"U ' + +#9'c #BFC0B8",'#10'"V '#9'c #CDCAC1",'#10'"W '#9'c #CBC9BC",'#10'"X '#9'c' + +' #080500",'#10'"Y '#9'c #CECDB1",'#10'"Z '#9'c #090900",'#10'"` '#9'c #7' + +'47549",'#10'" .'#9'c #040700",'#10'"..'#9'c #7B8058",'#10'"+.'#9'c #C3C3' + +'AB",'#10'"@.'#9'c #727653",'#10'"#.'#9'c #000300",'#10'"$.'#9'c #C2C5BA"' + +','#10'"%.'#9'c #CACBC5",'#10'"&.'#9'c #BFBCB5",'#10'"*.'#9'c #C6C4B5",' + +#10'"=.'#9'c #040300",'#10'"-.'#9'c #060400",'#10'";.'#9'c #070700",'#10 + +'">.'#9'c #797C45",'#10'",.'#9'c #030700",'#10'"''.'#9'c #71764D",'#10'")' + +'.'#9'c #010400",'#10'"!.'#9'c #C9CAAB",'#10'"~.'#9'c #070A00",'#10'"{.'#9 + +'c #767B52",'#10'"].'#9'c #C6C9BE",'#10'"^.'#9'c #C4C5C0",'#10'"/.'#9'c #' + +'C1C0BE",'#10'"(.'#9'c #C7C4BF",'#10'"_.'#9'c #DBD8C7",'#10'":.'#9'c #0D0' + +'A00",'#10'"<.'#9'c #7D7D4B",'#10'"[.'#9'c #060800",'#10'"}.'#9'c #7B7D3C' + +'",'#10'"|.'#9'c #797C4F",'#10'"1.'#9'c #060900",'#10'"2.'#9'c #C2C3A1",' + +#10'"3.'#9'c #050900",'#10'"4.'#9'c #727848",'#10'"5.'#9'c #C3C3C1",'#10 + +'"6.'#9'c #D6D4D5",'#10'"7.'#9'c #C6C3BE",'#10'"8.'#9'c #B5B29F",'#10'"9.' + +#9'c #0B0900",'#10'"0.'#9'c #76773D",'#10'"a.'#9'c #080C00",'#10'"b.'#9'c' + +' #82863C",'#10'"c.'#9'c #7B7E4F",'#10'"d.'#9'c #C0C4A1",'#10'"e.'#9'c #7' + +'67D47",'#10'"f.'#9'c #777D4F",'#10'"g.'#9'c #010500",'#10'"h.'#9'c #0603' + +'00",'#10'"i.'#9'c #090500",'#10'"j.'#9'c #7C7C46",'#10'"k.'#9'c #7C7F38"' + +','#10'"l.'#9'c #060A00",'#10'"m.'#9'c #6F752B",'#10'"n.'#9'c #0E1100",' + +#10'"o.'#9'c #777856",'#10'"p.'#9'c #C1C7A5",'#10'"q.'#9'c #040A00",'#10 + +'"r.'#9'c #757B3B",'#10'"s.'#9'c #7E832F",'#10'"t.'#9'c #7C7F30",'#10'"u.' + +#9'c #686731",'#10'"v.'#9'c #88865D",'#10'"w.'#9'c #76724C",'#10'"x.'#9'c' + +' #727240",'#10'"y.'#9'c #888C40",'#10'"z.'#9'c #767E29",'#10'"A.'#9'c #0' + +'40C00",'#10'"B.'#9'c #7E8444",'#10'"C.'#9'c #000002",'#10'"D.'#9'c #C5CA' + +'AA",'#10'"E.'#9'c #000700",'#10'"F.'#9'c #777D3D",'#10'"G.'#9'c #7D8228"' + +','#10'"H.'#9'c #080B00",'#10'"I.'#9'c #201E00",'#10'"J.'#9'c #070400",' + +#10'"K.'#9'c #0B0800",'#10'"L.'#9'c #0C0C00",'#10'"M.'#9'c #77802F",'#10 + +'"N.'#9'c #030B00",'#10'"O.'#9'c #717844",'#10'"P.'#9'c #B8B7BD",'#10'"Q.' + +#9'c #C2C1CF",'#10'"R.'#9'c #B3B79C",'#10'"S.'#9'c #020900",'#10'"T.'#9'c' + +' #7C834D",'#10'"U.'#9'c #787A39",'#10'"V.'#9'c #0B0B00",'#10'"W.'#9'c #0' + +'70300",'#10'"X.'#9'c #060100",'#10'"Y.'#9'c #CDCCAD",'#10'"Z.'#9'c #767B' + +'41",'#10'"`.'#9'c #090D00",'#10'" +'#9'c #C1BFCD",'#10'".+'#9'c #BBB9CE"' + +','#10'"++'#9'c #BFC3AC",'#10'"@+'#9'c #737850",'#10'"#+'#9'c #7B7C52",' + +#10'"$+'#9'c #060000",'#10'"%+'#9'c #080300",'#10'"&+'#9'c #0A0501",'#10 + +'"*+'#9'c #C4C2B5",'#10'"=+'#9'c #767A55",'#10'"-+'#9'c #C6C8B3",'#10'";+' + +#9'c #B7B7B9",'#10'">+'#9'c #C6C3D4",'#10'",+'#9'c #BEBCD2",'#10'"''+'#9 + +'c #C3C6B5",'#10'")+'#9'c #B7BBA2",'#10'"!+'#9'c #0A0800",'#10'"~+'#9'c #' + +'040003",'#10'"{+'#9'c #030005",'#10'"]+'#9'c #040006",'#10'"^+'#9'c #060' + +'700",'#10'"/+'#9'c #C8C5D6",'#10'"(+'#9'c #B7B4C7",'#10'". + . @ # $ % &' + +' * = - ; > , '' ) ",'#10'"! ~ ~ { ] ^ / ( _ : < [ ( } | / ",'#10'"> 1 2 ' + +'3 4 5 6 7 8 9 0 a b c d e ",'#10'"f g h i / j / k ( l m n o p 5 q ",'#10 + +'"r s t i u / v w x y z o A B C D ",'#10'"E F c / / / G 7 H n I J K L M N' + +' ",'#10'"O P Q R S T U V W X Y Z ` ...p ",'#10'"+.j @.#.$.%.%.&.*.=.-.;' + +'.>.,.''.).",'#10'"!.~.{.N ].^./.(._.:.<.[.}. .|.1.",'#10'"2.3.4.,.$.5.6.' + +'7.8.9.0.a.b.D c.).",'#10'"d.D e.f.g.c o h.i.j.k.l.m.n.o.#.",'#10'"p.q.r.' + +'s.t.u.v.w.x.y.z.A.B.)./ C.",'#10'"D.E.F.G.H.I.J.K.L.q.M.N.O.1.P.Q.",'#10 + +'"R.S.T.U.V.W.X.X.Y.^ Z.D `.i +.+",'#10'"++q.@+#+h.$+%+&+*+K =+g.-+;+>+,' + +'+",'#10'"''+)+).F !+~+{+]+( ^+c ^+U ; /+(+"};'#10 + ); + LazarusResources.Add('btn_toggleform','XPM', + '/* XPM */'#10'static char * toggleform_xpm[] = {'#10'"16 16 191 2",'#10'"' + +' '#9'c None",'#10'". '#9'c #777A71",'#10'"+ '#9'c #000013",'#10'"@ '#9 + +'c #C3C5D4",'#10'"# '#9'c #B7BAC3",'#10'"$ '#9'c #000104",'#10'"% '#9'c #' + +'C1C5C4",'#10'"& '#9'c #BABFBB",'#10'"* '#9'c #870013",'#10'"= '#9'c #000' + +'015",'#10'"- '#9'c #C0C3D2",'#10'"; '#9'c #00040A",'#10'"> '#9'c #000606' + +'",'#10'", '#9'c #000300",'#10'"'' '#9'c #B9BEB8",'#10'") '#9'c #000012",' + +#10'"! '#9'c #0C0C24",'#10'"~ '#9'c #000017",'#10'"{ '#9'c #04041E",'#10 + +'"] '#9'c #0D0F1E",'#10'"^ '#9'c #00000B",'#10'"/ '#9'c #BEC2C5",'#10'"( ' + +#9'c #B4B8B7",'#10'"_ '#9'c #C0C6BA",'#10'": '#9'c #000500",'#10'"< '#9'c' + +' #8F9094",'#10'"[ '#9'c #F9FDFF",'#10'"} '#9'c #FCFFFF",'#10'"| '#9'c #F' + +'1F4F9",'#10'"1 '#9'c #F4F7FF",'#10'"2 '#9'c #F9FCFF",'#10'"3 '#9'c #F7FA' + +'FF",'#10'"4 '#9'c #F8FBFF",'#10'"5 '#9'c #000102",'#10'"6 '#9'c #BBC0BC"' + +','#10'"7 '#9'c #CDD2CB",'#10'"8 '#9'c #B8BEB2",'#10'"9 '#9'c #BEC4B6",' + +#10'"0 '#9'c #000200",'#10'"a '#9'c #FEFFF6",'#10'"b '#9'c #C6C9C0",'#10 + +'"c '#9'c #C6C9C2",'#10'"d '#9'c #C7CAC3",'#10'"e '#9'c #BEC0BB",'#10'"f ' + +#9'c #888A85",'#10'"g '#9'c #878984",'#10'"h '#9'c #80827D",'#10'"i '#9'c' + +' #8F918C",'#10'"j '#9'c #8C8E89",'#10'"k '#9'c #868982",'#10'"l '#9'c #7' + +'97C73",'#10'"m '#9'c #C0C3BA",'#10'"n '#9'c #BBBEB3",'#10'"o '#9'c #C1C4' + +'BB",'#10'"p '#9'c #84867B",'#10'"q '#9'c #FEFFF4",'#10'"r '#9'c #BCC0B2"' + +','#10'"s '#9'c #C7CABF",'#10'"t '#9'c #CBCEC3",'#10'"u '#9'c #BDC0B5",' + +#10'"v '#9'c #82857C",'#10'"w '#9'c #FEFFF8",'#10'"x '#9'c #FDFFF9",'#10 + +'"y '#9'c #F9FCF5",'#10'"z '#9'c #FEFFFB",'#10'"A '#9'c #848681",'#10'"B ' + +#9'c #000100",'#10'"C '#9'c #C4C6C3",'#10'"D '#9'c #BCBEBB",'#10'"E '#9'c' + +' #80817C",'#10'"F '#9'c #FCFDF7",'#10'"G '#9'c #CECFC9",'#10'"H '#9'c #C' + +'ACBC5",'#10'"I '#9'c #B9BAB4",'#10'"J '#9'c #CBCCC6",'#10'"K '#9'c #8D8E' + +'88",'#10'"L '#9'c #F6F7F2",'#10'"M '#9'c #FFFFFD",'#10'"N '#9'c #FAFAFA"' + +','#10'"O '#9'c #F5F5F7",'#10'"P '#9'c #8D8C91",'#10'"Q '#9'c #FBFAFF",' + +#10'"R '#9'c #000007",'#10'"S '#9'c #C7C6CC",'#10'"T '#9'c #86858A",'#10 + +'"U '#9'c #FFFFFF",'#10'"V '#9'c #C4C4C6",'#10'"W '#9'c #C7C7C7",'#10'"X ' + +#9'c #CBCBCB",'#10'"Y '#9'c #C3C3C1",'#10'"Z '#9'c #81817F",'#10'"` '#9'c' + +' #FEFEFE",'#10'" .'#9'c #F6F6F8",'#10'"..'#9'c #FFFEFF",'#10'"+.'#9'c #0' + +'00009",'#10'"@.'#9'c #04020F",'#10'"#.'#9'c #00000C",'#10'"$.'#9'c #827F' + +'8A",'#10'"%.'#9'c #FFFDFF",'#10'"&.'#9'c #C5C2CD",'#10'"*.'#9'c #C3C0C9"' + +','#10'"=.'#9'c #CBC8CF",'#10'"-.'#9'c #CCCACF",'#10'";.'#9'c #858386",' + +#10'">.'#9'c #FEFCFF",'#10'",.'#9'c #FDFBFE",'#10'"''.'#9'c #FCF9FF",'#10 + +'").'#9'c #FFFCFF",'#10'"!.'#9'c #C8C4D3",'#10'"~.'#9'c #01000B",'#10'"{.' + +#9'c #898593",'#10'"].'#9'c #090513",'#10'"^.'#9'c #05010F",'#10'"/.'#9'c' + +' #010009",'#10'"(.'#9'c #010007",'#10'"_.'#9'c #010005",'#10'":.'#9'c #8' + +'07E83",'#10'"<.'#9'c #FDFBFF",'#10'"[.'#9'c #FDFAFF",'#10'"}.'#9'c #BEBB' + +'C6",'#10'"|.'#9'c #08050E",'#10'"1.'#9'c #C4C3CB",'#10'"2.'#9'c #AFAEB6"' + +','#10'"3.'#9'c #06050D",'#10'"4.'#9'c #C8C7CD",'#10'"5.'#9'c #BCBBC0",' + +#10'"6.'#9'c #CACACC",'#10'"7.'#9'c #828282",'#10'"8.'#9'c #FDFDFB",'#10 + +'"9.'#9'c #FEFEFC",'#10'"0.'#9'c #FCFCFC",'#10'"a.'#9'c #C6C6C8",'#10'"b.' + +#9'c #000002",'#10'"c.'#9'c #C1C0C5",'#10'"d.'#9'c #0D0C11",'#10'"e.'#9'c' + +' #B5B5B5",'#10'"f.'#9'c #8D8D8B",'#10'"g.'#9'c #F8F8F6",'#10'"h.'#9'c #F' + +'CFDF8",'#10'"i.'#9'c #FFFFFB",'#10'"j.'#9'c #FEFFFA",'#10'"k.'#9'c #FBFC' + +'F7",'#10'"l.'#9'c #C7C8C3",'#10'"m.'#9'c #010100",'#10'"n.'#9'c #B4B4B2"' + +','#10'"o.'#9'c #C7C7C5",'#10'"p.'#9'c #040500",'#10'"q.'#9'c #B9BAB5",' + +#10'"r.'#9'c #C0C0BE",'#10'"s.'#9'c #C6C6C4",'#10'"t.'#9'c #80807E",'#10 + +'"u.'#9'c #F9FAF5",'#10'"v.'#9'c #FAFBF6",'#10'"w.'#9'c #FFFFFA",'#10'"x.' + +#9'c #FBFCF6",'#10'"y.'#9'c #BABBB5",'#10'"z.'#9'c #090A05",'#10'"A.'#9'c' + +' #C3C4BE",'#10'"B.'#9'c #BFC0BA",'#10'"C.'#9'c #010200",'#10'"D.'#9'c #C' + +'2C3BD",'#10'"E.'#9'c #B7B8B3",'#10'"F.'#9'c #C4C4C2",'#10'"G.'#9'c #8080' + +'80",'#10'"H.'#9'c #FDFDFD",'#10'"I.'#9'c #D0D1CC",'#10'"J.'#9'c #BCBFB6"' + +','#10'"K.'#9'c #BDC0B7",'#10'"L.'#9'c #C1C4BD",'#10'"M.'#9'c #C9CBC8",' + +#10'"N.'#9'c #B6B7B9",'#10'"O.'#9'c #898A8E",'#10'"P.'#9'c #C8C9CE",'#10 + +'"Q.'#9'c #BDBEC3",'#10'"R.'#9'c #C6C7CC",'#10'"S.'#9'c #CBCCD0",'#10'"T.' + +#9'c #BABBBF",'#10'"U.'#9'c #CECFD1",'#10'"V.'#9'c #BBBDBC",'#10'"W.'#9'c' + +' #0C0E0D",'#10'"X.'#9'c #BDC0B9",'#10'"Y.'#9'c #BCBFB8",'#10'"Z.'#9'c #C' + +'0C2BD",'#10'"`.'#9'c #BDBFBE",'#10'" +'#9'c #C2C3C5",'#10'".+'#9'c #8687' + +'8B",'#10'"++'#9'c #000005",'#10'"@+'#9'c #0D0D15",'#10'"#+'#9'c #0B0C10"' + +','#10'"$+'#9'c #000004",'#10'"%+'#9'c #07080A",'#10'". . . . . . . . . .' + +' + @ # $ % & ",'#10'". * * * * * * * * * = - ; > , '' ",'#10'". ) = ! ~ ' + +'~ { ~ + ] ^ / ( , _ : ",'#10'"< [ } | } } 1 2 3 4 5 6 7 8 9 0 ",'#10'". ' + +'a b c d e f g h i j k l m n o ",'#10'"p q r s t u v w x y y z A B C D ",' + +#10'"E F G H I J K L M M N O P Q R S ",'#10'"T U V W X Y Z M ` .....+.@.' + +'#.+.",'#10'"$.%.&.*.=.-.;.>.,.%.%.%.''.).!.~.",'#10'"{.].^./.(._.:......' + +'.<.%.%.[.}.|.",'#10'"1.2.3.4.5.6.7.U M 8.9.U 0.U a.b.",'#10'"c.d.b.b.W e' + +'.f.g.h.i.i.j.k.i.l.m.",'#10'"n.o.p.q.r.s.t.M u.i.j.v.w.x.y.z.",'#10'"A.B' + +'.C.D.E.F.G.H.U 0.U M g.i.I.B ",'#10'"J.K.L.B M.N.O.P.P.Q.R.S.T.U.V.W.",' + +#10'"L.X.Y.Z.`. +.+++R @+++++#+$+%+b."};'#10 + ); + LazarusResources.Add('btn_viewforms','XPM', + '/* XPM */'#10'static char * viewforms_xpm[] = {'#10'"16 16 193 2",'#10'" ' + +' '#9'c None",'#10'". '#9'c #C0BEC1",'#10'"+ '#9'c #C0BEC3",'#10'"@ '#9'c' + +' #C0BDC4",'#10'"# '#9'c #C0BDC6",'#10'"$ '#9'c #C0BDC8",'#10'"% '#9'c #B' + +'FBDC8",'#10'"& '#9'c #BEBEC8",'#10'"* '#9'c #BFBDCA",'#10'"= '#9'c #C0BC' + +'CA",'#10'"- '#9'c #C2BCCA",'#10'"; '#9'c #BEBEBE",'#10'"> '#9'c #C6C6C8"' + +','#10'", '#9'c #BFBEC3",'#10'"'' '#9'c #BEBCC7",'#10'") '#9'c #BEBCCA",' + +#10'"! '#9'c #807D90",'#10'"~ '#9'c #85829F",'#10'"{ '#9'c #848894",'#10 + +'"] '#9'c #000017",'#10'"^ '#9'c #C0BCD3",'#10'"/ '#9'c #BABDB6",'#10'"( ' + +#9'c #C0C2BF",'#10'"_ '#9'c #B7B8BA",'#10'": '#9'c #C0C0C8",'#10'"< '#9'c' + +' #BDBDC9",'#10'"[ '#9'c #888799",'#10'"} '#9'c #870013",'#10'"| '#9'c #C' + +'C0013",'#10'"1 '#9'c #FF0013",'#10'"2 '#9'c #000015",'#10'"3 '#9'c #BFBE' + +'D0",'#10'"4 '#9'c #C4C7BC",'#10'"5 '#9'c #C1C4B9",'#10'"6 '#9'c #BDC0B9"' + +','#10'"7 '#9'c #CCCECD",'#10'"8 '#9'c #B6B7BB",'#10'"9 '#9'c #87878F",' + +#10'"0 '#9'c #F9FBFF",'#10'"a '#9'c #FAFDFF",'#10'"b '#9'c #FBFEFF",'#10 + +'"c '#9'c #F2F6FF",'#10'"d '#9'c #FBFFFF",'#10'"e '#9'c #F5FAFF",'#10'"f ' + +#9'c #FCFFFF",'#10'"g '#9'c #000102",'#10'"h '#9'c #BFC0C2",'#10'"i '#9'c' + +' #B9BCB5",'#10'"j '#9'c #BBBDB8",'#10'"k '#9'c #C8CAC9",'#10'"l '#9'c #7' + +'97A7F",'#10'"m '#9'c #7F7F89",'#10'"n '#9'c #868595",'#10'"o '#9'c #8283' + +'95",'#10'"p '#9'c #808490",'#10'"q '#9'c #838790",'#10'"r '#9'c #787D83"' + +','#10'"s '#9'c #000104",'#10'"t '#9'c #D1D5D6",'#10'"u '#9'c #000300",' + +#10'"v '#9'c #BFC1BE",'#10'"w '#9'c #B8B8C0",'#10'"x '#9'c #C5C5D1",'#10 + +'"y '#9'c #B0AFC1",'#10'"z '#9'c #8F8CA7",'#10'"A '#9'c #C0BFD1",'#10'"B ' + +#9'c #00000B",'#10'"C '#9'c #BFBFC7",'#10'"D '#9'c #CFCEE0",'#10'"E '#9'c' + +' #C0BED6",'#10'"F '#9'c #C0BDDC",'#10'"G '#9'c #827DA5",'#10'"H '#9'c #F' + +'BF5FF",'#10'"I '#9'c #F8F0FF",'#10'"J '#9'c #FEF6FF",'#10'"K '#9'c #FAF4' + +'FF",'#10'"L '#9'c #FBF6FF",'#10'"M '#9'c #FBF8FF",'#10'"N '#9'c #FBF9FF"' + +','#10'"O '#9'c #F2F0FF",'#10'"P '#9'c #00001F",'#10'"Q '#9'c #C2C0D6",' + +#10'"R '#9'c #01000E",'#10'"S '#9'c #B8B6CC",'#10'"T '#9'c #817E9B",'#10 + +'"U '#9'c #000022",'#10'"V '#9'c #D0CDEC",'#10'"W '#9'c #000013",'#10'"X ' + +#9'c #C7C7D3",'#10'"Y '#9'c #000106",'#10'"Z '#9'c #BEBDCD",'#10'"` '#9'c' + +' #848297",'#10'" .'#9'c #05061A",'#10'"..'#9'c #C6C5D3",'#10'"+.'#9'c #0' + +'00005",'#10'"@.'#9'c #C5C7C6",'#10'"#.'#9'c #000100",'#10'"$.'#9'c #BFC2' + +'BB",'#10'"%.'#9'c #BCBEBB",'#10'"&.'#9'c #858786",'#10'"*.'#9'c #FAFBFF"' + +','#10'"=.'#9'c #FEFEFF",'#10'"-.'#9'c #FDFDFF",'#10'";.'#9'c #FBFAFF",' + +#10'">.'#9'c #FEFDFF",'#10'",.'#9'c #F7F7FF",'#10'"''.'#9'c #FEFFFF",'#10 + +'").'#9'c #F8F9FB",'#10'"!.'#9'c #000200",'#10'"~.'#9'c #C9CCC3",'#10'"{.' + +#9'c #C0C3B2",'#10'"].'#9'c #B9BCB1",'#10'"^.'#9'c #82857A",'#10'"/.'#9'c' + +' #FEFFF8",'#10'"(.'#9'c #C1C4BD",'#10'"_.'#9'c #CBCDC8",'#10'":.'#9'c #C' + +'9CBCA",'#10'"<.'#9'c #C2C3C5",'#10'"[.'#9'c #C8C9CB",'#10'"}.'#9'c #BEC0' + +'BF",'#10'"|.'#9'c #C5C7C4",'#10'"1.'#9'c #010500",'#10'"2.'#9'c #C9CDBE"' + +','#10'"3.'#9'c #C1C5B4",'#10'"4.'#9'c #C0C2B4",'#10'"5.'#9'c #888B80",' + +#10'"6.'#9'c #C0C3BC",'#10'"7.'#9'c #C9CBC6",'#10'"8.'#9'c #C7C8CD",'#10 + +'"9.'#9'c #C0BECC",'#10'"0.'#9'c #CCC9DC",'#10'"a.'#9'c #C1BECF",'#10'"b.' + +#9'c #D8D7DF",'#10'"c.'#9'c #000004",'#10'"d.'#9'c #B9B9B9",'#10'"e.'#9'c' + +' #C0C0BE",'#10'"f.'#9'c #C0C1BC",'#10'"g.'#9'c #C4C6C1",'#10'"h.'#9'c #7' + +'97B76",'#10'"i.'#9'c #FEFFFB",'#10'"j.'#9'c #CBCDCC",'#10'"k.'#9'c #C9CA' + +'CC",'#10'"l.'#9'c #B9BABF",'#10'"m.'#9'c #CCCCD6",'#10'"n.'#9'c #C7C4D7"' + +','#10'"o.'#9'c #CECBE0",'#10'"p.'#9'c #BFBCCF",'#10'"q.'#9'c #00000E",' + +#10'"r.'#9'c #100E19",'#10'"s.'#9'c #C0BFC5",'#10'"t.'#9'c #C2C1C6",'#10 + +'"u.'#9'c #C0C0C2",'#10'"v.'#9'c #B8B9BD",'#10'"w.'#9'c #898A8F",'#10'"x.' + +#9'c #FAFAFF",'#10'"y.'#9'c #C4C4D0",'#10'"z.'#9'c #CCCBDB",'#10'"A.'#9'c' + +' #CCCADF",'#10'"B.'#9'c #C4C2CD",'#10'"C.'#9'c #C6C5CB",'#10'"D.'#9'c #D' + +'0CFD5",'#10'"E.'#9'c #040309",'#10'"F.'#9'c #B8B7BD",'#10'"G.'#9'c #BBBA' + +'BF",'#10'"H.'#9'c #C1C0C5",'#10'"I.'#9'c #C1C1C3",'#10'"J.'#9'c #BABBBF"' + +','#10'"K.'#9'c #86878C",'#10'"L.'#9'c #FCFCFF",'#10'"M.'#9'c #CBCAD8",' + +#10'"N.'#9'c #B2B1C3",'#10'"O.'#9'c #D1D0DE",'#10'"P.'#9'c #C5C5C7",'#10 + +'"Q.'#9'c #BFC0BB",'#10'"R.'#9'c #C3C3C1",'#10'"S.'#9'c #000000",'#10'"T.' + +#9'c #C7C7C7",'#10'"U.'#9'c #C2C2C4",'#10'"V.'#9'c #C3C3C5",'#10'"W.'#9'c' + +' #BEBEC0",'#10'"X.'#9'c #BEC1BA",'#10'"Y.'#9'c #81847D",'#10'"Z.'#9'c #0' + +'70A03",'#10'"`.'#9'c #070904",'#10'" +'#9'c #0E0F11",'#10'".+'#9'c #0405' + +'00",'#10'"++'#9'c #010100",'#10'"@+'#9'c #040400",'#10'"#+'#9'c #040300"' + +','#10'"$+'#9'c #BBBAB8",'#10'"%+'#9'c #C7C5C6",'#10'"&+'#9'c #B9B9BB",' + +#10'"*+'#9'c #C0BFC4",'#10'". + + @ # # $ % & * * = = - - = ",'#10'"; > ,' + +' '' ) ! ~ { { { { { { { ] ^ ",'#10'"/ ( _ : < [ } } | | 1 1 1 1 2 3 ",' + +#10'"4 5 6 7 8 9 0 a b c d d e f g h ",'#10'"i j k l m n o { { p q r s t ' + +'u v ",'#10'"w x y z } } | | 1 1 1 1 ] A B C ",'#10'"D E F G H I J K L M ' + +'N O P Q R C ",'#10'"S T { { { { { { { { U V W X Y h ",'#10'"Z ` } } | | ' + +'1 1 1 1 ...+.@.#.$.",'#10'"%.&.*.=.-.;.>.,.''.).!.~.u u u {.",'#10'"].^' + +'./.(._.:.<.[.}.|.u ].1.2.3.4.",'#10'"~.5./.6.7.@.8.9.0.a.B b.c.d.e.f.",' + +#10'"g.h.i.j.k.l.m.n.o.p.q.B r.s.t.u.",'#10'"v.w.x.y.z.A.3 B.C.D.E.F.G.H.' + +'I.u.",'#10'"J.K.L.& M.N.O.P.Q.R.S.T.U.V.W.u.",'#10'"X.Y.Z.`.#. +#..+++@+' + +'#+$+%+&+I.*+"};'#10 + ); + LazarusResources.Add('btn_viewunits','XPM', + '/* XPM */'#10'static char * viewunits_xpm[] = {'#10'"14 14 3 1",'#10'" '#9 + +'c None",'#10'".'#9'c #000000",'#10'"+'#9'c #FFFFFF",'#10'" .... ' + +'",'#10'" .++++.. ",'#10'" .+++++. ",'#10'" ....+++. ",'#10 + +'" .++++..+. ",'#10'" .+++++.+. ",'#10'" ....+++.+. ",'#10'" .++' + +'++..+... ",'#10'" .+++++.+. ",'#10'" .+++++.+. ",'#10'" .+++++...' + +' ",'#10'" .+++++. ",'#10'" .+++++. ",'#10'" ....... "};' + +#10 + ); + LazarusResources.Add('lazarus64','XPM', + '/* XPM */'#10'static char * lazarus64_xpm[] = {'#10'"250 188 65 1",'#10'"' + +' '#9'c None",'#10'".'#9'c #070506",'#10'"+'#9'c #908649",'#10'"@'#9'c #E' + +'2C738",'#10'"#'#9'c #AB0A04",'#10'"$'#9'c #C88815",'#10'"%'#9'c #CFA81A"' + +','#10'"&'#9'c #8E5010",'#10'"*'#9'c #484845",'#10'"='#9'c #D15907",'#10 + +'"-'#9'c #BFA986",'#10'";'#9'c #FEE860",'#10'">'#9'c #F5A810",'#10'",'#9 + +'c #FA8824",'#10'"'''#9'c #D36F0F",'#10'")'#9'c #4B0704",'#10'"!'#9'c #C6' + +'C7C7",'#10'"~'#9'c #2A2723",'#10'"{'#9'c #F0B812",'#10'"]'#9'c #FCD711",' + +#10'"^'#9'c #6C6855",'#10'"/'#9'c #FB6817",'#10'"('#9'c #926914",'#10'"_' + +#9'c #FA981C",'#10'":'#9'c #ACA263",'#10'"<'#9'c #AD7511",'#10'"['#9'c #6' + +'6480A",'#10'"}'#9'c #FB7822",'#10'"|'#9'c #13299D",'#10'"1'#9'c #7C87BA"' + +','#10'"2'#9'c #F6C91B",'#10'"3'#9'c #CD9914",'#10'"4'#9'c #F9B746",'#10 + +'"5'#9'c #FCA94E",'#10'"6'#9'c #FC1306",'#10'"7'#9'c #503308",'#10'"8'#9 + +'c #893A05",'#10'"9'#9'c #FD3105",'#10'"0'#9'c #5A6DC7",'#10'"a'#9'c #F5E' + +'BB8",'#10'"b'#9'c #071CA1",'#10'"c'#9'c #A9A9AC",'#10'"d'#9'c #3B488F",' + +#10'"e'#9'c #DAD8D5",'#10'"f'#9'c #FD4809",'#10'"g'#9'c #8B8A8B",'#10'"h' + +#9'c #6E3507",'#10'"i'#9'c #A98B1E",'#10'"j'#9'c #2B3A94",'#10'"k'#9'c #A' + +'D5309",'#10'"l'#9'c #64583A",'#10'"m'#9'c #2B0D05",'#10'"n'#9'c #79776A"' + +','#10'"o'#9'c #4B568C",'#10'"p'#9'c #AB3104",'#10'"q'#9'c #373737",'#10 + +'"r'#9'c #907830",'#10'"s'#9'c #FDFCF3",'#10'"t'#9'c #D3B62E",'#10'"u'#9 + +'c #727CC1",'#10'"v'#9'c #ABAFBE",'#10'"w'#9'c #BEBCB8",'#10'"x'#9'c #FD5' + +'81B",'#10'"y'#9'c #4F1A04",'#10'"z'#9'c #969799",'#10'"xxxxxxxxxxxxxxxxx' + +'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx' + +'xxx/xxx/xx/x/x/x/x//x//x/////////////////////////////////}/}/}/}/}/}/}/}' + +'}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}},}},},},},},},},},,},,},' + +',},,,,,},,,,,,,}=",'#10'"xxxfxxxxxxxfxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx' + +'xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx/xx/x/x/x/xx//x/x/x/x/x/x/x//x///x/x/x' + +'/x/x/////////////}//}//}/}////////}/}/}/}/}/}//}//}/}/}}}}}/}}}}}}}}}}}}' + +'}}}}}},},},},}},}}},}},},},},},},},},,},,},,},},,,,,,,,,}fp",'#10'"xxxxx' + +'fxxfxfxfxxxxxfxxxfxxxfxxxfxfxfxfxfxfxfxfxfxfxxxxxxxxxxxxxxxxxxxxxxxxxx/x' + +'/xxxx/xx/xx/x//xx/x///x/x//////x///x///////////////////}/////}//}//}//}/' + +'}}/}}/}}}}}/}/}/}/}}/}}}/}/}}}}}}}}}}}}}}}}}}}}}}}}}}}},}},}}},}}},},},}' + +',},,,,},,,,,,,,,,,,,},,,,,/p#",'#10'"xxxf9f9ff9f9f9f9f9f9f9f9f9f9f9f9f9f' + +'9f9f9f9ff9ff9ff9f9ff9fffffffffffffffffxffffxfxffxffxffxfxxxfxfxfxxxfxfxf' + +'xxxfxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx/xx/x//x//' + +'x//////////////////////}///}//}///}//}///}///}/}}}/}/}}/}}}/}}}}}}}/p##"' + +','#10'"xxf66666666666666666666666666666666666666666666666666666666666666' + +'666666666666666666666666666666666666666666666666666666666666669666969696' + +'969696996996999969999999999999969999969999999999999999999999999999999999' + +'99999999f999f99f999f9f99f9f9f999f9ffff###",'#10'"fxf66666666666666666666' + +'666666666666666666666666666666666666666666666666666666666666666666666666' + +'666666666666666666666666966969669696696696696969696969666996966696669696' + +'99696999969696969999999999999999999999999999f99f9999f99f999f9999f9f99f9f' + +'9f9f9f99###",'#10'"xxf66666666666666666666666666666666666666666666666666' + +'666666666666666666666666666666666666666666666666669669696969696966696669' + +'696696969669696696969699999696999969999699999999699999999996999999999999' + +'99999f99999f999999f9f99f99f9f9f9f99f9f9f9f9f9f9ffp###",'#10'"xxf#6666666' + +'666666666666666666666666666666666666666666666666666666666666666666666666' + +'666666666666696669666966666666669699669966969696696996969969699969696999' + +'96999969999999999999999699999999999999999999f999f9f9f99f9ff99f9ff9fff9f9' + +'ff9ff9f9f9fff9ff9ff9###",'#10'"xxx66666666666666666666666666666666666666' + +'666666666666666666666666666666666666666666666666696696669696966696999699' + +'969666996699696969969696996999696999999969999999999999999999999999999999' + +'9999f999f9f9f9f9f9f9f99f9f99ff9f9f9f9f9ff9f9fff9fffff9ffffff9f###",'#10 + +'"xxf66666666666666666666666666666666666666666666666666666666666666666666' + +'666666666666669696696969696666996969666966696996969969969996969996999699' + +'99996996999999999999999999999999999f9f9fffx//xx/xfffff9fff9f9f9ffffff9f9' + +'f9fff9fff9ffff9fffff9ffff9fffff9###",'#10'"/xx66666666666666666666666666' + +'666666666666666666666666666666666666666666666666969699696696969669696996' + +'9696969999999699969996999969999999999999999999999999999999999999999999f9' + +'99f9f9ff=///}}}}}}}}/}/}}}/=xxxfff999ffff9ffffffffffffffffffffffffffffff' + +'ff###",'#10'"/xx66666666666666666666666666666666666666666666666666666666' + +'666666666696996996696966969969696999699699699996969696996999699996999969' + +'996999999999999999999999999999999f99f9f99f9f9f=///}}},}}}}}}}},}}}}}}}}}' + +'}}/=x=ffffffffff9f9ffffffffffffffffffffffff9###",'#10'"/xx66666666666666' + +'666666666666666666666666666666666666669669696969699696669669696969696969' + +'6996696969699696999999999999699999999999999999999999999999f999999f9f9f9f' + +'9f99f999f9f9ffx/}}}}}}}}},}}''}},},,,,,,},,,},,}}/xxffffffffffffffffffff' + +'ffxfxfxfxfxxxff###",'#10'"///6666666666666666666666666666666666666666666' + +'966696966969669696966696969696969699699699996999999999999999696969969999' + +'999999999999999999999999999f999f9ff9999f9f9f9f99f9f9ffx//}}}},,},,,,}}}}' + +'},},}}},},,,},,,,,,}}}}x=fffffffffffffxffxxffxffxfxxffxx9###",'#10'"///6' + +'666666666666666666666666666666666966969669696966969696969696999699969969' + +'9699699699969999696996996999699999999999999999999999999999999999f9f99f9f' + +'9f99ffff9f9f9ff9fffffff//}/}}}}}},},},}''}},,,,,,,,,,},,,},},,,,,,}//xff' + +'fffffxfxfxxffxxfxxxxfxxxxxxf###",'#10'"///966666666666666666666666669696' + +'969696966969669696969696969969696969699699999999999699996999999999999999' + +'999999999999999999999999f9f9f9f9f9f99f9f9f9f9ff9f9ff9ffffff9fffx=x//''}/' + +'}}},}}}}}''}},}},,,,,,},,,},,,,,,,,,,,,,,}/x=xxxxxxfxfxxxxxxxfxxxxxxxxff' + +'###",'#10'"}//6666666666666669669696996666969696696969699696996996999696' + +'9999999996999696996999999999999999999999999999999999999999999f99f9f99f99' + +'f9f9f9f9f9ffff9ff9fff9ffff9f9fffff=xx=///}''}}}}},,},,,,,,,,,,,,,,,,,,,,' + +',,,,,_,,,,,,,,}/x=fxfxxxxxfxxfxxxxxxxxxxxxf###",'#10'"/}''96696666696969' + +'669696966699969696996969969696996996969699999696996999999999999699999999' + +'999999999999999999999f999f9f9f9f9f9f99f9f9ff9f9f9f9fff9f9fffff9fff9fffff' + +'ffffxx=x/x''/}}}}},},},,,,,,,,,,,,,,,,,,,,,,,,,,_,,,_,,_,,,,//xxxxxxxxxx' + +'xxxxxxxxxxxx/=f###",'#10'"}/}9966969966969696969696996696969969996999999' + +'969969999999699999999999999999999999999999999999999999f99f9ff9f99ff9f999' + +'f9f9f9ff9f9f9f9ff9ffff9ffffffffffffffffffffff=xf=x=//}}}},},},,,},},,,,,' + +',,,,,,,,_,,,,,_,_,,__,,_,,_,,_,}/xxxxxxxxx/xxxx/x///x/xxx###",'#10'"}}/9' + +'969696696969696969699699699996996999696969999999999999999999999999999999' + +'9999999999999999999f9f99f9f9f99f9ff9f9ffff9f9f9f9ffffffffffff9fffff9ffff' + +'fffffffffffffffx=f=///}}}}}},,,,},,},,,,,,,,,,,_,,,__,_,,_,,_,,__,__,_,,' + +'__}/xx/x/x/xx//x/x/xx/x//xx###",'#10'"}}}9969699969969996999969999969699' + +'999699999999999999999999999999999999999999999f99999f9f9ff9ff9f9ff9f9f9ff' + +'f9f9f9ff9f9fffffffff9ff9ff9fffffffffffffffffffffffffxfxx/x=x=/}}},,,,,,,' + +',,,},}/''/},,,_,_,,__,,_,__,__,__,_,_,_,5_,_,_,''//x/xx//x////////x///=#' + +'##",'#10'"}}}99996969969996999699969699999969999999999999999999999999999' + +'9999999999999f9f99f9ff9f9f9f9f9f9f9f9f9f9f99ffffffffffff9fff9fffffffffff' + +'ffffffffffffffffxffxfxfxfx=x=f=//''/''/}},,,,__}''},,,,},,,,,,_,_,,__,_,' + +'__,_,_,_,_,5,______,_,''/////x////x/x//////xxp##",'#10'"}}}9969999999699' + +'9969999999999999999999999999999999999999999f99f999f9f9f9ff9f99f9f9f9f9ff' + +'9f9fff9ffffffffffff9ff9ffffffffffffffffffffffffffffffxffxxfxxfxxfxfxfxxf' + +'x=x=/''==p===''/''}},}''===/},,},,_,,,,_,_,,__,_______________,_5___,,//' + +'//////////////////x#p#",'#10'",}}999969969999999999999999999999999999999' + +'999999999999f99f9f9f9ff99f9f9f99f9fff9ff9fff9fffff9fff9f9ff9ffffffffffff' + +'ffffffffffffffffffffffxfxffxfxfxxfxxfxxxxxxxxxx=//====//},,},,,,,//====' + +'''}''}},,,,,,,,__,,_,_,_,______,5,_5___5_5_,}////////////////}/x#p#",'#10 + +'",,}f999999999999999999999999999999999999999f9f9f9f9f9f9f9f9f9f99ff9f9f9' + +'fff9f9fff9ff9fff9f9fffffffffffffffffffffffffffffffffffxfxfxxxxxxfxfxxfxx' + +'xfxxxxxxxfxxxxxx====/=//''/''}},,,,,,}=}},}''=''=''''},,_____,,_______5_' + +'_____5,5__________,//////}/}/}/}/}/}//p##",'#10'"},}99999999999999999999' + +'999999999999f9f9f9f99f99f99f9f9f9f9f9f9ff9ffffff9fffff9ffffff9ffffffffff' + +'ffffffffffffffffffffffxfxfxxxxfxfxfffffxfxxfxfxfxxxxxxxxxxxxxx/xfx=''/==' + +'=====''},__,_}''=/}_,,,,},,,_,_____5,_,,__,_____5_______5_5__5_,}}/}}//}' + +'/}/}/}/}}//#pp",'#10'",,,f9999999999999999999999f9f9f9ff999f9f9ff9ff9ff9' + +'f9f9ff9fffff9fff9ff9ffffffffffffffffffffffffffffffffffxfxfxffxfxxxfxfxfx' + +'ffxxxxfxxxxxxxfxxxxxxxxxxxxxxxxxxx//====x''==p===/},,,,,,}=''=}},,____,,' + +',,,,,,_,____,5_______5_5_5_5__5_5__,,}/}}}/}/}/}}}}/}}''p#p",'#10'",,}f9' + +'999999999999f9f9f9ff99f9f9f99ffff9f9f9f9f9f9ffffffffff9fffffffffffffffff' + +'fffffffffffffffffffffxfxxfxfxfxfxxxfxfxxfxxxxxxfxxxxxxxfxxxxxxxxxxxxxx/x' + +'/x////x/=f====/====/}}}},,,,,''/''}/''}''}},}$,,,,}$,,,____,_,___,5,5__5' + +'___5_5_55____}/}}}}}}}}}}}}}//p#p",'#10'",,,=99f9f9f9f9ff99f9f9f9f9f9f9f' + +'ff9f99fffffffffffff9f9ff9ffffffffffffffffffffffffffffxffxffxfxfxxxfxffxx' + +'xfxxxxfxxxxxfxxxfxxxxxxxxxxxxxxxxxxxxxxxx//x/x/x/x/x//=====/''//}}''/''' + +'''},,__,''''=}},}}''''''''},,_____,,,__5_5_5555_5_55____5_5_5_55___}}}}}' + +'}}}}}}}}}}/ppp",'#10'"_,,fff9f9f9f9f9ff9ff9f9f9ffffff9ffffff9f9ff9ffffff' + +'ffffffffffffffffffxffffffxffxffxxxfxxfxxfxxxxfxxxxxfxxxxxxxxxxxxxxxxxxxx' + +'xxxxxxxxxxxxx/x/xxx//xx//x///x/////f=x=''''}''}=====''}_,,,''===='''',__' + +'_____________,,,,5_5____5_5_555_5_5_55_55_5__}}}}}}}}}}}}}}}#pp",'#10'"_' + +',,ff9f9ff9f9ff9ff9fffffff9f9fffffffffffffffffffffffffffffffffffxfffxfxxx' + +'xfxxfxxxffxxfxxxxxxfxxxfxxxxxxxxxxxxxxxxxx/xx/xx/x//x/x//x//xx/x///x/x//' + +'x///x//////''=====/''/''=k=/''}}}$}''kkk==''=''''},,,,},,,,,,__5__,,_,_,' + +'___555_55_55_55_5555555_,}}}}},},},},/ppp",'#10'",5,=ff9f9ffff9fffffff9f' + +'9ffffffffffffffffffffffffffffxffxfxfxxxfxfxfxfxffxffxxfxfxxxfxxxxfxxxxxx' + +'xxxxxxxxxxxxxxxxx/x/xx/x//x/x/x/x/x/x///x//x/////////////////======''===' + +'==/''='''''''',_,_,,_,,pkp",'#10'"555/=xxfxxxxxxxxxxxxxxxxxxx' + +'x/x/x/xx/x/x//xx/x/x/x/x//x/x/x//xx///x//////////x/x////////////////////' + +'///}//}/}/}}}}}}/}/}/}}//}/}/}}}/}}}}/}}}/}}}}}}}}},}''''=''''=''=''=''k' + +'8ym.....................m7&($$$$,$,''__555545545444554445455555544444444' + +'444________,pkp",'#10'"555''xxxxxxxxxxxxxxxxx//x/x/xx/x/xxxx/x//x//x/x/x' + +'/x/x//xx//x///x/////////////////////}///}/}/}/}//}/}/}/}}//}/}///}/}}}}}' + +'/}}}}}}}/}}}}}}}}}}}}}}}},}},}},''====''''''=''k&ymm....................' + +'...y[&<<''''$,$}$35555444445444454444445__55444454444{,______,pkp",'#10 + +'"555/''xxxx/xx/xx/xx//xx/xx/x/x///////x/x//x///x//x///x////////////x////' + +'}/////////}/}//}}//}}/}/}/}/}}/}/}/}}}}}}}}}}}/}}}}}}/}}/}}}}}}}}}}}}}}}' + +'}},},},},''''''''''k=''k&&[y..........................mm7h[k(''$,$,$,>53' + +'5_5_5544555554444453,>5444444554>_______kpk",'#10'"555''//xx/''''=///x/x' + +'/x//x///////x///////''/''//xx}x///x/////x}///}///}///////}}}}}/}/}/}/}/}' + +'/}/}/}}}}/}}}}}}}}}/}}}}}}}}}}}}}}}}}}}}}}}}}}}}},},},,},,},},}''=''=''' + +'''=''khymm.............................myyh&k$$,$,$5455544555>55>___>544' + +'_3$55545554444______,kkk",'#10'"445/x///88&8p=///x/////x//x/x////x/}''kk' + +'8&8k}}x/}///////}}/}//}/}//}/}/}//}k8k}}}/}}}}}}}}}}}}/}/}}}}}}}}}}}}}}}' + +'}}}}}}}}}}}}}},}}}}},},},},},}},,},,,,,''''''''=''''''khmm..............' + +'....................m~[<,$$,,$,>>__>____3,$$$$,$_45_$,33_%44444{>>_>___8' + +'kp",'#10'"445''//x/)m.m)=''}/}x///////}}//''/}///}pmmm))k/}}/''}/}/}}/''' + +'}/}},''}}}}/''}}}}}ym)''}/}/}}/}}}/}}}}}}}}}}}}}}}}}}}}}},},},,},,},,},}' + +'},,,,},},,,},,,,,,,,,,,,''=''''''=''>_$3_344244>4{>_>>>,kkk",'#10'"445}' + +'///''m.mm)''&h8kk''''8[hk''/''''888''$}/''8m.hm.y''''&h8h''}''''hh8$}}kh' + +'8&}''}}8h88'',7m)}},}}}}}}}}}}}}}}}}}}}}}}},},,,},},},},},},,},},,},},,}' + +',,},,,,},,,,,,,,,}''''''''''''''<&y.....................................' + +'..mh($3___,$,3,3,$,$,$$''''$''$$_>4>54444444>4>>>>>__kkk",'#10'"444''''}' + +'/''m.yrk''ymm))''8mmmm8''=)m.m)=}}/8..$y.y$8mm.mh<'')mmm7'''')mm))''}h).' + +'mm8''ym)$}}}}}}}}}}}}}},},},},},},},}},},},,},,,,,},,,,,,},,,,,,,,,,,,,,' + +',,,,,,,,''''''''''''''''k[m........................................my[$3' + +'>>_,$,$,$__>>>>>_$,$$3>422424444>4>{>_>>>_kkk",'#10'"444}}///m.y$}$ym.m#' + +'''m.yh.m''8m.&mmh}}/8..$).y$))8hm)&&mm88)''h.m&hm7())&h.)<7.)$}},},,,,},' + +',,,},},},},},},},,,,},,,,,,},,,,,,},},,,,,,,,,,,,,,,,,,,_,__,<''$''''''' + +'''''(hm..........................................yl$5{5{>3_3>{44444444>_' + +'3__>54444{>4>4{4>>>>>_kkk",'#10'"244}/}/}).mm)=h..&$''m.yh..kh..[)my''}}' + +'8..l)my''))$(.m(hmmi4444445{444244444>>{>4{4{4444424{{>' + +'>>>_kkk",'#10'"424,}//''m..m)(ym)$}''...m.)k8...m.y},}8m..m)y$k&&mmm(8m.' + +'y($}ymm,''=''$k&[m.m<7m)$},},,},},,,,,},},,},,,,,},,,,,,,,,,,,,,,,,,,,,,' + +',,,,_,_,_,____,_,__,___$''''''''''''''<&y...............................' + +'..............y[(3>>>{>4>>>>>>>>444444>5{44>t424424{{{>>>k(k",'#10'"242$' + +'}}}}m.m88''7.m''}}m.y[7[''8..h8[&$}}8..h[=$,=)my.m($hm.m<$h.m$,}$,()m7.m' + +'<7.)$,},},,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,,_,_,_,_,,,,_,_,_,_,,_,______' + +'___,$''''$'',''<[~..............................................m[(33_3_' + +'3__3_3$333_>{444444%>%442444{>{{{>kk(",'#10'"242,}/}}m.h'',}7m)$}}..h(mm' + +'k8..$h)y,},8..$,},$))<(mmk$'''').m''hm),<)[$)y<&mm<7mm_,,,,,,,,,,,,,,,,,' + +',,,,,,_,_,_,___,__,__,_____,___,_,____________,______,''''''''$''''(7m..' + +'.............................................m7<$33>>3_>>>>>>_>3>>>{>>%_' + +'%5442442{{>{>>_$''$''''$''[y............................' + +'.....................mh(3%3_>3>>%>>3>%_3333333%>24222222>{{{>>>_$''$''$''''hm...........................................~.~~m..m7<' + +'3%3_3_%_%>%>>%_3_3_>>4424242424{{{{><__>_>_>_$}$''$$3>33>3>>>t>>%>>t{4{444242' + +'222{{{{>k<(",'#10'"]22_,,},&8k}},k88,,,,$888,,_$k88k_},,''h8,_,}_''h&<88' + +'''_''88&,,_''88k,__k&8<88,k8&___,______,_______,________________________' + +'_______>__>__>_>_>>__>>_>>>>>,$$$$''$[.............~~q~.................' + +'.............~qoq..~&i>%_%_>>4{@4224244{224{4{44422{2{{{<<(",'#10'"2;2,,' + +',,,$,$,,,,_,,,,,},,,,,,,,_,,,_,,,_,_,,,,,_$,_,,,_,_,_,,,_3,__,_,_,_,__,_' + +'_,,__,______,_______________________>____>_>_>__>___>_>>_>>>_>>>_>>>>>>>' + +'3,''$$$3%>4' + +'2222242{4244{t>%>%>{2{2{{2><<<",'#10'";2]3,,,,3$,3$3$3,_,,_,,,,,,,_,,,,,' + +'_,_,_,,,_,,,__,__,_,,______,__,______3_______,________________>______>>>' + +'>>>>>___>>>_>_>>>>_>>_>>_>>_>_>>_>>>>_>>>>>_$$,$$3_>{222]22424{>%3>3%3%%%>222{2{<(<' + +'",'#10'"2;2_,,,,)mm)m)m)<,,,,,,,,,,,,,,___,,,,,__,,__,,,__,,,_________,,' + +'_,______________________>____>____>_>>>___>__>_>>>_>>>>>>>_>>__>>>>>>>>>' + +'>>>>>>>>>>>>>>,$$$$3>42@444{3%333333%>%>%%2222{{<<<",'#10'";2]3,,,,m.......'',___' + +'_,____,___,,_________,,_________,,_,________________________>__>>>__>>>_' + +'_>>>>__>__>>>>>>__>_>>>_>>__>>_>>>>>>>>>>>>>>>>>>{>>>>>>{_,$$,$[m.....~*' + +'ngcczn*~..~~.............~*^nggzzcccvwv^~...~...m[<3{%33%%%%3%33333>%>t{' + +'{%>%22222{<<<",'#10'";;]__,,_m.......<__,,_____,,_,____,,_________,_,___' + +'__________>>_____>_>_>___>_>>__>>___>>___>>___>>>>_>>_>_>>>>>>>>>>>>>>>>' + +'>>>>>>>>>>>>>>>>{>{>{{{{{>{>>3$$%>%>%{22222@>22222{<<<",'#10'";];3__,_m' + +'.......<,_,_,____________>___>_______>_____,__>>_>>___>>_>_>__>_>_>>__>>' + +'_>>_>>_>>>>_>>>>_>>>>>>>>>>>>>>>>>>>{>>>>>>>>>>>{>{>{{{{>{>>{>{>{{{{{>{>' + +'33<[m....qnzcww!wwznl~.............~*ngzcvwwwww!e!wvn*........m7it2224{{' + +'{{%3%>t22222222{22222{<,__3m.......<_____________3_______>' + +'_>>_____>>>>__>>___>_>>>__>>>_>__>>___{>>>>>>>>>>>>>>>>_>>>>>>>>>>>>>>>{' + +'>>{>{>>>>{>{>{>{>{>{>{>>>{>{{{{{{{{{>{{{{{>3%>%{2222{4@2@2]222]{i<<",'#10 + +'";;;3____m.......''_________>3_<((((<%_>__>>__>>3>__>_>_3>>>>_>>$(r((($%' + +'>>>>>>>_>>%>>>>>>><_{>>4>{>4>>{{{>4>55>>{{>>{>>ir>{>>{>{>{{{{{{>{{>' + +'{{{{{{{{{{2{3<[m...qnzcweeaeae!w1~...........~^gweesssssssssae!c1*~.....' + +'...q(%t>t4{t{{{@{2>t{@22]2]]22222<<<",'#10'";;;>____m.......<______>_>$7' + +'ymm.m.m7h3>___(hyhy7777y77h&>_>>(hm.mm.mm7k3>_>>3h7h7h77h%%y)(%&777y777$' + +'%&h777h7h$>{{4377.m..m.7h>{>{{{{{{{{{{{{{{{{{2{2{{2{{{3<7...m*gveeasssss' + +'sa!l...........qz!esssssseaessssa!z^~........m(t@@{42@222{{{{{{{@4@]]]2]' + +']22ii<",'#10'";;;>__>3m.......<__>_>>>%&m..........m(>>>&.m.....m...mh>_' + +'3&m..........m${>>3m......m-y.m(5y.m...m.(47......m({{{&...........y({{{' + +'{{{>{{{{{{{{{2{2{2{{2{>33<[...~^wessaeaasssssz~..........^wesssasecno^ce' + +'ssssac*........~^t22];222{t>t{t%%%%%>4@]]]]]{_>_>m......m' + +'<>__>_>_[mm............&__&............h5>y.............m$>_3m.......+m.' + +'.(@y.......(ty.......({{%y............y%{{{{{{{{{{{2{2{{2{22{2{{33$<7...' + +'qgessvnoo1!ssss!q.........bn!essss!l~.~~q^!ssssen~.......m^t2@{{t%%%%%>t' + +'>%>%33%%42]]]]2i_>>m.......<{>>>>>3y......m.......m{%&...' + +'.........[%$m..............y{43........~...(t7.......(47.......<{{l.....' + +'.........y>{2{2{2{2{{{2{2{2{2222{>333<7...*vss!*..~qo!ssse^.........m1!a' + +'ssse1...~^dq^!ssssc~.......ml@24tt%%3%%{%%%33%%33%t2]]]]{i' + +'>_>>m.......i>>>>>><......hzy.......t{lm...........ht&......(rm......74%' + +'3m...........rty.......r@y.......r{>m.....m+^......m%2{{2{{2{222{2222222' + +'22{333%<[...o!sen..~nlqoesssg.........~1!ssssg~...~ng^q^esss!*.......m^t' + +'{22{{{{t>%%3%%%%3%%%%]]]]]2ii<",'#10'";;;{>>>>m.......$>>>>>>h......7%l.' + +'.....m&>3<<<<333<[...^eswq..~^ul~zssac.' + +'....~~..~g!ssseq.....qn1*~cssse^.......ml%tt{t{t>t%%>%3%%%%%3%{2]]]]2>>tm.......$>>{>>%y......[4l.......8{>>>>4tm......r3.......' + +'(4~.......(43m...........rt7.......rt7.......r{%......q@r.......>{22{222' + +'22222222{22222{>3%3i7...^!sz~...*nl~*essc~.~~~qq~.~neessv......m*^o~nsss' + +'sg........[i%%%%%%%%%%%>%>%>%>%%@]]]]22i>>>m.......<{>>{>' + +'5m......htl.......h4{{{>{(......yt:m......<{7.......r{:m...........r@7..' + +'.....r47.......<2%......ytrm.....mt222222222{2222222]]2]2%>33i[...nes^..' + +'..~*^qq!sac~.m~~qqqqqneasan.......qq*~oesssc........7rt%%%%>%%%%%tt{t{tt' + +'t{2]]]]]2>{{m.......${{>{>4y......[4l.......[>{{{{%y....' + +'..(43.......rt7.......r43...........mrt7.......r@7.......r2%.......7:(r(' + +'(((({222222222222222]222]22{33%<[...n!s^.....qoq~zseg~......~~mowesa^...' + +'.....~~~*essaw........~(%{{%t>%>%>{>%%%%%%{@]2]]]]2i>{m.' + +'......${{>2{>y...m.m[t7.......[{{{2{<.......$t%mm.m..mr%~.......<@%.....' + +'...m&tt{@7.......r@7.......<2t........[i@@@22222222]22]2]2]2]22]]]]222%>' + +'%<[...^!s^~....~*~.zsen..........~gese0...........*esssv........m[3tt{t{' + +'%{tt%t%%>t%%{]]]]]]]2i<<",'#10'";;;{{{{{m.......$>{{{{{$<<{%>%tt{{t{22]]]]]2t%%%%t{22]@{@]]]]]]]2i<<",'#10'";;;2{{{@m.......${{2{2{{4@iym' + +'...........[4{{{(......&{{222@try............r4t........@222247.......r@' + +'7.......+]]@im..........7i2]]22]]]2]]]2]]]2]]]]]]2]22%<[...qvs!*.......m' + +'^:ri%%%t%%t%%%ir+wazm..........nsssez........m73t>%t%{%%t{@2]22@t2]2]]]2' + +']2iii",'#10'";;;]{{{{m.......i2{2{2{{<7..............[2{24.......&]2{22(' + +'~..............<2-.......m@222227.......r@7.......r]]]]im..........mi2]]' + +']2]]]2]]]]2]]]]]]]]]]]2{i[...~zaaz......m7ri3%t{{{%>t%%3%%%%tw7.........' + +'*!ssse^.........[%@{t%%%{t22]22@{{{2]]]]]]]2<{{{{t@t@ttt%{@2@{2tti([7lvasssa!*..........7i' + +'t%%{t2@4@{tt{222]]]]]]]]22i{{>{{' + +'{{@@@2@2@2@22@2@@@t3ii-easaez~..........[3{%%%%>t%%%3%%{]]]2]]]2]]]2it{t{t{{{{2@]@]@]]]]]2]22@{t%%3:w-z*.' + +'.........ml%{{%%%%%%3%%%t@2]]]]]]]]]22%{{{{{{@{@@2]]]]];]]]]2]2]2@{tt%%ii[m.........~(t@t%%3%3%%{2]]]]]]2' + +']]]]]]]2it>{{{{@t{@@]@]@]@;@;]]]2]' + +'222222@@%%i[m........7i@{{>%>%%{2]]]]]2]]]]]]]]]]2$i<",'#10'";;;]]2]2m..' + +'..........:@~......qt^.......[t...........m.lt.......[@q.......i2t......' + +'..]]]]]2q.......+!7.......r]@y.......et......(]]]]]]2]]]]]]]]]]]2]]]]]]2' + +']%7....~[(i$$33%>t{{t{{2{@2@]]@;]]]]]]]]]]]]]]]]22]{til.......ml3@tt%%%{' + +'{]]]2]]]]2]]]]]]]]]2{{{{t{2@2@@]' + +'@;@;];]]]]]]]]]]2]2222{%rm......~r%t>%%%{2]2]]]]]]]]]]]2]]]]]2i{t{{{{@@@2@]]]@;]]@]]]]]]]]]]]]]@{@24%i~....' + +'..7itt%%>{2]]]2]]]]]]]]]]]]]]2]2i%{{' + +'t{{{{@@2@@]@;@]];]]]]]]]]]]]@%$i3t{%%{%{{{{@2@2@]@]]];@]@]]]]]]]]]@@%i' + +'i<3%t3(m.....~l%{t%{]]]2]]]]]]]]]]2]]]]]]]]2%{{{t{{{@2@@]@]@];]]];]]]]]]]@tii3i3%33i(......~rt%{@2]]]]]]]]]]' + +']]]]]]]]]]]]]2i>t{{{@t@@22]]]]@]]]]]' + +']]]]]]t%ii$$33>33$lm.....~it{{]]]]]]]]]]]]]2]]]]]]]]]]22it{{{t{{22@@@]@;]]]]]]]]]@]@%3<$$33333_%3[......~i@t2' + +'2]]]]]]]]]]2]]]2]]]]]]]]]2$i<",'#10'";;;;]]2]]]]]]]]]]]]]]]2]]]]]]]2]]]]' + +']222t{%{t%t%:%:3i:i:+i++++++++nrnnn^n^^^^^n^llo^ololooo**o*o*dd*dqddddqj' + +'dddqjqdjqjjjjjjjqqql]]]]]]]]]]]]]]]]]]]]]]]]]]]]]:7.m7[(%{{{@@@@@2' + +'2]@]]@]]]]]@]]@@3i>{{{{@{{2@2]]]]]]]]]@2t%i(3>3$$i7m......m(t]]2]]]]]]]]2]]]]2]]]' + +']]]]]]]2i%{{{2@2@]@]@]]@]]@@t%<((<$33' + +'3333333$ii(q.......ml:]]]]]]]]]]]]]2]]]]]]]]]]]]22ii<",'#10'";;;;]]]]]]]' + +']]]]]]]]]]]]]]]]]]]]]]]]]2@{t@tt%%:%:i:ii+:++++nnnnn^^^^o^o^ooooo*oddddd' + +'jdjjjjjjv|||jvj000|o1d|jo|b1u|bbd1oj!1jb|bbqe]]]]]]]]]]]]]]]]]]]]]]]]]]2' + +']%*....m*&l&(i3t{t2@]@]@]]@@]@t%i<(((<33333>3_33$ii:zl~.......*i@]]]]]]]' + +']]]]]]2]]]]]2]]]]]]2%3%33$$3$3$$$$$$ii--wwww!!!!www^m........q^++:t2]]]]]]' + +']]]]]]2]]]]2]2i c #7A7C93", -", c #818495", -"' c #797B88", -") c #868992", -"! c #7C7B8D", -"~ c #F9F9FF", -"{ c #870013", -"] c #AE0013", -"^ c #D30013", -"/ c #FCF4FF", -"( c #FEFAFF", -"_ c #00000E", -": c #858496", -"< c #0A0627", -"[ c #86868E", -"} c #F7F9FF", -"| c #F9FCFF", -"1 c #FBFBFF", -"2 c #FBFAFF", -"3 c #EEEDFF", -"4 c #F8F5FF", -"5 c #FAF8FF", -"6 c #FBF7FF", -"7 c #FEFBFF", -"8 c #FEFCFF", -"9 c #05040C", -"0 c #838486", -"a c #FCFFFF", -"b c #F2F7FA", -"c c #C6CBCE", -"d c #F3F9F9", -"e c #C3C7C6", -"f c #C0C5C1", -"g c #FCFFFD", -"h c #C3C5C4", -"i c #FEFFFF", -"j c #CACBCD", -"k c #F6F7FB", -"l c #CCCBD1", -"m c #010008", -"n c #848685", -"o c #F8FCFB", -"p c #C5CAC6", -"q c #FCFFFB", -"r c #D0D6CC", -"s c #EFF3E5", -"t c #C6CABB", -"u c #F8FCEB", -"v c #C8CCBB", -"w c #FAFCEE", -"x c #D0D2C7", -"y c #FAFBF6", -"z c #C1C1C3", -"A c #FBF8FF", -"B c #02000D", -"C c #868686", -"D c #FBFDFA", -"E c #FEFFFB", -"F c #C6C9C2", -"G c #FCFFF4", -"H c #C9CDBF", -"I c #FEFFF1", -"J c #BEC3AF", -"K c #FEFFEF", -"L c #CBCEBD", -"M c #F6F8EB", -"N c #CACBC3", -"O c #FFFFFD", -"P c #C6C4C9", -"Q c #010009", -"R c #FFFFFF", -"S c #C2C2C0", -"T c #C7C7C5", -"U c #FDFEF9", -"V c #C4C5C0", -"W c #FBFCF6", -"X c #C9CAC4", -"Y c #FFFFFA", -"Z c #C1C2BC", -"` c #C6C5C0", -" . c #010000", -".. c #828282", -"+. c #FCFCFC", -"@. c #C2C2C2", -"#. c #F8F8F8", -"$. c #C3C3C3", -"%. c #CECECE", -"&. c #F9F9F9", -"*. c #BEBEBC", -"=. c #BEBDB9", -"-. c #C4C4BC", -";. c #060600", -">. c #858585", -",. c #B3B3B5", -"'. c #D3D3D3", -"). c #C0C0BE", -"!. c #FAFAF8", -"~. c #CACAC8", -"{. c #C4C4C2", -"]. c #000000", -"^. c #848484", -"/. c #C4C4C6", -"(. c #F5F5F7", -"_. c #CBCBCD", -":. c #F7F7F9", -"<. c #CDCDCF", -"[. c #F8F8FA", -"}. c #C8C8CA", -"|. c #D4D4D4", -"1. c #808080", -"2. c #F9F9FB", -"3. c #CAC9CE", -"4. c #FFFEFF", -"5. c #C6C5CD", -"6. c #FFFDFF", -"7. c #C9C7D4", -"8. c #F7F5FF", -"9. c #CDCBD8", -"0. c #C9C8D0", -"a. c #F7F6FC", -"b. c #C5C5C7", -"c. c #F4F6F3", -"d. c #000200", -"e. c #949494", -"f. c #060606", -"g. c #000002", -"h. c #040308", -"i. c #000005", -"j. c #000007", -"k. c #000009", -"l. c #04020F", -"m. c #08070F", -"n. c #020204", -"o. c #0D0F0C", -"p. c #000100", -" ", -" ", -" ", -" . + @ # $ % & * = - ; > , ' ) ", -" ! ~ { { { { { ] ] ^ ^ / ^ ( _ ", -" : { { { { ] ] ] ^ ^ ^ ^ ^ < _ ", -" [ } | 1 1 2 3 2 4 5 6 7 8 8 9 ", -" 0 a b c d e a f g h i j k l m ", -" n o p q r s t u v w x y z A B ", -" C D E F G H I J K L M N O P Q ", -" C R S O T U V W X Y Z Y ` Y . ", -" ..+.R @.#.$.R %.&.*.O =.Y -.;. ", -" >.R ,.R '.R ).O T !.~.O {.!.]. ", -" ^.R R /.(./.R _.:.<.[.}.R |.]. ", -" 1.2.3.4.5.6.7.8.9.6.0.a.b.c.d. ", -" e.f.g.h.i.j.k.l.k.k.m.i.n.o.p. ", -" ", -" "}; diff --git a/images/newunit.xpm b/images/newunit.xpm deleted file mode 100644 index 64be38fd3a..0000000000 --- a/images/newunit.xpm +++ /dev/null @@ -1,54 +0,0 @@ -/* XPM */ -static char * newunit_xpm[] = { -"16 16 35 1", -" c None", -". c None", -"+ c #BFC1BC", -"@ c #C1C1C1", -"# c #000000", -"$ c #0C0C0C", -"% c #C5C5C5", -"& c #B4B4B4", -"* c #FEFEFE", -"= c #FFFFFF", -"- c #FAFAFA", -"; c #070707", -"> c #C8C8C8", -", c #F3F3F3", -"' c #FCFCFC", -") c #020202", -"! c #090909", -"~ c #F8F8F8", -"{ c #C4C4BC", -"] c #010101", -"^ c #FBFBFB", -"/ c #F0F0F0", -"( c #FDFDFD", -"_ c #F7F7F7", -": c #BFBFBF", -"< c #030303", -"[ c #C6C6C6", -"} c #B3B3B3", -"| c #BDBDBD", -"1 c #0A0A0A", -"2 c #050505", -"3 c #040404", -"4 c #C8C6C9", -"5 c #C4C3C9", -"6 c #C4C2CD", -"................", -"..@##$##$##@%&..", -"..@#*===-=;#.>..", -"..@#*==*=,#=#@..", -"..@#*==='*)##!..", -"..@#*==~===-=#..", -"..@#*===~-===]..", -"..@#*==^*=/(^#..", -"..@#*====_===)..", -"..@#*===-(=^(#..", -"..:<_===^==(~;..", -"..[]=_=(=(===#..", -"..}]^=^==_-(^$..", -"..|1##)<##$2#3..", -"................", -"................"}; diff --git a/images/openfile.xpm b/images/openfile.xpm deleted file mode 100644 index 2aae46bba4..0000000000 --- a/images/openfile.xpm +++ /dev/null @@ -1,252 +0,0 @@ -/* XPM */ -static char * openfile_xpm[] = { -"16 16 233 2", -" c None", -". c #C0C2B5", -"+ c #BFC2B9", -"@ c #BFC2BB", -"# c #BFC1BC", -"$ c #B4BAB0", -"% c #C2C7C0", -"& c #C0C5BF", -"* c #B5BAB6", -"= c #CBCCCE", -"- c #C3C4C8", -"; c #B9BABF", -"> c #B9B9C1", -", c #C0BFC7", -"' c #C1C3B6", -") c #C1C2BA", -"! c #C0C3BC", -"~ c #C1C2BD", -"{ c #C0C2BF", -"] c #C0C2BD", -"^ c #C4C6C1", -"/ c #B9BEB8", -"( c #020703", -"_ c #000100", -": c #000004", -"< c #C6C7CC", -"[ c #B7B7BF", -"} c #C7C7D1", -"| c #C1BFCA", -"1 c #C3C2BE", -"2 c #B6B5B3", -"3 c #C7C7C7", -"4 c #C4C2C5", -"5 c #BCBBC1", -"6 c #C7C4CD", -"7 c #BDBCC4", -"8 c #B8B8C0", -"9 c #000005", -"0 c #CBCCD1", -"a c #B6B7BB", -"b c #BDBEC2", -"c c #040507", -"d c #C1C1C3", -"e c #000000", -"f c #C1C1C1", -"g c #BBBAB5", -"h c #CECEC4", -"i c #BBB9AD", -"j c #C2BFB8", -"k c #C5C1BE", -"l c #C0BBBF", -"m c #BFBCC3", -"n c #C7C6CE", -"o c #C8C7CF", -"p c #B5B4BA", -"q c #C5C6C8", -"r c #B4B4B2", -"s c #010200", -"t c #C5C6C0", -"u c #C5C4B2", -"v c #030400", -"w c #090900", -"x c #040400", -"y c #BCBC9A", -"z c #CCCAB3", -"A c #C9C5B9", -"B c #C1BDBC", -"C c #B8B6B9", -"D c #BDBBBC", -"E c #BDBEB9", -"F c #C0BFBA", -"G c #010100", -"H c #B7B9AC", -"I c #040300", -"J c #EDF0B9", -"K c #FFFFBD", -"L c #EBEDA4", -"M c #0A0B00", -"N c #070600", -"O c #060400", -"P c #141300", -"Q c #030200", -"R c #D0CEC1", -"S c #BFBFB3", -"T c #BBBBB1", -"U c #C4C4BC", -"V c #C4C3BF", -"W c #060500", -"X c #FFFFB8", -"Y c #EEF58E", -"Z c #FCFF94", -"` c #E9EF85", -" . c #FFFFB1", -".. c #E7E89C", -"+. c #E1E3A4", -"@. c #FFFFD1", -"#. c #090A00", -"$. c #BCBAA3", -"%. c #C6C3BA", -"&. c #BBB6BA", -"*. c #C6C3CE", -"=. c #C3BFCE", -"-. c #0D0B00", -";. c #E7EA8F", -">. c #FFFF98", -",. c #F0F776", -"'. c #FFFF92", -"). c #F0EE89", -"!. c #FFFFAF", -"~. c #F8FBA2", -"{. c #FEFFAE", -"]. c #EFF0AA", -"^. c #060600", -"/. c #CECBA8", -"(. c #C4C1AE", -"_. c #D1CCC9", -":. c #BEB9C0", -"<. c #C3BDCB", -"[. c #070300", -"}. c #FEFEA8", -"|. c #F2F582", -"1. c #FFFF8F", -"2. c #F2F37C", -"3. c #0E0900", -"4. c #0D0800", -"5. c #0A0900", -"6. c #080A00", -"7. c #0A0A00", -"8. c #070500", -"9. c #030000", -"0. c #F6F4A7", -"a. c #FFFF9D", -"b. c #EFF07B", -"c. c #111100", -"d. c #7B7716", -"e. c #89852A", -"f. c #818121", -"g. c #7F8022", -"h. c #82822C", -"i. c #7A7B2D", -"j. c #7B7C3A", -"k. c #84844E", -"l. c #75764E", -"m. c #C3C2B0", -"n. c #0A0800", -"o. c #FFFFC5", -"p. c #E7EA91", -"q. c #0E1100", -"r. c #7E8211", -"s. c #808310", -"t. c #878B13", -"u. c #7F8308", -"v. c #83870E", -"w. c #7B7F11", -"x. c #818526", -"y. c #797C2F", -"z. c #7C7D43", -"A. c #040500", -"B. c #C7C7AF", -"C. c #C1C1B5", -"D. c #E3E3AD", -"E. c #7F842A", -"F. c #767B15", -"G. c #848B1B", -"H. c #747903", -"I. c #7D8108", -"J. c #7F820F", -"K. c #858821", -"L. c #797C23", -"M. c #7F823B", -"N. c #0A0D00", -"O. c #D2D3B1", -"P. c #C0C1AF", -"Q. c #C0C1BB", -"R. c #050300", -"S. c #070800", -"T. c #7B7B45", -"U. c #737631", -"V. c #878A3B", -"W. c #7B7F28", -"X. c #82852A", -"Y. c #7C7F28", -"Z. c #858636", -"`. c #7B7B33", -" + c #7A7A3E", -".+ c #C7C7A5", -"++ c #B4B39F", -"@+ c #C1C1B7", -"#+ c #C0C0BE", -"$+ c #030100", -"%+ c #101000", -"&+ c #040600", -"*+ c #040700", -"=+ c #060700", -"-+ c #090800", -";+ c #0E0B00", -">+ c #070400", -",+ c #C7C5AC", -"'+ c #C3C3BB", -")+ c #C7C7C5", -"!+ c #C0C0C2", -"~+ c #C5C4C0", -"{+ c #B6B6AC", -"]+ c #C3C1B2", -"^+ c #C9C8B3", -"/+ c #C3C3A7", -"(+ c #BCBB9C", -"_+ c #CBCAAC", -":+ c #CBC7AE", -"<+ c #C8C6B1", -"[+ c #BEBBAA", -"}+ c #C5C3B6", -"|+ c #BDBAB3", -"1+ c #BFBEBC", -"2+ c #C3C1C6", -"3+ c #BDBCC2", -"4+ c #C0BFC5", -"5+ c #BFBDC2", -"6+ c #C8C6C7", -"7+ c #C1C1BF", -"8+ c #B9B8B3", -"9+ c #C8C8C0", -"0+ c #C8C8BE", -"a+ c #BDBDB3", -"b+ c #BFBCB7", -"c+ c #BCB8B5", -"d+ c #CCCBC7", -"e+ c #BCBABB", -"f+ c #C8C6C9", -"g+ c #C4C3C9", -"h+ c #B5B4BC", -"i+ c #C4C2CD", -"j+ c #BFBFC7", -". + @ # # @ @ $ % & * = - ; > , ", -"' ) ! ~ { ~ ] ^ / ( _ : < [ } | ", -"1 2 3 4 5 6 7 8 9 0 a b c d e f ", -"g h i j k l m n o p q 3 r s _ t ", -"u v w x y z A B C D E F G w G H ", -"I J K L M N O I P Q Q R S T U V ", -"W X Y Z ` ...K +.@.#.$.%.&.*.=.", -"-.;.>.,.'.).!.~.{.].^./.(._.:.<.", -"[.}.|.1.2.3.4.5.6.7.7.8.O I Q 9.", -"[.0.a.b.c.d.e.f.g.h.i.j.k.l.^.m.", -"n.o.p.q.r.s.t.u.v.w.x.y.z.A.B.C.", -"x D.M E.F.G.H.I.J.K.L.M.N.O.P.Q.", -"R.S.T.U.V.W.X.Y.Z.`. +W .+++@+#+", -"$+%+x &+*+S.=+-+8.;+>+,+u '+)+!+", -"~+{+]+^+/+(+_+:+<+[+}+|+1+2+3+4+", -"5+6+7+8+9+0+a+b+c+d+e+f+g+h+i+j+"}; diff --git a/images/save.xpm b/images/save.xpm deleted file mode 100644 index 947a589879..0000000000 --- a/images/save.xpm +++ /dev/null @@ -1,237 +0,0 @@ -/* XPM */ -static char * save_xpm[] = { -"16 16 218 2", -" c None", -". c #CFCFCF", -"+ c #B4B5AF", -"@ c #C0C3B2", -"# c #C0C2B4", -"$ c #C0C0BE", -"% c #C0BFC4", -"& c #C0C0C2", -"* c #C0BFC5", -"= c #C0BECC", -"- c #C6C5CB", -"; c #B4B4B4", -"> c #C1C3BE", -", c #BFC1BC", -"' c #B0B2AF", -") c #CACCCB", -"! c #BFBFBF", -"~ c #000100", -"{ c #000400", -"] c #000002", -"^ c #000005", -"/ c #00000C", -"( c #000007", -"_ c #000000", -": c #010400", -"< c #000200", -"[ c #050704", -"} c #BBBCBE", -"| c #C1C1C1", -"1 c #787C5B", -"2 c #020600", -"3 c #C5C6B6", -"4 c #CAC9C4", -"5 c #C6C5C1", -"6 c #C0BEBF", -"7 c #C7C4CD", -"8 c #CCC9D2", -"9 c #C9C9CB", -"0 c #C3C4BC", -"a c #C5C9B2", -"b c #C6C8C7", -"c c #010200", -"d c #7A7C54", -"e c #030600", -"f c #C6C5B0", -"g c #C7C7BD", -"h c #C7C4BD", -"i c #D0CFCB", -"j c #C6C4C7", -"k c #C4C2C7", -"l c #C7C6C4", -"m c #BEC0B2", -"n c #0C1200", -"o c #000600", -"p c #020300", -"q c #C2C4C3", -"r c #787B4E", -"s c #040600", -"t c #D3D1BA", -"u c #C7C4BB", -"v c #CCC7C1", -"w c #C4C1BC", -"x c #C7C3C4", -"y c #C8C6C7", -"z c #C7C6C2", -"A c #C8C9B7", -"B c #010600", -"C c #707650", -"D c #BDBCC2", -"E c #797B4C", -"F c #070900", -"G c #C1BCA8", -"H c #CECAC1", -"I c #C5C0BC", -"J c #D6D1CE", -"K c #C3BDBD", -"L c #CCC8C7", -"M c #CDC9C6", -"N c #C7C9B4", -"O c #010700", -"P c #81865E", -"Q c #010000", -"R c #BCBAC8", -"S c #767849", -"T c #0B0A00", -"U c #CFC8B6", -"V c #C8C0BD", -"W c #D5CCCD", -"X c #C6BDBE", -"Y c #C9C0C3", -"Z c #CCC6C8", -"` c #C4BEBE", -" . c #CBCAB8", -".. c #6F744C", -"+. c #08050C", -"@. c #BBB5D1", -"#. c #010300", -"$. c #808147", -"%. c #070700", -"&. c #D0CBAB", -"*. c #C4BDAB", -"=. c #C4BDAD", -"-. c #D2CCBE", -";. c #D0CABC", -">. c #C8C2B4", -",. c #C9C3B3", -"'. c #CACAA8", -"). c #0F1400", -"!. c #6D723A", -"~. c #0C0904", -"{. c #C2BECF", -"]. c #787E28", -"^. c #7C801F", -"/. c #080700", -"(. c #0E0C00", -"_. c #141200", -":. c #070500", -"<. c #0A0A00", -"[. c #060600", -"}. c #080E00", -"|. c #727D17", -"1. c #7F8A2E", -"2. c #060800", -"3. c #B9B7AB", -"4. c #010500", -"5. c #79811E", -"6. c #8A9121", -"7. c #78782E", -"8. c #7A7941", -"9. c #7B7A42", -"0. c #797744", -"a. c #7E7B4E", -"b. c #7B7A4C", -"c. c #80804E", -"d. c #777D35", -"e. c #7F8B1F", -"f. c #74801E", -"g. c #C4C3B1", -"h. c #BEBEBE", -"i. c #7C8323", -"j. c #7A8119", -"k. c #090700", -"l. c #070100", -"m. c #090400", -"n. c #0D0900", -"o. c #060000", -"p. c #050000", -"q. c #050200", -"r. c #080B00", -"s. c #030C00", -"t. c #747F33", -"u. c #B8B7B5", -"v. c #BDBDBD", -"w. c #020500", -"x. c #7B8127", -"y. c #83882C", -"z. c #070300", -"A. c #090300", -"B. c #060100", -"C. c #040000", -"D. c #04000E", -"E. c #0A0219", -"F. c #CAC6C7", -"G. c #CCCCB2", -"H. c #010A00", -"I. c #828A4F", -"J. c #010100", -"K. c #C2BFC8", -"L. c #C3C3C3", -"M. c #787F32", -"N. c #7E8235", -"O. c #060200", -"P. c #0D0600", -"Q. c #080300", -"R. c #030010", -"S. c #C7C2C6", -"T. c #CFD1BC", -"U. c #0C1300", -"V. c #666C3C", -"W. c #080901", -"X. c #BFBEC6", -"Y. c #B9B9B9", -"Z. c #7F8348", -"`. c #74783D", -" + c #0A0500", -".+ c #05000E", -"++ c #01000E", -"@+ c #BEBFB1", -"#+ c #040900", -"$+ c #757B57", -"%+ c #BDBCC4", -"&+ c #CACABE", -"*+ c #030500", -"=+ c #0A0C00", -"-+ c #030000", -";+ c #070400", -">+ c #050102", -",+ c #03000B", -"'+ c #01000C", -")+ c #050209", -"!+ c #070800", -"~+ c #C0C0C8", -"{+ c #B8B8B8", -"]+ c #BEBFB7", -"^+ c #C2C4AF", -"/+ c #C2C1AC", -"(+ c #CAC7C2", -"_+ c #BEBABB", -":+ c #C4C0BF", -"<+ c #C0BEC1", -"[+ c #C0BDC6", -"}+ c #C6C4CF", -"|+ c #B4B3B8", -"1+ c #C3C4BF", -"2+ c #C1C3B6", -"3+ c #C3C5B8", -"4+ c #C4C6C5", -"5+ c #C5C6CB", -". + @ # $ % & * = = - ; > , ' ) ", -"! ~ { { ~ ] ] ^ / / ( _ : < [ } ", -"| < 1 2 3 4 5 6 7 8 9 0 { a < b ", -"| c d e f g h i j k l m n o p q ", -"| c r s t u v w x y z A B C ~ D ", -"| c E F G H I J K L M N O P Q R ", -"| c S T U V W X Y Z ` .e ..+.@.", -"| #.$.%.&.*.=.-.;.>.,.'.).!.~.{.", -"| : ].^./.(._.:.:.<.[.}.|.1.2.3.", -"| 4.5.6.7.8.9.0.a.b.c.d.e.f.e g.", -"h.4.i.j.k.l.m.n.o.p.q.r.s.t.F u.", -"v.w.x.y.z.A.B.C.D.E.F.G.H.I.J.K.", -"L.s M.N.O.P.o.Q.D.R.S.T.U.V.W.X.", -"Y.#.Z.`. +B.C.C..+++k @+#+$+~ %+", -"L.&+*+=+C.-+;+>+,+'+)+!+{ { _ ~+", -"{+]+^+/+(+_+:+<+[+}+|+1+2+3+4+5+"}; diff --git a/images/saveall.xpm b/images/saveall.xpm deleted file mode 100644 index b75d392eba..0000000000 --- a/images/saveall.xpm +++ /dev/null @@ -1,226 +0,0 @@ -/* XPM */ -static char * saveall_xpm[] = { -"16 16 207 2", -" c None", -". c #BFBFC1", -"+ c #BFBEC3", -"@ c #BFBFBD", -"# c #C3C4BF", -"$ c #BABBB5", -"% c #C1C2BC", -"& c #D2D3CE", -"* c #B5B5B7", -"= c #C9C8CE", -"- c #C4C3CB", -"; c #C4C3C9", -"> c #C1C1C1", -", c #BCBDB7", -"' c #BABBB3", -") c #CBCCC6", -"! c #C0C0C2", -"~ c #C1BFC2", -"{ c #C5C5C3", -"] c #B8B9B4", -"^ c #080A00", -"/ c #000200", -"( c #010000", -"_ c #0B090A", -": c #010007", -"< c #010009", -"[ c #040108", -"} c #080800", -"| c #080900", -"1 c #C2C0C1", -"2 c #C2C1BF", -"3 c #C0C0BE", -"4 c #BEBFB9", -"5 c #020400", -"6 c #7A7C6F", -"7 c #010100", -"8 c #C4C3C1", -"9 c #CAC7CE", -"0 c #C5C2CB", -"a c #C6C4C7", -"b c #CAC9C5", -"c c #010200", -"d c #BEC0AB", -"e c #0B0E00", -"f c #B7B6B4", -"g c #C8C7C3", -"h c #BEBDB8", -"i c #000100", -"j c #030500", -"k c #040400", -"l c #060105", -"m c #030002", -"n c #040000", -"o c #030100", -"p c #010300", -"q c #050800", -"r c #D1D0CB", -"s c #B3B3A9", -"t c #C6C6BC", -"u c #797C73", -"v c #BBBDB0", -"w c #C7C7BD", -"x c #C4C4BC", -"y c #CAC6C3", -"z c #D0CDC8", -"A c #C6C5B1", -"B c #0E0E00", -"C c #6B6E4F", -"D c #040800", -"E c #B8B8AC", -"F c #030200", -"G c #090B00", -"H c #090600", -"I c #040100", -"J c #040200", -"K c #030400", -"L c #040600", -"M c #717552", -"N c #000400", -"O c #BFC0AE", -"P c #101000", -"Q c #777A5F", -"R c #050700", -"S c #C5C8BF", -"T c #C6C7BF", -"U c #BFC0B8", -"V c #CDCAC1", -"W c #CBC9BC", -"X c #080500", -"Y c #CECDB1", -"Z c #090900", -"` c #747549", -" . c #040700", -".. c #7B8058", -"+. c #C3C3AB", -"@. c #727653", -"#. c #000300", -"$. c #C2C5BA", -"%. c #CACBC5", -"&. c #BFBCB5", -"*. c #C6C4B5", -"=. c #040300", -"-. c #060400", -";. c #070700", -">. c #797C45", -",. c #030700", -"'. c #71764D", -"). c #010400", -"!. c #C9CAAB", -"~. c #070A00", -"{. c #767B52", -"]. c #C6C9BE", -"^. c #C4C5C0", -"/. c #C1C0BE", -"(. c #C7C4BF", -"_. c #DBD8C7", -":. c #0D0A00", -"<. c #7D7D4B", -"[. c #060800", -"}. c #7B7D3C", -"|. c #797C4F", -"1. c #060900", -"2. c #C2C3A1", -"3. c #050900", -"4. c #727848", -"5. c #C3C3C1", -"6. c #D6D4D5", -"7. c #C6C3BE", -"8. c #B5B29F", -"9. c #0B0900", -"0. c #76773D", -"a. c #080C00", -"b. c #82863C", -"c. c #7B7E4F", -"d. c #C0C4A1", -"e. c #767D47", -"f. c #777D4F", -"g. c #010500", -"h. c #060300", -"i. c #090500", -"j. c #7C7C46", -"k. c #7C7F38", -"l. c #060A00", -"m. c #6F752B", -"n. c #0E1100", -"o. c #777856", -"p. c #C1C7A5", -"q. c #040A00", -"r. c #757B3B", -"s. c #7E832F", -"t. c #7C7F30", -"u. c #686731", -"v. c #88865D", -"w. c #76724C", -"x. c #727240", -"y. c #888C40", -"z. c #767E29", -"A. c #040C00", -"B. c #7E8444", -"C. c #000002", -"D. c #C5CAAA", -"E. c #000700", -"F. c #777D3D", -"G. c #7D8228", -"H. c #080B00", -"I. c #201E00", -"J. c #070400", -"K. c #0B0800", -"L. c #0C0C00", -"M. c #77802F", -"N. c #030B00", -"O. c #717844", -"P. c #B8B7BD", -"Q. c #C2C1CF", -"R. c #B3B79C", -"S. c #020900", -"T. c #7C834D", -"U. c #787A39", -"V. c #0B0B00", -"W. c #070300", -"X. c #060100", -"Y. c #CDCCAD", -"Z. c #767B41", -"`. c #090D00", -" + c #C1BFCD", -".+ c #BBB9CE", -"++ c #BFC3AC", -"@+ c #737850", -"#+ c #7B7C52", -"$+ c #060000", -"%+ c #080300", -"&+ c #0A0501", -"*+ c #C4C2B5", -"=+ c #767A55", -"-+ c #C6C8B3", -";+ c #B7B7B9", -">+ c #C6C3D4", -",+ c #BEBCD2", -"'+ c #C3C6B5", -")+ c #B7BBA2", -"!+ c #0A0800", -"~+ c #040003", -"{+ c #030005", -"]+ c #040006", -"^+ c #060700", -"/+ c #C8C5D6", -"(+ c #B7B4C7", -". + . @ # $ % & * = - ; > , ' ) ", -"! ~ ~ { ] ^ / ( _ : < [ ( } | / ", -"> 1 2 3 4 5 6 7 8 9 0 a b c d e ", -"f g h i / j / k ( l m n o p 5 q ", -"r s t i u / v w x y z o A B C D ", -"E F c / / / G 7 H n I J K L M N ", -"O P Q R S T U V W X Y Z ` ...p ", -"+.j @.#.$.%.%.&.*.=.-.;.>.,.'.).", -"!.~.{.N ].^./.(._.:.<.[.}. .|.1.", -"2.3.4.,.$.5.6.7.8.9.0.a.b.D c.).", -"d.D e.f.g.c o h.i.j.k.l.m.n.o.#.", -"p.q.r.s.t.u.v.w.x.y.z.A.B.)./ C.", -"D.E.F.G.H.I.J.K.L.q.M.N.O.1.P.Q.", -"R.S.T.U.V.W.X.X.Y.^ Z.D `.i +.+", -"++q.@+#+h.$+%+&+*+K =+g.-+;+>+,+", -"'+)+).F !+~+{+]+( ^+c ^+U ; /+(+"}; diff --git a/images/bitbtn.xpm b/images/tbitbtn.xpm similarity index 100% rename from images/bitbtn.xpm rename to images/tbitbtn.xpm diff --git a/images/button.xpm b/images/tbutton.xpm similarity index 100% rename from images/button.xpm rename to images/tbutton.xpm diff --git a/images/checkbox.xpm b/images/tcheckbox.xpm similarity index 100% rename from images/checkbox.xpm rename to images/tcheckbox.xpm diff --git a/images/combobox.xpm b/images/tcombobox.xpm similarity index 100% rename from images/combobox.xpm rename to images/tcombobox.xpm diff --git a/images/editbox.xpm b/images/tedit.xpm similarity index 100% rename from images/editbox.xpm rename to images/tedit.xpm diff --git a/images/label.xpm b/images/tlabel.xpm similarity index 100% rename from images/label.xpm rename to images/tlabel.xpm diff --git a/images/listbox.xpm b/images/tlistbox.xpm similarity index 100% rename from images/listbox.xpm rename to images/tlistbox.xpm diff --git a/images/memo.xpm b/images/tmemo.xpm similarity index 100% rename from images/memo.xpm rename to images/tmemo.xpm diff --git a/images/menu.xpm b/images/tmenu.xpm similarity index 100% rename from images/menu.xpm rename to images/tmenu.xpm diff --git a/images/tnotebook.xpm b/images/tnotebook.xpm new file mode 100644 index 0000000000..6954ffb019 --- /dev/null +++ b/images/tnotebook.xpm @@ -0,0 +1,57 @@ +/* XPM */ +static char * notebook_xpm[] = { +"25 25 29 1", +" c None", +". c #FFFFFF", +"+ c #080808", +"@ c #000000", +"# c #C1C1C1", +"$ c #F8F8F8", +"% c #F0F0F0", +"& c #FCFCFC", +"* c #030303", +"= c #C5C5C5", +"- c #808080", +"; c #F4F4F4", +"> c #C4C4C4", +", c #C0C0C0", +"' c #FEFEFE", +") c #7C7C7C", +"! c #8B8B8B", +"~ c #767676", +"{ c #828282", +"] c #878787", +"^ c #7A7A7A", +"/ c #7F7F7F", +"( c #888888", +"_ c #7D7D7D", +": c #898989", +"< c #020202", +"[ c #050505", +"} c #010101", +"| c #C3C3C3", +" ", +" ", +" ", +" ", +" ", +" ....+@@@@@@@@ ", +" .###+###@###@ ", +" .###+###@###@ ", +" $.###%..........&.* ", +" .###=############-@ ", +" ;#############>##-@ ", +" .################-@ ", +" $################-@ ", +" $#####,##########-@ ", +" .################-@ ", +" ;################-@ ", +" .################-@ ", +" ')!~{]^////////(_:@ ", +" @<@[@}@@@@@@@@@@<@| ", +" ", +" ", +" ", +" ", +" ", +" "}; diff --git a/images/toggleform.xpm b/images/toggleform.xpm deleted file mode 100644 index 5fec5fcbbf..0000000000 --- a/images/toggleform.xpm +++ /dev/null @@ -1,210 +0,0 @@ -/* XPM */ -static char * toggleform_xpm[] = { -"16 16 191 2", -" c None", -". c #777A71", -"+ c #000013", -"@ c #C3C5D4", -"# c #B7BAC3", -"$ c #000104", -"% c #C1C5C4", -"& c #BABFBB", -"* c #870013", -"= c #000015", -"- c #C0C3D2", -"; c #00040A", -"> c #000606", -", c #000300", -"' c #B9BEB8", -") c #000012", -"! c #0C0C24", -"~ c #000017", -"{ c #04041E", -"] c #0D0F1E", -"^ c #00000B", -"/ c #BEC2C5", -"( c #B4B8B7", -"_ c #C0C6BA", -": c #000500", -"< c #8F9094", -"[ c #F9FDFF", -"} c #FCFFFF", -"| c #F1F4F9", -"1 c #F4F7FF", -"2 c #F9FCFF", -"3 c #F7FAFF", -"4 c #F8FBFF", -"5 c #000102", -"6 c #BBC0BC", -"7 c #CDD2CB", -"8 c #B8BEB2", -"9 c #BEC4B6", -"0 c #000200", -"a c #FEFFF6", -"b c #C6C9C0", -"c c #C6C9C2", -"d c #C7CAC3", -"e c #BEC0BB", -"f c #888A85", -"g c #878984", -"h c #80827D", -"i c #8F918C", -"j c #8C8E89", -"k c #868982", -"l c #797C73", -"m c #C0C3BA", -"n c #BBBEB3", -"o c #C1C4BB", -"p c #84867B", -"q c #FEFFF4", -"r c #BCC0B2", -"s c #C7CABF", -"t c #CBCEC3", -"u c #BDC0B5", -"v c #82857C", -"w c #FEFFF8", -"x c #FDFFF9", -"y c #F9FCF5", -"z c #FEFFFB", -"A c #848681", -"B c #000100", -"C c #C4C6C3", -"D c #BCBEBB", -"E c #80817C", -"F c #FCFDF7", -"G c #CECFC9", -"H c #CACBC5", -"I c #B9BAB4", -"J c #CBCCC6", -"K c #8D8E88", -"L c #F6F7F2", -"M c #FFFFFD", -"N c #FAFAFA", -"O c #F5F5F7", -"P c #8D8C91", -"Q c #FBFAFF", -"R c #000007", -"S c #C7C6CC", -"T c #86858A", -"U c #FFFFFF", -"V c #C4C4C6", -"W c #C7C7C7", -"X c #CBCBCB", -"Y c #C3C3C1", -"Z c #81817F", -"` c #FEFEFE", -" . c #F6F6F8", -".. c #FFFEFF", -"+. c #000009", -"@. c #04020F", -"#. c #00000C", -"$. c #827F8A", -"%. c #FFFDFF", -"&. c #C5C2CD", -"*. c #C3C0C9", -"=. c #CBC8CF", -"-. c #CCCACF", -";. c #858386", -">. c #FEFCFF", -",. c #FDFBFE", -"'. c #FCF9FF", -"). c #FFFCFF", -"!. c #C8C4D3", -"~. c #01000B", -"{. c #898593", -"]. c #090513", -"^. c #05010F", -"/. c #010009", -"(. c #010007", -"_. c #010005", -":. c #807E83", -"<. c #FDFBFF", -"[. c #FDFAFF", -"}. c #BEBBC6", -"|. c #08050E", -"1. c #C4C3CB", -"2. c #AFAEB6", -"3. c #06050D", -"4. c #C8C7CD", -"5. c #BCBBC0", -"6. c #CACACC", -"7. c #828282", -"8. c #FDFDFB", -"9. c #FEFEFC", -"0. c #FCFCFC", -"a. c #C6C6C8", -"b. c #000002", -"c. c #C1C0C5", -"d. c #0D0C11", -"e. c #B5B5B5", -"f. c #8D8D8B", -"g. c #F8F8F6", -"h. c #FCFDF8", -"i. c #FFFFFB", -"j. c #FEFFFA", -"k. c #FBFCF7", -"l. c #C7C8C3", -"m. c #010100", -"n. c #B4B4B2", -"o. c #C7C7C5", -"p. c #040500", -"q. c #B9BAB5", -"r. c #C0C0BE", -"s. c #C6C6C4", -"t. c #80807E", -"u. c #F9FAF5", -"v. c #FAFBF6", -"w. c #FFFFFA", -"x. c #FBFCF6", -"y. c #BABBB5", -"z. c #090A05", -"A. c #C3C4BE", -"B. c #BFC0BA", -"C. c #010200", -"D. c #C2C3BD", -"E. c #B7B8B3", -"F. c #C4C4C2", -"G. c #808080", -"H. c #FDFDFD", -"I. c #D0D1CC", -"J. c #BCBFB6", -"K. c #BDC0B7", -"L. c #C1C4BD", -"M. c #C9CBC8", -"N. c #B6B7B9", -"O. c #898A8E", -"P. c #C8C9CE", -"Q. c #BDBEC3", -"R. c #C6C7CC", -"S. c #CBCCD0", -"T. c #BABBBF", -"U. c #CECFD1", -"V. c #BBBDBC", -"W. c #0C0E0D", -"X. c #BDC0B9", -"Y. c #BCBFB8", -"Z. c #C0C2BD", -"`. c #BDBFBE", -" + c #C2C3C5", -".+ c #86878B", -"++ c #000005", -"@+ c #0D0D15", -"#+ c #0B0C10", -"$+ c #000004", -"%+ c #07080A", -". . . . . . . . . . + @ # $ % & ", -". * * * * * * * * * = - ; > , ' ", -". ) = ! ~ ~ { ~ + ] ^ / ( , _ : ", -"< [ } | } } 1 2 3 4 5 6 7 8 9 0 ", -". a b c d e f g h i j k l m n o ", -"p q r s t u v w x y y z A B C D ", -"E F G H I J K L M M N O P Q R S ", -"T U V W X Y Z M ` .....+.@.#.+.", -"$.%.&.*.=.-.;.>.,.%.%.%.'.).!.~.", -"{.].^./.(._.:.......<.%.%.[.}.|.", -"1.2.3.4.5.6.7.U M 8.9.U 0.U a.b.", -"c.d.b.b.W e.f.g.h.i.i.j.k.i.l.m.", -"n.o.p.q.r.s.t.M u.i.j.v.w.x.y.z.", -"A.B.C.D.E.F.G.H.U 0.U M g.i.I.B ", -"J.K.L.B M.N.O.P.P.Q.R.S.T.U.V.W.", -"L.X.Y.Z.`. +.+++R @+++++#+$+%+b."}; diff --git a/images/popup.xpm b/images/tpopupmenu.xpm similarity index 100% rename from images/popup.xpm rename to images/tpopupmenu.xpm diff --git a/images/radiobutton.xpm b/images/tradiobutton.xpm similarity index 100% rename from images/radiobutton.xpm rename to images/tradiobutton.xpm diff --git a/images/speedbutton.xpm b/images/tspeedbutton.xpm similarity index 100% rename from images/speedbutton.xpm rename to images/tspeedbutton.xpm diff --git a/images/spinedit.xpm b/images/tspinedit.xpm similarity index 100% rename from images/spinedit.xpm rename to images/tspinedit.xpm diff --git a/images/viewforms.xpm b/images/viewforms.xpm deleted file mode 100644 index 1232a49c69..0000000000 --- a/images/viewforms.xpm +++ /dev/null @@ -1,212 +0,0 @@ -/* XPM */ -static char * viewforms_xpm[] = { -"16 16 193 2", -" c None", -". c #C0BEC1", -"+ c #C0BEC3", -"@ c #C0BDC4", -"# c #C0BDC6", -"$ c #C0BDC8", -"% c #BFBDC8", -"& c #BEBEC8", -"* c #BFBDCA", -"= c #C0BCCA", -"- c #C2BCCA", -"; c #BEBEBE", -"> c #C6C6C8", -", c #BFBEC3", -"' c #BEBCC7", -") c #BEBCCA", -"! c #807D90", -"~ c #85829F", -"{ c #848894", -"] c #000017", -"^ c #C0BCD3", -"/ c #BABDB6", -"( c #C0C2BF", -"_ c #B7B8BA", -": c #C0C0C8", -"< c #BDBDC9", -"[ c #888799", -"} c #870013", -"| c #CC0013", -"1 c #FF0013", -"2 c #000015", -"3 c #BFBED0", -"4 c #C4C7BC", -"5 c #C1C4B9", -"6 c #BDC0B9", -"7 c #CCCECD", -"8 c #B6B7BB", -"9 c #87878F", -"0 c #F9FBFF", -"a c #FAFDFF", -"b c #FBFEFF", -"c c #F2F6FF", -"d c #FBFFFF", -"e c #F5FAFF", -"f c #FCFFFF", -"g c #000102", -"h c #BFC0C2", -"i c #B9BCB5", -"j c #BBBDB8", -"k c #C8CAC9", -"l c #797A7F", -"m c #7F7F89", -"n c #868595", -"o c #828395", -"p c #808490", -"q c #838790", -"r c #787D83", -"s c #000104", -"t c #D1D5D6", -"u c #000300", -"v c #BFC1BE", -"w c #B8B8C0", -"x c #C5C5D1", -"y c #B0AFC1", -"z c #8F8CA7", -"A c #C0BFD1", -"B c #00000B", -"C c #BFBFC7", -"D c #CFCEE0", -"E c #C0BED6", -"F c #C0BDDC", -"G c #827DA5", -"H c #FBF5FF", -"I c #F8F0FF", -"J c #FEF6FF", -"K c #FAF4FF", -"L c #FBF6FF", -"M c #FBF8FF", -"N c #FBF9FF", -"O c #F2F0FF", -"P c #00001F", -"Q c #C2C0D6", -"R c #01000E", -"S c #B8B6CC", -"T c #817E9B", -"U c #000022", -"V c #D0CDEC", -"W c #000013", -"X c #C7C7D3", -"Y c #000106", -"Z c #BEBDCD", -"` c #848297", -" . c #05061A", -".. c #C6C5D3", -"+. c #000005", -"@. c #C5C7C6", -"#. c #000100", -"$. c #BFC2BB", -"%. c #BCBEBB", -"&. c #858786", -"*. c #FAFBFF", -"=. c #FEFEFF", -"-. c #FDFDFF", -";. c #FBFAFF", -">. c #FEFDFF", -",. c #F7F7FF", -"'. c #FEFFFF", -"). c #F8F9FB", -"!. c #000200", -"~. c #C9CCC3", -"{. c #C0C3B2", -"]. c #B9BCB1", -"^. c #82857A", -"/. c #FEFFF8", -"(. c #C1C4BD", -"_. c #CBCDC8", -":. c #C9CBCA", -"<. c #C2C3C5", -"[. c #C8C9CB", -"}. c #BEC0BF", -"|. c #C5C7C4", -"1. c #010500", -"2. c #C9CDBE", -"3. c #C1C5B4", -"4. c #C0C2B4", -"5. c #888B80", -"6. c #C0C3BC", -"7. c #C9CBC6", -"8. c #C7C8CD", -"9. c #C0BECC", -"0. c #CCC9DC", -"a. c #C1BECF", -"b. c #D8D7DF", -"c. c #000004", -"d. c #B9B9B9", -"e. c #C0C0BE", -"f. c #C0C1BC", -"g. c #C4C6C1", -"h. c #797B76", -"i. c #FEFFFB", -"j. c #CBCDCC", -"k. c #C9CACC", -"l. c #B9BABF", -"m. c #CCCCD6", -"n. c #C7C4D7", -"o. c #CECBE0", -"p. c #BFBCCF", -"q. c #00000E", -"r. c #100E19", -"s. c #C0BFC5", -"t. c #C2C1C6", -"u. c #C0C0C2", -"v. c #B8B9BD", -"w. c #898A8F", -"x. c #FAFAFF", -"y. c #C4C4D0", -"z. c #CCCBDB", -"A. c #CCCADF", -"B. c #C4C2CD", -"C. c #C6C5CB", -"D. c #D0CFD5", -"E. c #040309", -"F. c #B8B7BD", -"G. c #BBBABF", -"H. c #C1C0C5", -"I. c #C1C1C3", -"J. c #BABBBF", -"K. c #86878C", -"L. c #FCFCFF", -"M. c #CBCAD8", -"N. c #B2B1C3", -"O. c #D1D0DE", -"P. c #C5C5C7", -"Q. c #BFC0BB", -"R. c #C3C3C1", -"S. c #000000", -"T. c #C7C7C7", -"U. c #C2C2C4", -"V. c #C3C3C5", -"W. c #BEBEC0", -"X. c #BEC1BA", -"Y. c #81847D", -"Z. c #070A03", -"`. c #070904", -" + c #0E0F11", -".+ c #040500", -"++ c #010100", -"@+ c #040400", -"#+ c #040300", -"$+ c #BBBAB8", -"%+ c #C7C5C6", -"&+ c #B9B9BB", -"*+ c #C0BFC4", -". + + @ # # $ % & * * = = - - = ", -"; > , ' ) ! ~ { { { { { { { ] ^ ", -"/ ( _ : < [ } } | | 1 1 1 1 2 3 ", -"4 5 6 7 8 9 0 a b c d d e f g h ", -"i j k l m n o { { p q r s t u v ", -"w x y z } } | | 1 1 1 1 ] A B C ", -"D E F G H I J K L M N O P Q R C ", -"S T { { { { { { { { U V W X Y h ", -"Z ` } } | | 1 1 1 1 ...+.@.#.$.", -"%.&.*.=.-.;.>.,.'.).!.~.u u u {.", -"].^./.(._.:.<.[.}.|.u ].1.2.3.4.", -"~.5./.6.7.@.8.9.0.a.B b.c.d.e.f.", -"g.h.i.j.k.l.m.n.o.p.q.B r.s.t.u.", -"v.w.x.y.z.A.3 B.C.D.E.F.G.H.I.u.", -"J.K.L.& M.N.O.P.Q.R.S.T.U.V.W.u.", -"X.Y.Z.`.#. +#..+++@+#+$+%+&+I.*+"}; diff --git a/images/viewunits.xpm b/images/viewunits.xpm deleted file mode 100644 index 224e9bd164..0000000000 --- a/images/viewunits.xpm +++ /dev/null @@ -1,20 +0,0 @@ -/* XPM */ -static char * viewunits_xpm[] = { -"14 14 3 1", -" c None", -". c #000000", -"+ c #FFFFFF", -" .... ", -" .++++.. ", -" .+++++. ", -" ....+++. ", -" .++++..+. ", -" .+++++.+. ", -" ....+++.+. ", -" .++++..+... ", -" .+++++.+. ", -" .+++++.+. ", -" .+++++... ", -" .+++++. ", -" .+++++. ", -" ....... "}; diff --git a/lcl/controls.pp b/lcl/controls.pp index 7b02d6e3d2..31f9a569bf 100644 --- a/lcl/controls.pp +++ b/lcl/controls.pp @@ -373,8 +373,6 @@ TCMDialogKey = TLMKEY; FLastheight : Integer; FLastWidth : Integer; FLeft: Integer; -// FOwner : TComponent; -// FName: TComponentName; FOnActivate : TNotifyEvent; FOnResize: TNotifyEvent; FOnClick: TNotifyEvent; @@ -462,6 +460,7 @@ TCMDialogKey = TLMKEY; procedure SetHint(const Value: String); virtual; procedure SetName(const Value: TComponentName); override; procedure SetParent(AParent : TWinControl); virtual; + Procedure SetParentComponent(Value : TComponent); override; procedure SetCallback(Msg : LongInt); Procedure SetZOrder(Topmost: Boolean) ; dynamic; procedure RemoveCallbacks; @@ -707,6 +706,7 @@ TCMDialogKey = TLMKEY; procedure Repaint; override; Procedure SetFocus; virtual; procedure Show; virtual; + Function FindChildControl(ControlName : String) : TControl; function HandleAllocated : Boolean; procedure HandleNeeded; property Brush: TBrush read FBrush; @@ -1125,6 +1125,11 @@ end. { ============================================================================= $Log$ + Revision 1.9 2000/12/29 13:14:05 lazarus + Using the lresources.pp and registering components. + This is a major change but will create much more flexibility for the IDE. + Shane + Revision 1.8 2000/12/22 19:55:37 lazarus Added the Popupmenu code to the LCL. Now you can right click on the editor and a PopupMenu appears. diff --git a/lcl/include/control.inc b/lcl/include/control.inc index 6e69c99349..0a063db274 100644 --- a/lcl/include/control.inc +++ b/lcl/include/control.inc @@ -938,6 +938,14 @@ begin end; +{------------------------------------------------------------------------------} +{ TControl SetParentComponent } +{------------------------------------------------------------------------------} +Procedure TControl.SetParentComponent(Value : TComponent); +Begin +if (Value is TWinControl) then Setparent(TWinControl(Value)); +end; + {------------------------------------------------------------------------------} { TControl SetParentShowHint } {------------------------------------------------------------------------------} @@ -1275,6 +1283,11 @@ end; { ============================================================================= $Log$ + Revision 1.6 2000/12/29 13:14:05 lazarus + Using the lresources.pp and registering components. + This is a major change but will create much more flexibility for the IDE. + Shane + Revision 1.5 2000/12/22 19:55:37 lazarus Added the Popupmenu code to the LCL. Now you can right click on the editor and a PopupMenu appears. diff --git a/lcl/include/wincontrol.inc b/lcl/include/wincontrol.inc index 0684d3e68a..638dafa4fe 100644 --- a/lcl/include/wincontrol.inc +++ b/lcl/include/wincontrol.inc @@ -409,6 +409,23 @@ Begin Result := True; end; +{------------------------------------------------------------------------------} +{ TWinControl FindChildControl } +{------------------------------------------------------------------------------} +function TWinControl.FindChildControl(ControlName: string): TControl; +var + I: Integer; +begin + Result := nil; + if FWinControls <> nil then + for I := 0 to FWinControls.Count - 1 do + if CompareText(TWinControl(FWinControls[I]).Name, ControlName) = 0 then + begin + Result := TControl(FWinControls[I]); + Exit; + end; +end; + {------------------------------------------------------------------------------} { TWinControl IsControlMouseMsg } {------------------------------------------------------------------------------} @@ -1875,6 +1892,11 @@ end; { ============================================================================= $Log$ + Revision 1.5 2000/12/29 13:14:05 lazarus + Using the lresources.pp and registering components. + This is a major change but will create much more flexibility for the IDE. + Shane + Revision 1.4 2000/12/20 17:35:58 lazarus Added GetChildren Shane