Quote$panel->SetScrollbars
(10, 5, 40, 80, 0, 1);
C<GetVirtualSize()> würde <[400,400]> ergeben, da die X-Ausdehnung 40 Einheiten
zu je 10 Pixel und Y 80 Einheiten zu 5 Pixel beträgt. C<[0,1]> sind die Koordinaten
der neuen linken, oberen Ecke, zu der gescrollt wird (in Scrolleinheiten, die
auch der Befehl C<Scroll> annimmt). Scrolleinheiten meint die Schrittgröße der
Scrollbewegung in Pixel, die wie gezeigt mit <SetScrollbars> oder C<SetScrollRate>
gesetzt wird.
1
2
3
4
5
6
7
8
9
10
11
# DAS BILD LADEN
my $img = Wx::Bitmap->new("./auswertung.png", wxBITMAP_TYPE_PNG);
# Komponente: ScrolledWindow wird in $sg gespeichert
my $sg = $widgets{'swGrafik'};
# Komponente: StaticBitmap wird in $pic gespeicher
my $pic = $widgets{'m_bitmap1'};
# Bild wird gesetzt
$pic->SetBitmap($img);