-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathmpt_hmg3.fmg
129 lines (120 loc) · 2.71 KB
/
mpt_hmg3.fmg
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
*-----------------------------------------------------------------------------*
* MultiplicationTable | mpt_hmg3.fmg | win_Main | _HMG_3_
*-----------------------------------------------------------------------------*
*-----------------------------------------------------------------------------*
DEFINE WINDOW TEMPLATE ;
AT 0 , 0 ;
WIDTH 1536 ;
HEIGHT 824 ;
VIRTUAL WIDTH Nil ;
VIRTUAL HEIGHT Nil ;
TITLE "" ;
ICON "MAINICON" ;
NOMAXIMIZE ;
NOMINIMIZE ;
NOSIZE ;
NOSYSMENU ;
NOCAPTION ;
CURSOR Nil ;
ON INIT win_Main_OnInit() ;
ON RELEASE Nil ;
ON INTERACTIVECLOSE Nil ;
ON MOUSECLICK win_main_OnMouseClick() ;
ON MOUSEDRAG Nil ;
ON MOUSEMOVE Nil ;
ON SIZE Nil ;
ON MAXIMIZE Nil ;
ON MINIMIZE Nil ;
ON PAINT win_Main_OnPaint() ;
BACKCOLOR { 000 , 085 , 229 } ;
NOTIFYICON Nil ;
NOTIFYTOOLTIP Nil ;
ON NOTIFYCLICK Nil ;
ON GOTFOCUS win_main_OnGotFocus() ;
ON LOSTFOCUS win_main_OnLostFocus() ;
ON SCROLLUP Nil ;
ON SCROLLDOWN Nil ;
ON SCROLLLEFT Nil ;
ON SCROLLRIGHT Nil ;
ON HSCROLLBOX Nil ;
ON VSCROLLBOX Nil
/* See: Show_TitleBar() */
DEFINE BUTTON btn_About
ROW 2
COL 1365 + 35 + 35
WIDTH 32
HEIGHT 32
ACTION win_Main_btn_About_Action()
CAPTION Nil
FONTNAME fARIAL
FONTSIZE 10
TOOLTIP ""
FONTBOLD .F.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE "APP_INFO_20"
PICTALIGNMENT TOP
END BUTTON
DEFINE BUTTON btn_MinPR
ROW 2
COL 1435 + 35
WIDTH 32
HEIGHT 32
ACTION win_Main_btn_MinPR()
CAPTION Nil
FONTNAME fARIAL
FONTSIZE 10
TOOLTIP ""
FONTBOLD .F.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE "APP_MINI_20"
PICTALIGNMENT TOP
END BUTTON
DEFINE BUTTON btn_ExitPR
ROW 2
COL 1505
WIDTH 32
HEIGHT 32
ACTION win_Main_btn_ExitPR()
CAPTION Nil
FONTNAME fARIAL
FONTSIZE 10
TOOLTIP ""
FONTBOLD .F.
FONTITALIC .F.
FONTUNDERLINE .F.
FONTSTRIKEOUT .F.
ONGOTFOCUS Nil
ONLOSTFOCUS Nil
HELPID Nil
FLAT .F.
TABSTOP .T.
VISIBLE .T.
TRANSPARENT .F.
MULTILINE .F.
PICTURE "APP_EXIT_20"
PICTALIGNMENT TOP
END BUTTON
END WINDOW
*-----------------------------------------------------------------------------*
*-----------------------------------------------------------------------------*
*-----------------------------------------------------------------------------*