Discussion :

[cfalcot]

Bonjour,

Je cherche a copier un screenshot dans un TStream. Avec ce que j'ai trouver comme infos, je pondu ca:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
var
Bitmap: Tbitmap;
Stream: Tstream;
begin
Bitmap:=TBitmap.create;
Stream:=TStream.Create;
ScreenShot(Bitmap);
//Jusque la pas de soucis
Bitmap.SaveToStream(Stream); //BOOOM: 'Abstact Error'

Et je ne comprend pas: ce code semble fonctionner sur d'autres post.
Quelqu'un sait?
(Indy10 / Delphi10)