Changeset 5104 for extensions/pLoader/trunk/src/Uploader/GUI/wxImageListCtrl.pm

Timestamp:

Mar 11, 2010, 6:15:33 PM (14 years ago)

Author:

ronosman

Message:

Feature 1496 added : display a message in the photo selection when it is empty.

File:

• extensions/pLoader/trunk/src/Uploader/GUI/wxImageListCtrl.pm (modified) (6 diffs)

extensions/pLoader/trunk/src/Uploader/GUI/wxImageListCtrl.pm

@@ -23 +23 @@
 use Wx::DND;
 use POSIX qw(ceil floor);
+use Wx::Locale qw/:default/;
 use Wx qw/
              wxDefaultPosition
@@ -47 +48 @@
              wxIMAGE_LIST_SMALL
              wxTheApp
+             wxVERTICAL
+             wxALIGN_CENTER
+             wxHORIZONTAL
+             wxALIGN_CENTER_VERTICAL
+             wxALIGN_CENTER_HORIZONTAL
+             wxALL
+             wxGROW
+             wxWHITE
+             wxSWISS 
+             wxNORMAL
+             wxBOLD
+             wxBITMAP_TYPE_PNG
          /;
 use Wx::Event qw/
@@ -83 +96 @@
         -1,
         wxDefaultPosition,
-        [ 180, -1],
+        [ -1, -1],
     );
     
@@ -110 +123 @@
 
     $self->prevItemCount(-1);
+
 
     EVT_LIST_BEGIN_DRAG( $self, $self, \&OnBeginDrag);
@@ -135 +149 @@
                 $self->Refresh; 
                 $self->change_display_mode(0);
-        }
-        $event->Skip;
-        }
-    );
+            }
+            $event->Skip;
+        }
+    );
+
+    # manages empty panel position
+    Wx::Event::EVT_PAINT( $self, sub {
+            my ( $self, $event ) = @_;
+            if(exists $self->{_empty_panel}){
+                my ($w, $h) = $self->GetSizeWH;
+                my ($x, $y) = $self->GetPositionXY;
+                my ($wp, $hp) = $self->{_empty_panel}->GetSizeWH;
+                my $x_off = ($w-$wp)/3 > 0 ? ($w-$wp)/3 : 0;
+                my $y_off = ($h-$hp)/3 > 0 ? ($h-$hp)/3 : 0;
+                $self->{_empty_panel}->Move(
+                    [ $x+$x_off, $y+$y_off ]
+                );
+            }
+            $event->Skip;
+        }
+    );
+
     
     $self->initialize(
@@ -353 +385 @@
 }
 
+sub OnEmpty {
+    my ( $self ) = @_;
+
+    $self->_OnEmptyLayout;
+
+}
+
+sub OnNotEmpty {
+    my ( $self ) = @_;
+
+    $self->{_empty_panel}->Show(0) if exists $self->{_empty_panel};
+}
+
+sub _OnEmptyLayout {
+
+    my( $self ) = @_;
+    $self->{_empty_panel}->Show(1);
+
+}
+
+sub add_button {
+    my ( $self ) = @_;
+
+    $self->{_add_bt};
+}
+
+sub InitEmptyMsg {
+
+    my ( $self ) = @_;
+    # add a panel
+    my $empty_panel = Wx::Panel->new($self, -1, wxDefaultPosition, wxDefaultSize);
+    my( $item0 ) = Wx::BoxSizer->new( wxVERTICAL );
+    
+    my $fb = Wx::Font->new( 12, wxSWISS, wxNORMAL, wxBOLD );
+    my $fn = Wx::Font->new( 12, wxSWISS, wxNORMAL, wxNORMAL );
+
+    my( $item1 ) = Wx::StaticText->new( $empty_panel, -1, gettext("Drag photos here to get started"), wxDefaultPosition, wxDefaultSize, 0 );
+    $item1->SetFont($fb);
+    $item0->AddWindow( $item1, 0, wxALIGN_CENTER|wxALL, 5 );
+
+    my( $item2 ) = Wx::BoxSizer->new( wxHORIZONTAL );
+    
+    my( $item3 ) = Wx::StaticText->new( $empty_panel, -1, gettext("Or click"), wxDefaultPosition, wxDefaultSize, 0 );
+    $item3->SetFont($fn);
+    $item2->AddWindow( $item3, 0, wxALIGN_CENTER|wxALL, 5 );
+
+    my $icon1 = Wx::Icon->new();
+    eval {
+        $icon1->LoadFile(
+            wxTheApp->resource_path('tb_add.png'),
+            wxBITMAP_TYPE_PNG
+        );
+    };
+    my $bmp = Wx::Bitmap->new( $icon1 );
+
+    my( $item4 ) = Wx::BitmapButton->new( $empty_panel, -1, $bmp, wxDefaultPosition, wxDefaultSize );
+    $item2->AddWindow( $item4, 0, wxALIGN_CENTER|wxALL, 5 );
+
+    my( $item5 ) = Wx::StaticText->new( $empty_panel, -1, gettext("to choose files on your computer"), wxDefaultPosition, wxDefaultSize, 0 );
+    $item5->SetFont($fn);
+    $item2->AddWindow( $item5, 0, wxALIGN_CENTER|wxALL, 5 );
+
+    $item0->Add( $item2, 0, wxALIGN_CENTER|wxALL, 0 );
+
+    $empty_panel->SetSizer( $item0 );
+    $item0->SetSizeHints( $empty_panel );
+
+    $self->{_empty_panel} = $empty_panel;
+    $self->{_add_bt} = $item4;
+    $self->{_empty_panel}->SetBackgroundColour(wxWHITE);
+
+    my ($wp, $hp) = $self->{_empty_panel}->GetSizeWH;
+
+    $self->SetMinSize( [20+$wp, -1 ]);
+
+}
+
+
+
 1;