Warum noch ein Access-Buch?
Für wen ist das Buch?
Jetzt bestellen
+ direkter Download des eBooks!
Nur EUR 59,95!
Fehler gefunden?
Bitte melden!
Wünsche an das Buch?
Her damit!
Was denken die Leser über dieses Buch?
Lesen Sie aktuelle Rezensionen!
Kapitel des noch nicht veröffentlichten Buchs zum Downloaden, Probelesen und Kommentieren
Beispieldatenbanken
Zusätzliches Material

Das Buch im HTML-Format

Für unbestimmte Zeit bieten Addison-Wesley und André Minhorst den kompletten Inhalt des Buchs als Download an. Schauen Sie rein und informieren Sie sich über den Inhalt! Und wenn Ihnen das Buch nützlich erscheint und Sie glauben, dass Sie etwas gelernt haben oder durch das Gelesene sogar etwas Zeit und somit Geld bei Ihrer Arbeit einsparen konnten, können Sie sich ja beim Autor und beim Verlag revanchieren - beispielsweise durch den Kauf dieses Buchs.

Am schönsten wäre es natürlich, wenn Sie das Buch direkt hier bestellen - Sie erhalten das Buch dann direkt vom Verlag, und der Autor und Verlag haben dann noch mehr davon, als wenn Sie es anderswo kaufen.

Danke für Ihr Interesse!

11.9.2 Anzeige externer Bilddateien in Berichten

11.9.3 Alternative zum Bildsteuerelement von Access

Eine Alternative zum Bildsteuerelement ist das Image-Steuerelement der MSForms-Bibliothek, die bei jeder Access-Installation - auch bei Runtimes - mitinstalliert wird. Dieses Steuerelement fügen Sie über den Dialog ActiveX-Steuerelement einfügen ein (Ribbon-Eintrag Entwurf|Steuerelemente|ActiveX-Steuerelement einfügen). Damit das Steuerelement die Bilder passend zur Steuerelementfläche zoomt (siehe Abbildung 11.14), fügen Sie noch zwei Zeilen Code hinzu, sodass die Prozedur aus dem vorherigen Beispiel nun so aussieht:

Private Sub Detailbereich_Print(Cancel As Integer, PrintCount As Integer) Dim strDateiname As String Dim strPicture As String Dim objImage As MSForms.Image 'Prüfen, ob Dateiname vorhanden ist If Not IsNull(Me!Dateiname) Then strDateiname = Me!Dateiname 'Prüfen, ob das angegebene Bild existiert... If Not Dir(strDateiname) = "" Then '... und Bild festlegen strPicture = strDateiname End If End If 'Bildname dem Bildsteuerelement zuweisen Set objImage = Me!imgBild.Object objImage.PictureSizeMode = fmPictureSizeModeZoom Set objImage.Picture = LoadPicture(strDateiname) End Sub

Listing 11.6: Anzeigen verknüpfter Bilddateien im Image-Steuerelement der MSForms-Bibliothek

Abbildung 11.14: Bilder im Image-Steuerelement der MSForms-Bibliothek

Nächster Abschnitt:

11.10 Die Office Graphics Library

© 2006-2008 André Minhorst Alle Rechte vorbehalten.