Einzelnen Beitrag anzeigen

Benutzerbild von blondervolker
blondervolker

Registriert seit: 14. Sep 2010
Ort: Bei: Leeeiipzzhhh
381 Beiträge
 
Delphi XE2 Architect
 
#1

TWebbrowser Screenshot erstellen u.Zwichenablage kopieren

  Alt 8. Dez 2011, 15:17
Hab mal wieder eine Frage...

habe einen Sceenshot erstellt, aber sehe zwar die Form und einen
leeren Browser. Was mache ich falsch?

Delphi-Quellcode:
procedure TForm12.Start1Click(Sender: TObject);
var
Bitmap:TBitmap;
begin
Bitmap:=GetFormImage;
try
Clipboard.Assign(Bitmap);
finally
Bitmap.Free;
// MessageBox-Code
//
case messageBox(handle,
            'Eine Hardcopy wurde in die Zwischenablage kopiert.',
            'Info',
            0 OR 0 OR MB_DEFBUTTON1)
            of
 IDOK:
   begin
      // Knopf "Ok" gedrückt
   end;
 end;
// Ende MessageBox - Code
end;
end;
www.bewerbungsmaker.de
  Mit Zitat antworten Zitat