Select Code to Download

sub on_click_insert_image{ 
    my ($i_frame, $event) = @_; 
...
    $i_frame->{Ctl_Report_Text_Txt}->WriteImage(Wx::Image->new($file, 
+wxBITMAP_TYPE_PNG)); 
        return $i_frame; 
}

" $i_frame->{Ctl_Report_Text_Txt}->AddImage(Wx::Image->new($file, wxBI
+TMAP_TYPE_PNG)); "

" $i_frame->{Ctl_Report_Text_Txt}->WriteImageImage(Wx::Image->new($fil
+e, wxBITMAP_TYPE_PNG)); "