Changeset 3365


Ignore:
Timestamp:
May 29, 2009, 10:31:24 PM (11 years ago)
Author:
ronosman
Message:

Feature 1016 added : popup menu for Photo selection with "Prperties" and "Preview" menu items.

Location:
extensions/pLoader/trunk
Files:
4 added
1 edited

Legend:

Unmodified
Added
Removed
  • extensions/pLoader/trunk/src/Uploader/GUI/wxFrameAUI.pm

    r3362 r3365  
    351351          EVT_LIST_ITEM_SELECTED
    352352          EVT_LIST_ITEM_ACTIVATED
     353          EVT_LIST_ITEM_RIGHT_CLICK
    353354          EVT_TREE_ITEM_RIGHT_CLICK
    354355          EVT_LIST_KEY_DOWN
     
    370371
    371372my $ID_TREE_CTX_MENU = 20000 ;
     373my $ID_IMAGEVIEWER_CTX_MENU = 20100 ;
    372374
    373375sub new {
     
    379381                                      [ $params->{x}, $params->{y} ],
    380382                                      [ $params->{width}, $params->{height} ],
    381                                       wxDEFAULT_FRAME_STYLE|wxMAXIMIZE
     383                                      wxDEFAULT_FRAME_STYLE
    382384                                   );
    383385    $self->preview_w(
     
    10251027    my ( $self ) = @_;
    10261028
     1029    $self->manager->GetPane("photo_properties")->Show(1);
     1030    $self->manager->Update();   
     1031       
     1032}
     1033
     1034sub OnPreview {
     1035    my ( $self ) = @_;
     1036
    10271037    $self->manager->GetPane("preview")->Float->Show(1);
    1028     $self->manager->GetPane("photo_properties")->Show(1);
    10291038    $self->manager->Update();   
    10301039       
     
    12961305    EVT_TREE_SEL_CHANGED( $self, $self->tree, \&OnTreeSelChanged );
    12971306    EVT_TREE_ITEM_RIGHT_CLICK( $self->tree, $self->tree, \&OnTreeItemRightClick );
     1307
    12981308    EVT_LIST_END_LABEL_EDIT( $self, $self->imageviewer, \&OnImageViewerEndLabelEdit );
    12991309    EVT_LIST_ITEM_ACTIVATED( $self, $self->imageviewer, \&OnImageViewerItemActivated );
    13001310    EVT_LIST_ITEM_SELECTED($self, $self->imageviewer, \&OnImageViewerItemSelected) ;
     1311    EVT_LIST_ITEM_RIGHT_CLICK($self, $self->imageviewer, \&OnImageViewerItemRightClick) ;
     1312
    13011313    EVT_LIST_KEY_DOWN($self, $self->imageviewer, \&OnImageViewerKeyDown) ;
     1314
    13021315    EVT_CLOSE( $self, \&OnClose );
    13031316    Wx::Event::EVT_UPDATE_UI( $self, $self, \&OnUpdateUI );
     
    13061319    Wx::Event::EVT_MENU( $self, 1+$ID_TREE_CTX_MENU, \&OnAddCategories );
    13071320    Wx::Event::EVT_MENU( $self, 2+$ID_TREE_CTX_MENU, \&OnRefreshCategories );
     1321    Wx::Event::EVT_MENU( $self, 1+$ID_IMAGEVIEWER_CTX_MENU, \&OnPhotoProperties );
     1322    Wx::Event::EVT_MENU( $self, 2+$ID_IMAGEVIEWER_CTX_MENU, \&OnPreview );
     1323
     1324
    13081325}
    13091326
     
    14151432    map {
    14161433        $ctx_mnu->Append(
    1417             @$_
    1418         );
     1434            @$_[0..2]
     1435        )->SetBitmap(Wx::Bitmap->new($_->[3],wxBITMAP_TYPE_PNG));
    14191436    }
    14201437    (
     
    14281445                gettext("to the currently selected"),
    14291446                wxTheApp->branding->{category},
    1430             )
     1447            ),
     1448            '../res/mnu_folder_new.png',
    14311449        ],
    14321450        [
     
    14361454                "Refresh %s list.",
    14371455                wxTheApp->branding->{category},
    1438             )
     1456            ),
     1457            '../res/mnu_refresh.png',
    14391458        ],
    14401459    );
    1441     $self->PopupMenu($ctx_mnu, $point);
     1460
     1461    $self->PopupMenu($ctx_mnu, wxDefaultPosition);
     1462       
     1463}
     1464
     1465
     1466sub OnImageViewerItemRightClick {
     1467    my( $self, $event ) = @_;
     1468
     1469    my $point = $event->GetPoint ;
     1470    my $ctx_mnu = Wx::Menu->new;
     1471   
     1472    map {
     1473        $ctx_mnu->Append(
     1474            @$_[0..2]
     1475        )->SetBitmap(Wx::Bitmap->new($_->[3],wxBITMAP_TYPE_PNG));
     1476    }
     1477    (
     1478        [
     1479            1+$ID_IMAGEVIEWER_CTX_MENU,
     1480            gettext("Properties"),
     1481            gettext("Modify photo properties"),
     1482            '../res/mnu_properties.png',
     1483        ],
     1484        [
     1485            2+$ID_IMAGEVIEWER_CTX_MENU,
     1486            gettext("Preview"),
     1487            gettext("Display photo preview"),
     1488            '../res/mnu_preview.png',
     1489        ],
     1490    );
     1491   
     1492    $self->PopupMenu($ctx_mnu, wxDefaultPosition);
     1493       
    14421494       
    14431495}
Note: See TracChangeset for help on using the changeset viewer.