Discussion :

[sensomusic]

bonjour à toutes et à tous.
J'ai une petite question au sujet du GetDC.

Je cherche à faire une sorte 'Screen shot' de la zone client d'un Tform.
Je récupère le DC avec GetDC puis avec un StretchBlt je copie la zone dans un Tbitmap que je sauve ensuite avec SaveToFile.
Jusqu'à là tout roule impec.

Sauf que le DC contient en fait la partie visible de la fenêtre si bien que si j'ai une autre fenêtre qui cache un peu celle que je veux, cette dernière est aussi 'photographiée'.
En gros c'est la zone d'écran qui est prise en compte et pas le contenu réel de la fenêtre.

Y a-t-il un moyen de n'obtenir que la zone client de la Tform et pas tout ce qui 'overlap' sur elle? (excusez cet anglicisme)

merci pour vos réponses.

[sensomusic]

Je me réponds à moi même car j'ai finalement trouvé la solution, bien cachée sur le net...
J'ai du coup réalisé une petite procédure que marche pour tous les WinControls.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 
//-------------------------------------------------------------
procedure ScreenShot(Ctrl:TWinControl;BackColor:TColor;destBitmap : TBitmap) ;
var BitMapTmp: TBitMap;
begin
 
   BitMapTmp := TBitMap.Create;
   try
   BitMapTmp.Width := Ctrl.width;
   BitMapTmp.Height := Ctrl.Height;
   BitMapTmp.clear(BackColor);
   Ctrl.Perform(WM_PRINT,BitMapTmp.Canvas.Handle, PRF_CLIENT or PRF_OWNED  or PRF_CHILDREN);
    SetStretchBltMode(destBitmap.Canvas.Handle,HALFTONE	);
    StretchBlt(destBitmap.Canvas.Handle, 0, 0,destBitmap.Width ,destBitmap.Height,BitMapTmp.Canvas.Handle, 0, 0, Ctrl.width, Ctrl.height, SRCCOPY);
   finally
    BitMapTmp.Free;
   end;
end;