OSDN Git Service

Ring 1.10 以来となる開発環境の日本語ローカライズ版 (評価版) を追加 (ノートパッド、フォームデザイナー、対話型実行環境、ファイルの検索)。
[ring-lang-081/ring.git] / applications / formdesigner / source / windowobjects / windowobjectsview.ring
1 /*
2 **      Project : Form Designer 
3 **      File Purpose :  Window Objects - View Class
4 **      Date : 2017.04.27
5 **      Author :  Mahmoud Fayed <msfclipper@yahoo.com>
6 */
7
8 package formdesigner
9
10 class windowObjectsView from WindowsViewParent
11         win = new qWidget() {
12                 move(64,40)
13                 resize(395,376)
14                 setWindowTitle(T_FROMDESIGNER_WO_WINDOWOBJECTS) # "Window Objects"
15                 setLayoutDirection(T_LAYOUTDIRECTION)
16                 LabelObjects = new qlabel(win) {
17                         move(10,13)
18                         resize(41,26)
19                         oFont = new qfont("arial",10,0,0)
20                         setfont(oFont)
21                         setText(T_FROMDESIGNER_WO_OBJECTS) # "Objects"
22                         setAlignment(Qt_AlignRight |  Qt_AlignVCenter)
23                 }
24                 ListObjects = new qlistwidget(win) {
25                         move(56,13)
26                         resize(321,290)
27                         oFont = new qfont("arial",10,0,0)
28                         setfont(oFont)
29                 }
30                 BtnOk = new qpushbutton(win) {
31                         move(236,315)
32                         resize(68,25)
33                         oFont = new qfont("arial",10,0,0)
34                         setfont(oFont)
35                         setText(T_FROMDESIGNER_WO_OK) # "Ok"
36                         setClickEvent(Method(:okAction))
37
38                 }
39                 BtnCancel = new qpushbutton(win) {
40                         move(309,315)
41                         resize(68,25)
42                         oFont = new qfont("arial",10,0,0)
43                         setfont(oFont)
44                         setText(T_FROMDESIGNER_WO_CANCEL) # "Cancel"
45                         setClickEvent(Method(:CancelAction))
46                 }
47                 Layout1 = new QHBoxLayout() {
48                         AddWidget(LabelObjects)
49                         AddWidget(ListObjects)
50                 }
51                 Layout2 = new QHBoxLayout() {
52                         AddWidget(BtnOk)
53                         AddWidget(BtnCancel)
54                 }
55                 Layout3 = new QVBoxLayout() {
56                         AddLayout(Layout1)
57                         AddLayout(Layout2)
58                 }
59                 setLayout(Layout3) 
60         }