- Timestamp:
- Dec 30, 2009, 10:52:22 PM (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
extensions/pLoader/trunk/src/Uploader/GUI/wxGlobalSettings.pm
r4571 r4589 55 55 $params->{properties} 56 56 ); 57 58 $self->frame_callback( 59 $params->{frame_callback} 60 ); 61 57 62 $self->{cpane_resize} = $self->FindWindow($main::CPANE_RESIZE); 58 63 $self->{cpane_resize_advanced} = $self->FindWindow($main::CPANE_RESIZE_ADVANCED); … … 86 91 EVT_CLOSE( $self, \&OnClose ); 87 92 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_resize}, \&OnPaneChanged ); 88 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_resize_advanced}, \&On AdvancedPaneChanged );93 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_resize_advanced}, \&OnPaneChanged ); 89 94 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_hd}, \&OnPaneChanged ); 90 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_hd_advanced}, \&On AdvancedPaneChanged );95 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_hd_advanced}, \&OnPaneChanged ); 91 96 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_watermark}, \&OnPaneChanged ); 92 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_transfert_advanced}, \&On AdvancedPaneChanged );97 Wx::Event::EVT_COLLAPSIBLEPANE_CHANGED( $self, $self->{cpane_transfert_advanced}, \&OnPaneChanged ); 93 98 94 99 } … … 111 116 my( $self, $event ) = @_; 112 117 113 # $self->_set_size( 114 # $event->GetCollapsed 115 # ); 116 $self->Layout; 117 $event->Skip; 118 } 119 120 sub OnAdvancedPaneChanged { 121 my( $self, $event ) = @_;122 123 $self-> Layout;124 $event->Skip; 125 126 } 118 $self->_layout; 119 $event->Skip; 120 } 121 122 sub _layout { 123 my( $self ) = @_; 124 125 $self->Layout; 126 $self->GetSizer->Fit($self); 127 my $size = $self->GetSize; 128 $self->frame_callback->($size); 129 130 } 131 127 132 128 133 sub OnDefaultPhotoCaption { … … 162 167 my $b = 1; 163 168 if('CODE' eq ref $self->properties->{$id}->{selection}){ 164 $b = $self->properties->{$id}->{selection}->()169 $b = !$self->properties->{$id}->{selection}->() 165 170 } 166 171 167 172 $self->{cpane_resize}->Collapse($b); 168 $self->Layout; 169 $event->Skip; 170 171 } 172 173 174 sub _set_size { 175 my ( $self, $collapsed ) = @_; 176 177 printf("collapsed %s\n", $collapsed); 178 my $new_size = $collapsed ? Wx::Size->new(200, 200) : Wx::Size->new(800, 800); 179 printf("collapsed %s, %s\n", $new_size->GetWidth, $new_size->GetHeight); 180 181 $self->SetMinSize($new_size); 182 $self->Layout; 183 } 173 $self->_layout; 174 $event->Skip; 175 176 } 177 184 178 185 179 sub OnHDUpload { … … 196 190 } 197 191 $self->{cpane_hd}->Collapse($b); 198 $self-> Layout;192 $self->_layout; 199 193 $event->Skip; 200 194 } … … 210 204 211 205 $self->{cpane_watermark}->Collapse($b); 212 $self-> Layout;206 $self->_layout; 213 207 $event->Skip; 214 208 }
Note: See TracChangeset
for help on using the changeset viewer.