Bonjour,
Je dois copier un écran contenant des champs edit et combobox.
J'utilise le code suivant:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
bmp := Tbitmap.create;
Onglets.ActivePage:=method;
Onglets.ActivePage.Repaint;
Bmp.Width := method.Width;
Bmp.Height := method.Height;
method.PaintTo(Bmp.Canvas, 0, 0);
sleep(500);   // pas mieux
bmp.SaveToFile(VMProjectPath.text+'P1.bmp');
bmp.free;
WaitBar.position:=WaitBar.position+1;
J'obtiens bien une copie d'écran mais les champs combobox sont vides (les champs edit sont visibles)
J'ai tenté des repaint sur les combo mais pas mieux
J'ai ajouté une temporosation, idem


Merci pour vos idées

Phil