Screenshots die Funktionieren

[Joel]

Ich brauchte ein Programm, dass Screenshots Aufzeichnet und auch unter älteren Pcs Funktioniert (Win 98 )

Mein Programm funtkioniert manchmal und manchmal nicht :

Code: Alles auswählen

keybd_event_(#VK_SNAPSHOT, 0, 0, 0) 
GetClipboardImage(0) 
SaveImage(0, "C:\sc.bmp") 

[RSBasic]

Es gibt ja verschiedene Varianten, vielleicht klappt es mit denen:
http://www.purebasic.fr/german/viewtopic.php?p=125584
http://www.purebasic.fr/german/viewtopic.php?p=103846
http://www.purebasic.fr/german/viewtopic.php?p=44113
http://www.purebasic.fr/german/viewtopic.php?p=27325
http://www.purearea.net/pb/CodeArchiv/O ... Windows.pb

[rolaf]

Mein Programm funtkioniert manchmal und manchmal nicht :

Code: Alles auswählen

keybd_event_(#VK_SNAPSHOT, 0, 0, 0) 
GetClipboardImage(0) 
SaveImage(0, "C:\sc.bmp") 

Schieb mal ein Delay rein, dann sollte es zuverlässiger laufen.

Code: Alles auswählen

keybd_event_(#VK_SNAPSHOT, 0, 0, 0) 
Delay(1000)
GetClipboardImage(0) 
SaveImage(0, "C:\sc.bmp") 

[Joel]

Thx aber dasshier ist schneller und zuverlässiger.

Code: Alles auswählen

CreateImage(0,GetSystemMetrics_(#SM_CXSCREEN),GetSystemMetrics_(#SM_CYSCREEN)) 
DC = StartDrawing(ImageOutput(0)) 
BitBlt_(DC,0,0,ImageWidth(0),ImageHeight(0),GetDC_(GetDesktopWindow_()),0,0,#SRCCOPY ) 
StopDrawing() 
ResizeImage(0,1024,768) 
UsePNGImageEncoder()
SaveImage(0, "C:\Screen.png", #PB_ImagePlugin_PNG  , 3)