blob: 28f71dd10983824d04790b7b645e51d91a9c642f (
plain)
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
|
/* Copyright (c) 2006 Alexander Smishlajev. All rights reserved. */
/* The PerlUi class is licensed under the same terms as Perl itself. */
/* The S90 definitions. */
NAME PERL
#include <eikon.rh>
#include <eikon.rsg>
#include "PerlUi.hrh"
#include "PerlApp.hrh"
RESOURCE RSS_SIGNATURE
{
}
RESOURCE TBUF r_default_document_name
{
buf = "";
}
RESOURCE EIK_APP_INFO
{
menubar = r_perlui_menubar;
cba = r_perlui_cba;
}
RESOURCE CBA r_perlui_cba
{
buttons = {
CBA_BUTTON { id = EPerlAppCommandRunFile; txt = "Run"; },
CBA_BUTTON { id = EPerlAppCommandOneLiner; txt = "Oneliner"; },
CBA_BUTTON { id = EPerlAppCommandAboutCopyright; txt = "About"; },
CBA_BUTTON { id = EEikCmdExit; txt = "Exit"; }
};
}
RESOURCE MENU_BAR r_perlui_menubar
{
titles = {
MENU_TITLE
{
menu_pane = r_perlui_menu; txt = "Options";
}
};
}
RESOURCE MENU_PANE r_perlui_menu
{
items = {
MENU_ITEM {
command = EPerlAppCommandAbout;
txt = "About";
},
MENU_ITEM {
command = EPerlAppCommandTime;
txt = "Time";
},
MENU_ITEM {
command = EPerlAppCommandRunFile;
txt = "Run";
},
MENU_ITEM {
command = EPerlAppCommandOneLiner;
txt = "Oneliner";
},
MENU_ITEM {
command = EPerlAppCommandCopyright;
txt = "Copyright";
}
};
}
RESOURCE DIALOG r_perlui_oneliner_dialog
{
title = "Title";
buttons = R_EIK_BUTTONS_CANCEL_OK;
flags = EEikDialogFlagWait;
items = {
DLG_LINE {
type = EEikCtEdwin;
prompt = "Prompt";
id = EPerlUiTextQueryInputField;
control = EDWIN {
width = 10;
maxlength = 128;
};
}
};
}
|
