Discussion :

[Linkin]

Je cherche à capturer l'image d'une form qui n'est pas visible.
(Je crée la form, j'ai des graphiques et des panels à l'intérieur et je voudrais sauvegarder le tout dans une image, de pré&férence bmp)

La méthode CopyRect malheureusement ne copie que ce qui est visible à l'écran.

Merci pour vos solutions ou vos pistes.

[portu]

Code :

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

1
2
 
NomFiche.GetFormImage.SaveToFile('e:\fiche2.bmp');

Il faut que ta fiche soit créée avant de faire appel a cette fonction.
Je viens d'essayer, ca marche(j'ai mis des buttons et panels) mais rien que les panels sont imprimés sur la photo .

essayes tj.
a+

[Pierre Castelain]

Le problème est dans la méthode PaintTo, celle-ci ne trace que les contrôles visibles. Or la gestion de la propriété Visible n'est pas toujours très claire : est-ce qu'un contrôle peut être considéré visible alors que la fenêtre ne l'est pas ?
Une solution simple mais un peu sauvage consiste à positionner la fenêtre en dehors de l'écran et à la rendre visible pour récupérer son image :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
procedure TForm1.Button1Click(Sender: TObject);
var
  oldLeft: Integer;
begin
  oldLeft:= Form2.Left;
  Form2.Left:= - Form2.Width - 100;
  Form2.Visible:= true;
  image1.Picture.Bitmap:= Form2.GetFormImage;
  Form2.Visible:= false;
  Form2.Left:= oldLeft;
end;

[Linkin]

Merci j'ai opté pour cette solution en attendant de trouver quelque chose de moins sauvage