Screen Drucken
Verfasst: 10.01.2008 13:54
Kann man ein Screen bzw windowed Screen auch mit den Printer befehlen ausdrucken?
Code: Alles auswählen
Dim pix(ww-1,wh-1)
StartDrawing(ScreenOutput())
For i=0 To ww-1
For k=0 To wh-1
pix(i,k)=Point(i,k)
Next
Next
StopDrawing()
CreateImage(0,ww,wh)
StartDrawing(ImageOutput(0))
For i=0 To ww-1
For k=0 To wh-1
Plot(i,k, pix(i,k))
Next
Next
StopDrawing()
Dim pix(0,0)