Screenshot erstellen und speichern

[Z32]

Hallo Wissende,

Ich habe gerade mal eine kurze Frage, habe bei der Suchfunktin nicht das richtige gefunden.

Ich programmiere gerade an einem Programm, dass 25 Screenshots pro Sekunde erstellen soll. Und in ein bestimmtes Verzeichnis speichern soll. Eigentlich ja ganz einfach glaube ich. Doch leider kenne ich den Befehl zum erstellen eines Screenshots nicht. Ich hoffe ihr könnt mir da weiterhelfen.

[Zacherl]

Screenshot :wink:

[Der_Unwissende]

Hi,
auch wenn dir jmd. schon die Lösung rausgesuch hat (und ich mich hier "namentlich" ausgeschlossen fühle), für's nächste Mal (oder ale Erklärung für Florians Ergebnisse), schränke die Suche auf die Code-Lib (Code Bibliothek in der Suche genannt) ein. Da findest du dann fertigen Code!

Gruß Der Unwissende

[Z32]

schon mal vielen Dank, werde ich mir aufjeden Fall angucken... :-D

[Z32]

So habs mir mal angeguckt, hab aber noch ne Frage:

Ich habe mir jetzt eine Prozedure rausgesucht...

Delphi-Quellcode:

procedure ScreenToFile(aFileName: string); 
var
  Bitmap: TBitmap; 
  Canvas: TCanvas; 
begin 
  Canvas := TCanvas.Create; 
  try 
    Canvas.Handle := GetWindowDC(0); 
    try 
      Bitmap := TBitmap.Create; 
      try 
        Bitmap.Width := Screen.DesktopWidth; 
        Bitmap.Height:= Screen.DesktopHeight; 
        Bitmap.PixelFormat := pfDevice; 
(* 
        Bitmap.Canvas.CopyRect(Screen.DesktopRect, Canvas, Screen.DesktopRect); 

  Anstatt der folgenden Zeile, kann auch die CopyRect Funktion genutzt werden. 
  Die CopyRect-Funktion nutzt zusätzlich ein paar Schutzmechanismen, welche für 
  ScreenShots nicht notwendig sind. Ausserdem greift die CopyRect-Funktion auf 
  StretchBlt-Funktion zurück, welche langsamer als BitBlt ist. 
*) 
        BitBlt(Bitmap.Canvas.Handle, 0, 0, Pred(Screen.DesktopWidth), Pred( 
            Screen.DesktopHeight), Canvas.Handle, Screen.DesktopLeft, 
            Screen.DesktopTop, Bitmap.Canvas.CopyMode); 
        Bitmap.SaveToFile(aFileName); 
      finally 
        Bitmap.Free; 
      end; 
    finally 
      ReleaseDC(0, Canvas.Handle); 
    end; 
  finally 
    Canvas.Free; 
  end;
end;

... und rufe die hiermit auf...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
screentofile('testscreen');
end;

...aber wo speichert die Anwendung den Screenshot jetzt hin ????


EDIT: Ach habs schon rausgefunden...war mal wieder zu blöd...

Die Aufrufprozedure muss so heißen...

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
begin
screentofile('D:\testscreen.bmp');
end;

[MrKnogge]

Du musst nicht nur einen Namen sondern den ganzen Pfad angeben:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject); 
begin 
screentofile('C:\testscreen.bmp'); 
end;

gruss

[Harry M.]

http://www.h-soft.info/downloads/sim...een/index.html

[DieFliege]

Hallo Gemeinde,

ja, das Thema ist schon ein paar Tage alt, aber irgendwie stelle ich mich etwas dusselig an.

Ich habe herausgefunden, wie ich einen Screenshot eines ganzen Desktops machen kann, auch kann ich einen Screenshot der aktiven Anwendung machen, allerdings habe ich nicht herausgefunden, wie ich nur einen Teil des Desktops oder einer Anwendung als Screenshot aufnehmen kann. Vielleicht kann mir dazu jemand einen Tipp geben?

Hintergrund: Ich möchte kopierten Text auslesen, diesen in eine Maske aufbereiten und diese Maske soll dann als Screenshot (Grafik) weiter verarbeitet werden.

LG Micha (DieFliege)

[himitsu]

Wieso hat niemand gesagt, wie er den Screenshot macht?

Es gibt tausende Wege.

Zitat:

wie?

Du nimmst deinen ganzen Screenshot und schneidest anschließend das Gewünschte aus? :lol:



Oder du suchst das gewünschte Fenster (HWND) und machst von dessen DC das Foto, anstatt vom DC des Desktops.

[DieFliege]

Zitat:

Zitat von himitsu (Beitrag 1513024)

Wieso hat niemand gesagt, wie er den Screenshot macht?

Ich habe in keinem Wort gefragt "wie" ein Screenshot gemacht wird - Das war mir schon klar ;-)

Zitat:

Zitat von himitsu (Beitrag 1513024)

Du nimmst deinen ganzen Screenshot und schneidest anschließend das Gewünschte aus?

Das hatte ich bisher nicht bedacht, danke für den Tipp!

Zitat:

Zitat von himitsu (Beitrag 1513024)

Oder du suchst das gewünschte Fenster (HWND) und machst von dessen DC das Foto, anstatt vom DC des Desktops.

Genau das war mein eigentlicher Gedanke. Den Schritt, die Grafik zu arbeiten, kommt mir da eher als "Plan B" vor. Mal gucken, was ich zu "DC" finden kann :-)
Vielen Dank erst mal für deine Hilfe!

LG Micha (DieFliege)