From 04b92e26968d03e45993686e86f95016dfb397f1 Mon Sep 17 00:00:00 2001 From: mattias Date: Sun, 18 Aug 2002 08:57:39 +0000 Subject: [PATCH] added tcolorbutton xpm git-svn-id: trunk@3104 - --- .gitattributes | 1 + ide/main.pp | 9 +++-- images/components/tcolorbutton.xpm | 57 ++++++++++++++++++++++++++++++ 3 files changed, 64 insertions(+), 3 deletions(-) create mode 100644 images/components/tcolorbutton.xpm diff --git a/.gitattributes b/.gitattributes index 8346724746..ebcbe7e5bd 100644 --- a/.gitattributes +++ b/.gitattributes @@ -310,6 +310,7 @@ images/components/tcheckbox.xpm -text svneol=native#image/x-xpixmap images/components/tcheckgroup.xpm -text svneol=native#image/x-xpixmap images/components/tchecklistbox.ico -text svneol=unset#image/x-icon images/components/tchecklistbox.xpm -text svneol=native#image/x-xpixmap +images/components/tcolorbutton.xpm -text svneol=native#image/x-xpixmap images/components/tcolordialog.ico -text svneol=unset#image/x-icon images/components/tcolordialog.xpm -text svneol=native#image/x-xpixmap images/components/tcombobox.ico -text svneol=unset#image/x-icon diff --git a/ide/main.pp b/ide/main.pp index dab4b3a526..a2af697d53 100644 --- a/ide/main.pp +++ b/ide/main.pp @@ -1019,8 +1019,8 @@ begin end; - ButtonTop := 1; - ButtonLeft := 1; + ButtonTop := 2; + ButtonLeft := 2; NewUnitSpeedBtn := CreateButton('NewUnitSpeedBtn' , 'btn_newunit' , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuNewUnitClicked, lisHintNewUnit); OpenFileSpeedBtn := CreateButton('OpenFileSpeedBtn' , 'btn_openfile' , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuOpenClicked, lisHintOpen); @@ -1037,7 +1037,7 @@ begin ToggleFormSpeedBtn := CreateButton('ToggleFormSpeedBtn' , 'btn_toggleform', 2, ButtonLeft, ButtonTop, [mfLeft, mfTop], @mnuToggleFormUnitCLicked, lisHintToggleFormUnit); // new row - ButtonLeft := 1; + ButtonLeft := 2; ViewUnitsSpeedBtn := CreateButton('ViewUnitsSpeedBtn' , 'btn_viewunits' , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuViewUnitsClicked, lisHintViewUnits); ViewFormsSpeedBtn := CreateButton('ViewFormsSpeedBtn' , 'btn_viewforms' , 1, ButtonLeft, ButtonTop, [mfLeft], @mnuViewFormsClicked, lisHintViewForms); inc(ButtonLeft,13); @@ -9143,6 +9143,9 @@ end. { ============================================================================= $Log$ + Revision 1.604 2003/06/13 21:21:09 mattias + added tcolorbutton xpm + Revision 1.603 2003/06/09 17:20:43 mattias implemented stop debugging on rebuild diff --git a/images/components/tcolorbutton.xpm b/images/components/tcolorbutton.xpm new file mode 100644 index 0000000000..23b7453025 --- /dev/null +++ b/images/components/tcolorbutton.xpm @@ -0,0 +1,57 @@ +/* XPM */ +static char * tcolorbutton_xpm[] = { +"19 11 43 1", +" c None", +". c #F8F8F8", +"+ c #FFFFFF", +"@ c #EFEFEF", +"# c #F0F0F0", +"$ c #FCFCFC", +"% c #030303", +"& c #C1C1C1", +"* c #BCBCBC", +"= c #BDBDBD", +"- c #C5C5C5", +"; c #BFBFBF", +"> c #BEBEBE", +", c #BBBBBB", +"' c #CCCCCC", +") c #BABABA", +"! c #808080", +"~ c #000000", +"{ c #F4F4F4", +"] c #C8C8C8", +"^ c #C6C6C6", +"/ c #C4C4C4", +"( c #C0C0C0", +"_ c #FF0000", +": c #FFFF00", +"< c #0000FF", +"[ c #B9B9B9", +"} c #848484", +"| c #FEFEFE", +"1 c #7C7C7C", +"2 c #8B8B8B", +"3 c #767676", +"4 c #828282", +"5 c #878787", +"6 c #7A7A7A", +"7 c #7F7F7F", +"8 c #888888", +"9 c #7D7D7D", +"0 c #898989", +"a c #020202", +"b c #050505", +"c c #010101", +"d c #C3C3C3", +".+@++#++++++++++$+%", +"+&*=-&; ;>,';);&;!~", +"{]>^~~~~~~~~~~/&;!~", +"+* (~__~::~<<~[&;!~", +".;-,~__~::~<<~(&;!~", +".;-,~~~~~~~~~~>&;!~", +"+* (~}}~++~~~~(&;!~", +"{]>^~}}~++~~~~/&;!~", +"+&*=~~~~~~~~~~)&;!~", +"|12345677777777890~", +"~a~b~c~~~~~~~~~~a~d"};