PureBoard

Verfasst: **19.08.2006 11:43**

Hallo
hab mal wieder ne Frage...
Wie kann man den Deskop "fotografieren" und dann im Screen-Modus (OpenScreen(...)) anzeigen???
Schon im Voraus Danke für eure antworten.
(kann sein, dass ich die nächste Zeit nicht ins Internet komm.)

Verfasst: **19.08.2006 13:28**

suchen -> finden

http://www.purebasic.fr/german/viewtopic.php?t=8513

Verfasst: **20.08.2006 15:55**

Danke
werds mal ausprobieren.

Verfasst: **21.08.2006 21:31**

Dein Code

Code: Alles auswählen

;Bitmap anlegen: 
CreateImage(0,GetSystemmetrics_(#SM_CXSCREEN),GetSystemmetrics_(#SM_CYSCREEN)) 

;auf angelegtes Bitmap zeichnen: 
DC = StartDrawing(ImageOutput()) 
  BitBlt_(DC,0,0,ImageWidth(),ImageHeight(),GetDC_(GetDesktopWindow_()),0,0,#SRCCOPY) 
StopDrawing() 

;Bitmap an Fenstergroesse anpassen 
ResizeImage(0,640,480) 

If OpenWindow(0,100,100,640,480, #PB_Window_SystemMenu, "Screenshot") 
  Repeat 
    EventID.l = WaitWindowEvent() 
    StartDrawing(WindowOutput()) 
      DrawImage(ImageID(),0,0) 
    StopDrawing() 
    If EventID = #PB_Event_CloseWindow 
      Quit = 1 
    EndIf 
  Until Quit = 1 
EndIf 
End

hat super geklappt, danke!

Verfasst: **22.08.2006 08:59**

Mein Code sollte eigentlich auch überal funktionieren, nur anscheinend will ihn keiner verstehen.

Verfasst: **22.08.2006 15:28**

@DD..

ich hab ihn auch nicht geschnallt.. ?

@Thomas: bitteschön, jederzeit

PureBoard

Deskop fotografieren

Deskop fotografieren