# Hier kommt ein zuvor im binmode eingelesenes Bild aus
# der Datenbank
my $Image = $DB->SelectImage( 1 );

my WImage = Wx::Image->new( );

WImage->LoadStreamType( $Image, wxBITMAP_TYPE_JPEG );