Changeset 3370 for extensions
- Timestamp:
- May 30, 2009, 8:57:08 AM (15 years ago)
- Location:
- extensions/pLoader/trunk/src/Uploader/GUI
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
extensions/pLoader/trunk/src/Uploader/GUI/wxApp.pm
r3362 r3370 309 309 login_dlg 310 310 branding 311 frame 311 312 / 312 313 ); … … 904 905 } 905 906 906 my ( $frame ) = Uploader::GUI::wxFrameAUI->new( 907 { 908 x => $x, 909 y => $y, 910 width => $w, 911 height => $h, 912 title => sprintf("pLoader - Piwigo uploader %s - [%s]", $self->version, $url), 913 pwg => $self->pwg, 914 imagelist => $self->imagelist, 915 preview_w => $prev_w, 916 preview_h => $prev_h, 917 perspective => $perspective, 918 imageviewer_index => $imageviewer_index, 919 } 907 $self->frame( 908 Uploader::GUI::wxFrameAUI->new( 909 { 910 x => $x, 911 y => $y, 912 width => $w, 913 height => $h, 914 title => sprintf("pLoader - Piwigo uploader %s - [%s]", $self->version, $url), 915 pwg => $self->pwg, 916 imagelist => $self->imagelist, 917 preview_w => $prev_w, 918 preview_h => $prev_h, 919 perspective => $perspective, 920 imageviewer_index => $imageviewer_index, 921 } 922 ) 920 923 ); 921 924 922 $ frame->SetSize( $x, $y, $w, $h );923 $ frame->Show( 1 );924 $self->SetTopWindow( $ frame );925 $self->frame->SetSize( $x, $y, $w, $h ); 926 $self->frame->Show( 1 ); 927 $self->SetTopWindow( $self->frame ); 925 928 926 929 my $icon = Wx::Icon->new(); 927 930 $icon->LoadFile('../res/favicon.ico', wxBITMAP_TYPE_ICO); 928 $ frame->SetIcon($icon);931 $self->frame->SetIcon($icon); 929 932 } 930 933 -
extensions/pLoader/trunk/src/Uploader/GUI/wxFrameAUI.pm
r3367 r3370 1966 1966 1967 1967 package DNDImageListDropTarget; 1968 1968 use Wx qw/wxTheApp/; 1969 1969 use base qw(Wx::FileDropTarget Class::Accessor::Fast); 1970 1970 … … 1972 1972 qw/ 1973 1973 imageviewer 1974 frame1975 1974 / 1976 1975 ); … … 1982 1981 1983 1982 $self->imageviewer($imageviewer); 1984 $self->frame($imageviewer->GetParent); 1983 1985 1984 return $self; 1986 1985 } … … 1989 1988 my( $self, $x, $y, $files ) = @_; 1990 1989 1991 $self->frame->SetNewFiles($files) ;1990 wxTheApp->frame->SetNewFiles($files) ; 1992 1991 } 1993 1992
Note: See TracChangeset
for help on using the changeset viewer.