Ignore:
Timestamp:
Dec 12, 2009, 10:20:29 PM (14 years ago)
Author:
ronosman
Message:

Feature 1320 added : add privacy level in photo properties.

File:
1 edited

Legend:

Unmodified
Added
Removed

  • extensions/pLoader/trunk/res/photo_properties_wdr.pl

    r4475 r4476  
    2727use vars qw($CAPTION); $CAPTION = 10000;
    2828use vars qw($PHOTO_PROPERTIES_CAPTION); $PHOTO_PROPERTIES_CAPTION = 10001;
    29 use vars qw($COMMENT); $COMMENT = 10002;
    30 use vars qw($PHOTO_PROPERTIES_COMMENT); $PHOTO_PROPERTIES_COMMENT = 10003;
    31 use vars qw($AUTHOR); $AUTHOR = 10004;
    32 use vars qw($PHOTO_PROPERTIES_AUTHOR); $PHOTO_PROPERTIES_AUTHOR = 10005;
     29use vars qw($AUTHOR); $AUTHOR = 10002;
     30use vars qw($PHOTO_PROPERTIES_AUTHOR); $PHOTO_PROPERTIES_AUTHOR = 10003;
     31use vars qw($COMMENT); $COMMENT = 10004;
     32use vars qw($PHOTO_PROPERTIES_COMMENT); $PHOTO_PROPERTIES_COMMENT = 10005;
    3333use vars qw($CREATE_DATE); $CREATE_DATE = 10006;
    3434use vars qw($PHOTO_PROPERTIES_CREATE_DATE); $PHOTO_PROPERTIES_CREATE_DATE = 10007;
    3535use vars qw($TAGS); $TAGS = 10008;
    3636use vars qw($PHOTO_PROPERTIES_TAG); $PHOTO_PROPERTIES_TAG = 10009;
     37use vars qw($PRIVACY_LEVEL); $PRIVACY_LEVEL = 10010;
     38use vars qw($PHOTO_PROPERTIES_PRIVACY_LEVEL); $PHOTO_PROPERTIES_PRIVACY_LEVEL = 10011;
    3739
    3840sub PhotoProperties {
    3941    my( $parent ) = $_[0];
    40     my( $item0 ) = Wx::BoxSizer->new( wxHORIZONTAL );
     42    my( $item0 ) = Wx::BoxSizer->new( wxVERTICAL );
    4143   
    42     my( $item1 ) = Wx::BoxSizer->new( wxVERTICAL );
     44    my( $item1 ) = Wx::BoxSizer->new( wxHORIZONTAL );
    4345   
    4446    my( $item2 ) = Wx::BoxSizer->new( wxVERTICAL );
    4547   
    46     my( $item3 ) = Wx::BoxSizer->new( wxVERTICAL );
    47    
    48     my( $item4 ) = Wx::StaticText->new( $parent, $main::CAPTION, "text", wxDefaultPosition, wxDefaultSize, 0 );
    49     $item3->AddWindow( $item4, 0, wxALIGN_CENTER_VERTICAL|wxRIGHT, 5 );
     48    my( $item3 ) = Wx::StaticText->new( $parent, $main::CAPTION, "text", wxDefaultPosition, wxDefaultSize, 0 );
     49    $item2->AddWindow( $item3, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    5050
    51     my( $item5 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_CAPTION, "", wxDefaultPosition, [200,-1], 0 );
    52     $item3->AddWindow( $item5, 0, wxALIGN_CENTER_VERTICAL|wxRIGHT|wxTOP, 5 );
     51    my( $item4 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_CAPTION, "", wxDefaultPosition, [200,-1], 0 );
     52    $item2->AddWindow( $item4, 0, wxALIGN_CENTER_VERTICAL, 5 );
    5353
    54     $item2->Add( $item3, 0, wxALIGN_CENTER|wxALL, 5 );
     54    my( $item5 ) = Wx::StaticText->new( $parent, $main::AUTHOR, "text", wxDefaultPosition, wxDefaultSize, 0 );
     55    $item2->AddWindow( $item5, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    5556
    56     my( $item6 ) = Wx::BoxSizer->new( wxVERTICAL );
    57    
     57    my( $item6 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_AUTHOR, "", wxDefaultPosition, [200,-1], 0 );
     58    $item2->AddWindow( $item6, 0, wxALIGN_CENTER, 5 );
     59
    5860    my( $item7 ) = Wx::StaticText->new( $parent, $main::COMMENT, "text", wxDefaultPosition, wxDefaultSize, 0 );
    59     $item6->AddWindow( $item7, 0, wxALIGN_CENTER_VERTICAL|wxLEFT|wxRIGHT, 5 );
     61    $item2->AddWindow( $item7, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    6062
    6163    my( $item8 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_COMMENT, "", wxDefaultPosition, [200,100], wxTE_MULTILINE );
    62     $item6->AddWindow( $item8, 0, wxALIGN_CENTER_VERTICAL|wxLEFT|wxRIGHT|wxTOP, 5 );
     64    $item2->AddWindow( $item8, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    6365
    64     $item2->Add( $item6, 0, wxALIGN_CENTER_VERTICAL, 5 );
     66    my( $item9 ) = Wx::StaticText->new( $parent, $main::CREATE_DATE, "text", wxDefaultPosition, wxDefaultSize, 0 );
     67    $item2->AddWindow( $item9, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    6568
    66     my( $item9 ) = Wx::BoxSizer->new( wxVERTICAL );
     69    my( $item10 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_CREATE_DATE, "", wxDefaultPosition, [200,-1], 0 );
     70    $item2->AddWindow( $item10, 0, wxALIGN_CENTER_VERTICAL, 5 );
     71
     72    $item1->Add( $item2, 0, wxALIGN_CENTER_HORIZONTAL|wxALL, 5 );
     73
     74    my( $item11 ) = Wx::BoxSizer->new( wxVERTICAL );
    6775   
    68     my( $item10 ) = Wx::StaticText->new( $parent, $main::AUTHOR, "text", wxDefaultPosition, wxDefaultSize, 0 );
    69     $item9->AddWindow( $item10, 0, wxALIGN_CENTER_VERTICAL|wxRIGHT, 5 );
    70 
    71     my( $item11 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_AUTHOR, "", wxDefaultPosition, [200,-1], 0 );
    72     $item9->AddWindow( $item11, 0, wxALIGN_CENTER|wxRIGHT|wxTOP, 5 );
    73 
    74     $item2->Add( $item9, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
    75 
    76     my( $item12 ) = Wx::BoxSizer->new( wxVERTICAL );
    77    
    78     my( $item13 ) = Wx::StaticText->new( $parent, $main::CREATE_DATE, "text", wxDefaultPosition, wxDefaultSize, 0 );
    79     $item12->AddWindow( $item13, 0, wxALIGN_CENTER_VERTICAL|wxRIGHT, 5 );
    80 
    81     my( $item14 ) = Wx::TextCtrl->new( $parent, $main::PHOTO_PROPERTIES_CREATE_DATE, "", wxDefaultPosition, [200,-1], 0 );
    82     $item12->AddWindow( $item14, 0, wxALIGN_CENTER_VERTICAL|wxRIGHT|wxTOP|wxBOTTOM, 5 );
    83 
    84     $item2->Add( $item12, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
    85 
    86     $item1->Add( $item2, 0, wxALIGN_CENTER|wxALL, 5 );
    87 
    88     my( $item15 ) = Wx::BoxSizer->new( wxVERTICAL );
    89    
    90     $item1->Add( $item15, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
    91 
    92     my( $item16 ) = Wx::BoxSizer->new( wxVERTICAL );
    93    
    94     $item1->Add( $item16, 0, wxALIGN_CENTER|wxALL, 5 );
    95 
    96     $item0->Add( $item1, 0, wxALL, 5 );
    97 
    98     my( $item17 ) = Wx::BoxSizer->new( wxVERTICAL );
    99    
    100     my( $item18 ) = Wx::StaticText->new( $parent, $main::TAGS, "text", wxDefaultPosition, wxDefaultSize, 0 );
    101     $item17->AddWindow( $item18, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
     76    my( $item12 ) = Wx::StaticText->new( $parent, $main::TAGS, "text", wxDefaultPosition, wxDefaultSize, 0 );
     77    $item11->AddWindow( $item12, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
    10278
    10379    my $tags = $_[1];
    10480$tags->{parentwnd}=$parent;
    105 my( $item19 ) = Uploader::GUI::wxChoiceFilteredPanel->new($tags);
    106     $item17->AddWindow( $item19, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
     81my( $item13 ) = Uploader::GUI::wxChoiceFilteredPanel->new($tags);
     82    $item11->AddWindow( $item13, 0, wxALIGN_CENTER_VERTICAL, 5 );
    10783
    108     $item0->Add( $item17, 0, wxALIGN_CENTER_HORIZONTAL|wxALL, 5 );
     84    $item1->Add( $item11, 0, wxALIGN_CENTER_HORIZONTAL|wxALL, 0 );
     85
     86    $item0->Add( $item1, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
     87
     88    my( $item14 ) = Wx::BoxSizer->new( wxHORIZONTAL );
     89   
     90    my( $item15 ) = Wx::BoxSizer->new( wxVERTICAL );
     91   
     92    my( $item16 ) = Wx::StaticText->new( $parent, $main::PRIVACY_LEVEL, "text", wxDefaultPosition, wxDefaultSize, 0 );
     93    $item15->AddWindow( $item16, 0, wxALIGN_CENTER_VERTICAL|wxBOTTOM, 5 );
     94
     95    my( $item17 ) = Wx::Choice->new( $parent, $main::PHOTO_PROPERTIES_PRIVACY_LEVEL, wxDefaultPosition, [520,-1], [], 0 );
     96    $item15->AddWindow( $item17, 0, wxALIGN_CENTER_VERTICAL, 5 );
     97
     98    $item14->Add( $item15, 0, wxALIGN_CENTER_HORIZONTAL, 5 );
     99
     100    $item0->Add( $item14, 0, wxALIGN_CENTER_VERTICAL|wxALL, 5 );
    109101
    110102    my( $set_size ) = @_ >= 3 ? $_[2] : 1;
Note: See TracChangeset for help on using the changeset viewer.