Hej!



Jag vill skriva ut en lista som kommer från en SQL fråga. Det är ingen märkvärdiglista men jag vill kunna lägga in en loggobild i utskriften.

Jag avseer inte att öppna ett formulär utan bara köra en fråga som sedan skapar en lista.

Hur gör jag för att få med bilden i denna utskrift.


/phinala

Du kan använda Printer.PaintPicture:
<code>
Printer.PaintPicture Picture1.Picture, _
Printer.CurrentX , _
Printer.CurrentY
</code>

Ok...

Men hur laddar jag pictureboxen med den bilden jag vill skriva ut...

räcker det med att i koden ange

ex

picturebox.picture="C:/xxx/xxx.jpg"

och sedan kör din kod..

/Phinala

Några alternativ:
Alternativ 1:
<code>
Printer.PaintPicture LoadPicture(App.Path & "\Bild.bmp"), _
Printer.CurrentX , _
Printer.CurrentY
</code>
Alternativ 2:
<code>
Dim Bild As stdPicture
Set Bild = LoadPicture(App.Path & "\Bild.bmp")
Printer.PaintPicture Bild, _
Printer.CurrentX , _
Printer.CurrentY
</code>
Alternativ 3:
<code>
Set Picture1.Picture = LoadPicture(App.Path & "\Bild.bmp")
Printer.PaintPicture Picture1.Picture, _
Printer.CurrentX , _
Printer.CurrentY
</code>

jag tackar och bugar...

/Phinala