source: extensions/pLoader/trunk/res/photo_properties_with_categories_tags_wdr.pl @ 4785

Revision 4785, 6.8 KB checked in by ronosman, 10 years ago (diff)

Feature 1414. fix wrong resource file added in rev 4784.

Line 
1#-----------------------------------------------------------------------------
2# Perl source generated by wxDesigner from file: photo_properties_with_categories_tags.wdr
3# Do not modify this file, all changes will be lost!
4#-----------------------------------------------------------------------------
5
6use Wx;
7use Wx::Calendar;
8use Wx::DateTime;
9use Wx::Grid;
10use strict;
11
12# Custom source
13use Uploader::GUI::wxChoiceFilteredPanel;
14
15use Wx qw( wxDefaultSize wxDefaultPosition wxNullAnimation wxNullFont wxBLACK );
16use Wx qw( wxID_OK wxID_APPLY wxID_SAVE wxID_SAVEAS wxID_CANCEL wxID_YES wxID_NO wxID_EXIT wxID_ABOUT wxID_HELP );
17use Wx qw( wxVERTICAL wxHORIZONTAL wxALL wxLEFT wxRIGHT wxTOP wxBOTTOM wxCENTRE wxGROW );
18use Wx qw( wxALIGN_RIGHT wxALIGN_BOTTOM wxALIGN_CENTER wxALIGN_CENTER_VERTICAL wxALIGN_CENTER_HORIZONTAL );
19use Wx qw( wxTR_HAS_BUTTONS wxTR_LINES_AT_ROOT wxSUNKEN_BORDER wxLI_HORIZONTAL wxTE_MULTILINE );
20use Wx qw( wxDP_DROPDOWN );
21
22# Bitmap functions
23
24use Wx qw( wxNullBitmap wxBITMAP_TYPE_PNG );
25
26# Window functions
27
28use vars qw($PHOTO_PROPERTIES_NB); $PHOTO_PROPERTIES_NB = 10000;
29use vars qw($PHOTO_PROPERTIES_CATEGORIES); $PHOTO_PROPERTIES_CATEGORIES = 10001;
30use vars qw($ID_LINE); $ID_LINE = 10002;
31use vars qw($PHOTO_PROPERTIES_UPLOAD); $PHOTO_PROPERTIES_UPLOAD = 10003;
32
33sub PhotoPropertiesCategoriesTags {
34    my( $parent ) = $_[0];
35    my( $item0 ) = Wx::BoxSizer->new( wxVERTICAL );
36   
37    my( $item2 ) = Wx::Notebook->new( $parent, $main::PHOTO_PROPERTIES_NB, wxDefaultPosition, [400,160], 0 );
38    my( $item1 ) = $item2;
39    if( Wx->VERSION < 0.21 ) {
40        $item1 = Wx::NotebookSizer->new( $item2 );
41    }
42   
43    $item0->Add( $item1, 2, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 );
44
45    my( $item3 ) = Wx::TreeCtrl->new( $parent, $main::PHOTO_PROPERTIES_CATEGORIES, wxDefaultPosition, [120,160], wxTR_HAS_BUTTONS|wxTR_LINES_AT_ROOT|wxSUNKEN_BORDER );
46    $item0->AddWindow( $item3, 1, wxGROW|wxALL, 5 );
47
48    my( $item4 ) = Wx::StaticLine->new( $parent, $main::ID_LINE, wxDefaultPosition, [20,-1], wxLI_HORIZONTAL );
49    $item0->AddWindow( $item4, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 );
50
51    my( $item5 ) = Wx::Button->new( $parent, $main::PHOTO_PROPERTIES_UPLOAD, "", wxDefaultPosition, [-1,40], 0 );
52    $item0->AddWindow( $item5, 0, wxGROW|wxALIGN_CENTER_VERTICAL|wxALL, 5 );
53
54    my( $set_size ) = @_ >= 3 ? $_[2] : 1;
55    my( $call_fit ) = @_ >= 2 ? $_[1] : 1;
56    if( $set_size == 1 ) {
57         $_[0]->SetSizer( $item0 );
58         
59         if( $call_fit == 1 ) {
60             $item0->SetSizeHints( $_[0] );
61         }
62    }
63   
64    $item0;
65}
66
67use vars qw($TAGS); $TAGS = 10004;
68use vars qw($PHOTO_PROPERTIES_TAG); $PHOTO_PROPERTIES_TAG = 10005;
69
70sub photo_properties_tags {
71    my( $parent ) = $_[0];
72    my( $item0 ) = Wx::BoxSizer->new( wxVERTICAL );
73   
74    my( $item1 ) = Wx::StaticText->new( $parent, $main::TAGS, "text", wxDefaultPosition, wxDefaultSize, 0 );
75    $item0->AddWindow( $item1, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
76
77    my $tags = $_[1];
78$tags->{parentwnd}=$parent;
79my( $item2 ) = Uploader::GUI::wxChoiceFilteredPanel->new($tags);
80    $item0->AddWindow( $item2, 0, wxALIGN_CENTER_VERTICAL, 5 );
81
82    my( $set_size ) = @_ >= 3 ? $_[2] : 1;
83    my( $call_fit ) = @_ >= 2 ? $_[1] : 1;
84    if( $set_size == 1 ) {
85         $_[0]->SetSizer( $item0 );
86         
87         if( $call_fit == 1 ) {
88             $item0->SetSizeHints( $_[0] );
89         }
90    }
91   
92    $item0;
93}
94
95use vars qw($CAPTION); $CAPTION = 10006;
96use vars qw($PHOTO_PROPERTIES_CAPTION); $PHOTO_PROPERTIES_CAPTION = 10007;
97use vars qw($AUTHOR); $AUTHOR = 10008;
98use vars qw($PHOTO_PROPERTIES_AUTHOR); $PHOTO_PROPERTIES_AUTHOR = 10009;
99use vars qw($COMMENT); $COMMENT = 10010;
100use vars qw($PHOTO_PROPERTIES_COMMENT); $PHOTO_PROPERTIES_COMMENT = 10011;
101use vars qw($CREATE_DATE); $CREATE_DATE = 10012;
102use vars qw($PHOTO_PROPERTIES_CREATE_DATE); $PHOTO_PROPERTIES_CREATE_DATE = 10013;
103use vars qw($PRIVACY_LEVEL); $PRIVACY_LEVEL = 10014;
104use vars qw($PHOTO_PROPERTIES_PRIVACY_LEVEL); $PHOTO_PROPERTIES_PRIVACY_LEVEL = 10015;
105
106sub photo_properties_caption_comments {
107    my( $parent ) = $_[0];
108    my( $item0 ) = Wx::BoxSizer->new( wxVERTICAL );
109   
110    my( $item1 ) = Wx::BoxSizer->new( wxVERTICAL );
111   
112    my( $item2 ) = Wx::StaticText->new( $parent, $main::CAPTION, "text", wxDefaultPosition, wxDefaultSize, 0 );
113    $item1->AddWindow( $item2, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
114
115    my( $item3 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_CAPTION, "", wxDefaultPosition, [300,-1], 0 );
116    $item1->AddWindow( $item3, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
117
118    $item0->Add( $item1, 0, 0, 5 );
119
120    my( $item4 ) = Wx::BoxSizer->new( wxVERTICAL );
121   
122    my( $item5 ) = Wx::StaticText->new( $parent, $main::AUTHOR, "text", wxDefaultPosition, wxDefaultSize, 0 );
123    $item4->AddWindow( $item5, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
124
125    my( $item6 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_AUTHOR, "", wxDefaultPosition, [300,-1], 0 );
126    $item4->AddWindow( $item6, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
127
128    my( $item7 ) = Wx::StaticText->new( $parent, $main::COMMENT, "text", wxDefaultPosition, wxDefaultSize, 0 );
129    $item4->AddWindow( $item7, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
130
131    my( $item8 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_COMMENT, "", wxDefaultPosition, [300,50], wxTE_MULTILINE );
132    $item4->AddWindow( $item8, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
133
134    my( $item9 ) = Wx::StaticText->new( $parent, $main::CREATE_DATE, "text", wxDefaultPosition, wxDefaultSize, 0 );
135    $item4->AddWindow( $item9, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
136
137    my( $item10 ) = Wx::DatePickerCtrl->new( $parent, $main::PHOTO_PROPERTIES_CREATE_DATE, Wx::DateTime->new(), wxDefaultPosition, [200,-1], wxDP_DROPDOWN );
138    $item4->AddWindow( $item10, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
139
140    $item0->Add( $item4, 1, 0, 0 );
141
142    my( $item11 ) = Wx::BoxSizer->new( wxVERTICAL );
143   
144    my( $item12 ) = Wx::StaticText->new( $parent, $main::PRIVACY_LEVEL, "text", wxDefaultPosition, wxDefaultSize, 0 );
145    $item11->AddWindow( $item12, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
146
147    my( $item13 ) = Wx::Choice->new( $parent, $main::PHOTO_PROPERTIES_PRIVACY_LEVEL, wxDefaultPosition, [300,-1], [], 0 );
148    $item11->AddWindow( $item13, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
149
150    $item0->Add( $item11, 0, 0, 5 );
151
152    my( $set_size ) = @_ >= 3 ? $_[2] : 1;
153    my( $call_fit ) = @_ >= 2 ? $_[1] : 1;
154    if( $set_size == 1 ) {
155         $_[0]->SetSizer( $item0 );
156         
157         if( $call_fit == 1 ) {
158             $item0->SetSizeHints( $_[0] );
159         }
160    }
161   
162    $item0;
163}
164
165# Menu bar functions
166
167
168# Toolbar functions
169
170use Wx qw( wxITEM_NORMAL wxITEM_RADIO wxITEM_CHECK );
171
172
173# End of generated file
Note: See TracBrowser for help on using the repository browser.