1. Liebe Forumsgemeinde,

    aufgrund der Bestimmungen, die sich aus der DSGVO ergeben, müssten umfangreiche Anpassungen am Forum vorgenommen werden, die sich für uns nicht wirtschaftlich abbilden lassen. Daher haben wir uns entschlossen, das Forum in seiner aktuellen Form zu archivieren und online bereit zu stellen, jedoch keine Neuanmeldungen oder neuen Kommentare mehr zuzulassen. So ist sichergestellt, dass das gesammelte Wissen nicht verloren geht, und wir die Seite dennoch DSGVO-konform zur Verfügung stellen können.
    Dies wird in den nächsten Tagen umgesetzt.

    Ich danke allen, die sich in den letzten Jahren für Hilfesuchende und auch für das Forum selbst engagiert haben. Ich bin weiterhin für euch erreichbar unter tti(bei)pcwelt.de.
    Dismiss Notice

VB, Screenshot

Discussion in 'Programmieren' started by JojoKoester, Jan 15, 2004.

Thread Status:
Not open for further replies.
  1. JojoKoester

    JojoKoester Halbes Megabyte

    Hi!

    Ich wollte nur mal fragen, ob es in Visual Basic möglich ist Bildschirmfotos zu erstellen und abzuspeichern. Man kann ja mit dem Befehl
    Code:
    SendKey
    dem aktuellen Formular einen Tastendruck geben. Nur das Problem ist nachher das abspeichern. Hoffe auf viel und gute Hilfe :D
     
  2. Progmeister

    Progmeister Kbyte

    mit VB selbst geht es nicht, aber mit API

    ...hier alle benötigten API-Funktionen
    Code:
    Public Declare Sub keybd_event Lib "user32" Alias "keybd_event" _
      (ByVal bVk As Byte, ByVal bScan As Byte, _
      ByVal dwFlags As Long, ByVal dwExtraInfo As Long)
    
    'Die nachfolgende Prozedur erstellt das Screenshot
    Public Sub MakeScreenshot(ByVal ActiveWindow As Boolean)
    
      'Der Parameter ActiveWindow legt fest, ob ein Screenshot
      'für das aktuelle Fenster (True) oder für gesamten 
      'Windows-Desktop (False)erstellt werden soll
    
      Const KEYEVENTF_KEYUP = &H2
      Const VK_MENU = &H12
      Const VK_SNAPSHOT = &H2C
    
      If ActiveWindow Then keybd_event VK_MENU, 0, 0, 0 'ALT-Taste
      keybd_event VK_SNAPSHOT, 0, 0, 0 'Druck-Taste
      keybd_event VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0
      If ActiveWindow Then keybd_event VK_MENU, 0, KEYEVENTF_KEYUP, 0
      DoEvents
    End Sub
     
  3. JojoKoester

    JojoKoester Halbes Megabyte

    ok. Trozdem danke. Gibt es denn eine andere Möglichkeit Bildschirmfotos zu machen? Ich weiß, das es Programme gibt die so etwas machen. Die sind meiner Meinung auch mit Visual Basic programmiert worden.
     
  4. rapmaster

    rapmaster Halbes Gigabyte

    vergiss sendkey.
    ich hatte hier vor einem jahr ne diskussion mit meisterprogrammierer(glaub der user hieß so) , und wir mussten feststellen, dass dieser befehl nicht mal richtig funktioniert.
    mfg
     
  5. whisky

    whisky Ganzes Gigabyte

    Nach einer Suchdauer von 0,76sek hatte ich ein Ergebnis mit :google: . Das zweite gefundene ist das was du suchst! :D
     
Thread Status:
Not open for further replies.

Share This Page