Imprimer le contenu d'une ListIconGadget ??

Vous débutez et vous avez besoin d'aide ? N'hésitez pas à poser vos questions
hirmin
Messages : 3
Inscription : mer. 08/avr./2009 18:53

Imprimer le contenu d'une ListIconGadget ??

Message par hirmin »

Bonjour, je suis nouvel utilisateur de PureBasic et déjà bloqué sur mon premier projet ^^" (prometteur hum...)

Voila en gros je souhaiterais pouvoir imprimer le contenu de ma ListIconGadget, tout ce que j'arrive à faire c'est imprimer le gadget donc ce qui nécessite de descendre la ScrollBare n'est pas imprimé.

Voila où j'en suis dans mon code :

Code : Tout sélectionner

OpenLibrary(0, "user32.dll")
Prototype PrintWindow(hwnd, hdc, flags)
PrintWindow_.PrintWindow = GetFunction(0, "PrintWindow")
result = DefaultPrinter()

[.....]

  Case #Button_15
    GetWindowRect_(GadgetID(#ListIcon_4), @listrect.RECT)
    width = listrect\right-listrect\left
    height = listrect\bottom-listrect\top
    CreateImage(0, width, height, 24)
    hdc = StartDrawing(ImageOutput(0))
      PrintWindow_(GadgetID(#ListIcon_4), hdc, #Null)
    StopDrawing()
    If result
      resulta = StartPrinting("Job 1")
      If resulta
        newwidth = PrinterPageWidth()
        newheight = newwidth/width*height
        ResizeImage(0, newwidth, newheight)
        StartDrawing(PrinterOutput())
          DrawImage(ImageID(0),0,0)
        StopDrawing()
       StopPrinting()
      Else
        MessageRequester("!!!", "Erreure lors de l'imprétion !")
      EndIf
    Else
      MessageRequester("!!!", "Aucune imprimante trouvée !")
    EndIf 
Heuu petit détail, je ne comprend absolument rien à ce qui est codé la ^^"

J'espère que quelqu'un comprendra mieux que moi et pourras m'aider
gnozal
Messages : 832
Inscription : mar. 07/déc./2004 17:35
Localisation : France
Contact :

Message par gnozal »

hirmin
Messages : 3
Inscription : mer. 08/avr./2009 18:53

Message par hirmin »

Impeccable ça fonctionne, non sans mal mais la bête a finit par céder :p
Merci pour cette aide ^^"
Répondre