Changeset 3362 for extensions/pLoader/trunk/src/Uploader/GUI/wxFrameAUI.pm
- Timestamp:
- May 28, 2009, 9:28:28 PM (15 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
extensions/pLoader/trunk/src/Uploader/GUI/wxFrameAUI.pm
r3360 r3362 24 24 use Wx::DND; 25 25 use Wx qw/ 26 wxAUI_DOCKART_PANE_BORDER_SIZE27 26 wxNullBitmap 28 27 wxID_OK … … 340 339 preview_h 341 340 perspective 341 current_imageviewer_index 342 342 /; 343 343 __PACKAGE__->mk_accessors( @properties ); … … 392 392 $params->{perspective} 393 393 ); 394 395 $self->current_imageviewer_index( 396 $params->{imageviewer_index}||0 397 ); 394 398 395 399 $self->pwg( $params->{pwg} ); … … 452 456 $self->_InitEventHandlers; 453 457 $self->_initImgTypes; 458 459 460 $self->imageviewer->SelectItem( 461 $self->current_imageviewer_index 462 ) if $self->imageviewer->GetItemCount; 454 463 455 464 $self; … … 734 743 $self->init_panels; 735 744 736 #if(!$self->imagelist->wx_thumb_imglist->GetImageCount){737 # $self->imageviewer->Show(0);738 #}739 740 # my $imglistpage = [741 # [742 # $self->imageviewer,743 # gettext("Photo selection"),744 # '../res/images.png',745 # wxBITMAP_TYPE_PNG,746 # ],747 # ];748 749 750 751 745 $self->init_aui; 752 746 $self->init_dnd_targets; 753 #$self->_populate_notebook($self->notebook, $imglistpage, 1);754 747 755 748 if( $self->imagelist->wx_thumb_imglist->GetImageCount){ … … 760 753 $self->imagelist->wx_thumb_imglist 761 754 ); 755 762 756 } 763 757 … … 980 974 ->ToolbarPane->Top->Row( 1 )->LeftDockable( 0 )->RightDockable( 0 ) ) if defined $self->toolbar; 981 975 982 if( 976 if($self->perspective){ 983 977 $self->manager->LoadPerspective($self->perspective) if $self->perspective =~ /getting_started/; 984 978 } … … 1504 1498 sub OnImageViewerItemActivated { 1505 1499 my( $self, $event ) = @_; 1500 1501 $self->current_imageviewer_index( 1502 $event->GetIndex 1503 ); 1506 1504 1507 1505 $self->OnPhotoProperties; … … 1514 1512 my $indx = $event->GetIndex; 1515 1513 1514 $self->_on_imageviewer_item_selected($indx); 1516 1515 # retrieve photo info for the last selected photo 1517 $self->imagelist->SetCurrentImage($indx); 1516 $event->Skip; 1517 } 1518 1519 sub _on_imageviewer_item_selected { 1520 my ( $self, $index ) = @_; 1521 1522 $self->current_imageviewer_index($index); 1523 $self->imagelist->SetCurrentImage($index); 1518 1524 1519 1525 $self->imagelist->image_selection( … … 1527 1533 $self->image_preview->Refresh; 1528 1534 1529 my $bmp = 1535 my $bmp = Wx::Bitmap->new( 1530 1536 $self->imagelist->current_image->preview_file, 1531 1537 $self->GetWxBitmapType($self->imagelist->type), … … 1785 1791 ( $params->{'PreviewWidth'}, $params->{'PreviewHeight'} ) = $self->image_preview->GetSizeWH ; 1786 1792 $params->{Perspective} = $self->manager->SavePerspective; 1793 $params->{ImageviewerIndex} = $self->current_imageviewer_index; 1787 1794 1788 1795
Note: See TracChangeset
for help on using the changeset viewer.