Changeset 4718 for extensions/pLoader/trunk/src/Uploader/GUI/wxPropertyGridPanel.pm

Timestamp:

Jan 21, 2010, 11:36:13 PM (14 years ago)

Author:

ronosman

Message:

Feature 1389 added : remove AUI docking manager

File:

• extensions/pLoader/trunk/src/Uploader/GUI/wxPropertyGridPanel.pm (modified) (14 diffs)

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

@@ -25 +25 @@
          /;
 use Wx::Locale qw/:default/;
-use base qw/Wx::Grid Uploader::Object2/;
+use base qw/Wx::Dialog Uploader::Object2/;
 
 use Wx::Event qw/
@@ -36 +36 @@
         editor
         properties
+        grid
       /
 );
@@ -47 +48 @@
 
 
-    my $self = $class->SUPER::new( $params->{parentwnd}, -1, wxDefaultPosition, wxDefaultSize );
+    my $self = $class->SUPER::new( undef, -1, "PropertyGrid", wxDefaultPosition, wxDefaultSize );
+    $self->grid(
+        Wx::Grid->new($self, -1, wxDefaultPosition, wxDefaultSize)
+    );
 
     $self->renderer(
@@ -75 +79 @@
     $self->Initialize;
       
-    EVT_GRID_CMD_CELL_CHANGE( $self, $self, \&OnCellChanged );
+    EVT_GRID_CMD_CELL_CHANGE( $self, $self->grid, \&OnCellChanged );
     $self;    
 }
@@ -83 +87 @@
 
 
-  $self->CreateGrid( scalar @{$self->properties}, 2 );
+  $self->grid->CreateGrid( scalar @{$self->properties}, 2 );
   
 
-  $self->SetRowLabelSize(0);
-  $self->SetColLabelSize(0);
-  $self->SetColSize( 0, 200 );
-  $self->SetColSize( 1, 200 );
+  $self->grid->SetRowLabelSize(0);
+  $self->grid->SetColLabelSize(0);
+  $self->grid->SetColSize( 0, 200 );
+  $self->grid->SetColSize( 1, 200 );
   
   $self->_init_property_grid();
@@ -98 +102 @@
     my ( $self ) = @_;
     
-    $self->ClearGrid;
+    $self->grid->ClearGrid;
 
     my $row = 0;
@@ -104 +108 @@
         eval {
 
-            $self->SetCellValue(
+            $self->grid->SetCellValue(
                 $row,
                 0,
@@ -111 +115 @@
 
 
-            $self->SetCellValue(
+            $self->grid->SetCellValue(
                 $row,
                 1,
@@ -132 +136 @@
     map {
         eval {
-            $self->SetCellEditor(
+            $self->grid->SetCellEditor(
                 $row,
                 1,
@@ -142 +146 @@
             ) if $self->editor->{$_->{type}};
 
-            $self->SetCellRenderer(
+            $self->grid->SetCellRenderer(
                 $row,
                 1,
@@ -152 +156 @@
             ) if $self->renderer->{$_->{type}};
 
-            $self->SetReadOnly(
+            $self->grid->SetReadOnly(
                 $row,
                 0,
             );
 
-            $self->SetCellValue(
+            $self->grid->SetCellValue(
                 $row,
                 0,
@@ -163 +167 @@
             );  
 
-            $self->SetCellValue(
+            $self->grid->SetCellValue(
                 $row,
                 1,
@@ -169 +173 @@
             );  
 
-            $self->SetReadOnly(
+            $self->grid->SetReadOnly(
                 $row,
                 1,
@@ -189 +193 @@
     );
     
-    my $value = $self->GetCellValue(
+    my $value = $self->grid->GetCellValue(
         $row,
         $col,