The R Project SVN R

Rev

Rev 84952 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 84952 Rev 88464
Line 29... Line 29...
29
 
29
 
30
static void mdimenu(menuitem m)
30
static void mdimenu(menuitem m)
31
{
31
{
32
    switch (getvalue(m)) {
32
    switch (getvalue(m)) {
33
    case 1:
33
    case 1:
34
	SendMessage(hwndClient,WM_MDICASCADE,0,0);
34
	sendmessage(hwndClient,WM_MDICASCADE,0,0);
35
	break;
35
	break;
36
    case 2:
36
    case 2:
37
	SendMessage(hwndClient,WM_MDITILE,MDITILE_HORIZONTAL,0);
37
	sendmessage(hwndClient,WM_MDITILE,MDITILE_HORIZONTAL,0);
38
	break;
38
	break;
39
    case 3:
39
    case 3:
40
	SendMessage(hwndClient,WM_MDITILE,MDITILE_VERTICAL,0);
40
	sendmessage(hwndClient,WM_MDITILE,MDITILE_VERTICAL,0);
41
	break;	
41
	break;	
42
    case 4:
42
    case 4:
43
	SendMessage(hwndClient,WM_MDIICONARRANGE,0,0);
43
	sendmessage(hwndClient,WM_MDIICONARRANGE,0,0);
44
	break;
44
	break;
45
    }
45
    }
46
}
46
}
47
 
47
 
48
menu newmdimenu(void)
48
menu newmdimenu(void)
Line 80... Line 80...
80
    if (!w) return;
80
    if (!w) return;
81
    w->menubar = mb;
81
    w->menubar = mb;
82
    SetMenu(w->handle, mb->handle);
82
    SetMenu(w->handle, mb->handle);
83
    if (ismdi()) {
83
    if (ismdi()) {
84
	menu mdi = (w->menubar)->menubar;
84
	menu mdi = (w->menubar)->menubar;
85
	SendMessage(hwndClient, WM_MDISETMENU,
85
	sendmessage(hwndClient, WM_MDISETMENU,
86
		    (WPARAM)w->menubar->handle,
86
		    (WPARAM)w->menubar->handle,
87
		    (LPARAM)(mdi ? (mdi->handle) : 0));
87
		    (LPARAM)(mdi ? (mdi->handle) : 0));
88
	DrawMenuBar(hwndFrame);
88
	DrawMenuBar(hwndFrame);
89
    } else
89
    } else
90
	DrawMenuBar(w->handle);
90
	DrawMenuBar(w->handle);