1 /***********************************************************************
2 *
3 *               *****   ***    ***
4 *                  *   *   *  *   *
5 *                 *     ***    ***
6 *                *     *   *  *   *
7 *               *****   ***    ***
8 *
9 * A FREE Finite Elements Analysis Program in ANSI C for the Windows OS.
10 *
11 * Composed and edited and copyright by
12 * Professor Dr.-Ing. Frank Rieg, University of Bayreuth, Germany
13 *
14 * eMail:
15 * frank.rieg@uni-bayreuth.de
16 * dr.frank.rieg@t-online.de
17 *
18 * V15.0  November 18, 2015
19 *
20 * This program is free software; you can redistribute it and/or modify
21 * it under the terms of the GNU General Public License as published by
22 * the Free Software Foundation; either version 2, or (at your option)
23 * any later version.
24 *
25 * This program is distributed in the hope that it will be useful,
26 * but WITHOUT ANY WARRANTY; without even the implied warranty of
27 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
28 * GNU General Public License for more details.
29 *
30 * You should have received a copy of the GNU General Public License
31 * along with this program; see the file COPYING.  If not, write to
32 * the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
33 ***********************************************************************/
34 /***********************************************************************
35 * TOB88O.C
36 * 17.7.2011 Rieg
37 ***********************************************************************/
38 #include <windows.h>
39 #include <commctrl.h>
40 
41 #include <z88o.h>
42 
43 #ifdef FR_XWIN32
44 TBBUTTON tbb[] =
45      {
46      0, ITC_RUN,           TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,
47      1, ITC_FILE,          TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,
48      2, ITC_YESSCALE,      TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,
49      3, ITC_MAUS,          TBSTATE_ENABLED, TBSTYLE_CHECK,      0, 0, 0, 0,
50      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,
51      4, ITC_UNVERFORMT,    TBSTATE_ENABLED | TBSTATE_CHECKED,
52                                             TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
53      5, ITC_VERFORMT,      TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
54      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,
55      6, ITC_LIGHT,         TBSTATE_ENABLED | TBSTATE_CHECKED,
56                                             TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
57      7, ITC_HIDDEN,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
58      8, ITC_WIREFR,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
59      9, ITC_SHOWSPANN,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
60     10, ITC_SHOWGAUSS,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
61     11, ITC_SHOWGAUPU,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
62     12, ITC_SHOWVX,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
63     13, ITC_SHOWVY,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
64     14, ITC_SHOWVZ,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,
65      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,
66     15, ITC_RBD,           TBSTATE_ENABLED, TBSTYLE_CHECK,      0, 0, 0, 0,
67      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,
68     16, ITC_HELP,          TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,
69     17, ITC_XIT,           TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0
70      } ;
71 #endif
72 
73 #ifdef FR_XWIN64
74 TBBUTTON tbb[] =
75      {
76      0, ITC_RUN,           TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,0,0,0,0,
77      1, ITC_FILE,          TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,0,0,0,0,
78      2, ITC_YESSCALE,      TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,0,0,0,0,
79      3, ITC_MAUS,          TBSTATE_ENABLED, TBSTYLE_CHECK,      0, 0, 0, 0,0,0,0,0,
80      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,0,0,0,0,
81      4, ITC_UNVERFORMT,    TBSTATE_ENABLED | TBSTATE_CHECKED,
82                                             TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
83      5, ITC_VERFORMT,      TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
84      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,0,0,0,0,
85      6, ITC_LIGHT,         TBSTATE_ENABLED | TBSTATE_CHECKED,
86                                             TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
87      7, ITC_HIDDEN,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
88      8, ITC_WIREFR,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
89      9, ITC_SHOWSPANN,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
90     10, ITC_SHOWGAUSS,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
91     11, ITC_SHOWGAUPU,     TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
92     12, ITC_SHOWVX,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
93     13, ITC_SHOWVY,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
94     14, ITC_SHOWVZ,        TBSTATE_ENABLED, TBSTYLE_CHECKGROUP, 0, 0, 0, 0,0,0,0,0,
95      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,0,0,0,0,
96     15, ITC_RBD,           TBSTATE_ENABLED, TBSTYLE_CHECK,      0, 0, 0, 0,0,0,0,0,
97      0, 0,                 TBSTATE_ENABLED, TBSTYLE_SEP,        0, 0, 0, 0,0,0,0,0,
98     16, ITC_HELP,          TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,0,0,0,0,
99     17, ITC_XIT,           TBSTATE_ENABLED, TBSTYLE_BUTTON,     0, 0, 0, 0,0,0,0,0
100      } ;
101 #endif
102 
103 /*----------------------------------------------------------------------
104 * Function InitToolBar
105 *---------------------------------------------------------------------*/
InitToolBar(HWND hParent)106 HWND InitToolBar (HWND hParent)
107 {
108 extern HINSTANCE hInstance;
109 HWND    hToolBar;
110 HBITMAP hBitmap;
111 
112 hBitmap= LoadBitmap(hInstance,MAKEINTRESOURCE(BMP_Z88O));
113 
114 hToolBar= CreateToolbarEx (
115                hParent,
116                WS_CHILD | WS_VISIBLE       | WS_CLIPSIBLINGS |
117                CCS_TOP  | TBSTYLE_TOOLTIPS | WS_BORDER | WS_EX_CLIENTEDGE,
118                1,                    /* wID */
119                18,                   /* nBitmaps */
120                0,                    /* zu ladende Bitmap */
121                (UINT)hBitmap  ,      /* zu ladende Bitmap */
122                tbb,                  /* Pointer auf TBBUTTON Array */
123                22,                   /* Anzahl Buttons */
124                16,                   /* dxButton */
125                16,                   /* dyButton */
126                16,                   /* dxBitmap */
127                16,                   /* dyBitmap */
128                sizeof (TBBUTTON)) ;
129 
130 
131 return hToolBar ;
132 }
133 
134