Forum: Object-Pascal / Delphi-Language
Delphi
by Mariaki,
21. Okt 2009
Ah.. danke schon selbst gefunden:
Man muss anstatt "Image.Picture.Graphic.Assign(Bmp);" "Image.Picture.Bitmap.Assign(Bmp);" nehmen da es ja ne Bitmap ist.
Jo.. danke an alle.
Forum: Object-Pascal / Delphi-Language
Delphi
by Mariaki,
21. Okt 2009
Da bekomme ich eine Zugrifsverletzung.
Forum: Object-Pascal / Delphi-Language
Delphi
by Mariaki,
21. Okt 2009
Danke schon mal.
Aber wie lasse ich das dann in einem Image anzeigen?
Forum: Object-Pascal / Delphi-Language
Delphi
by Mariaki,
21. Okt 2009
Hi,
ich hab vor einen Screenshot zu machen und ihn dann anzuzeigen lassen/ zu speichern.
Dazu habe ich folgenden Quelltext gemacht:procedure TForm1.Button1Click(Sender: TObject);
begin
keybd_event(VK_SNAPSHOT, 0, 0, 0);
keybd_event(VK_SNAPSHOT, 0, KEYEVENTF_KEYUP, 0);
if Clipboard.HasFormat(CF_BITMAP) then
begin
Image1.Picture.Bitmap.Assign(Clipboard);
end;