Discussion :

[Lalanne]

Bonjour,

J'ai un petit soucis quand je fais une copie d'une fenetre dans le presse papier avec keybd_event(VK_SNAPSHOT,1,0,0).

Je commence par éliminer la bande bleue du haut de la fenetre en modifiant le BorderStyle de la fenetre avec bsNone.

Je fais la copie avec keybd_event, puis je remet "bsSizeable" dans le BorderStyle pour revenir à l'affichage initial.

L'image que je récupère ainsi dans le presse papier a encore la bordure bleue. Elle n'y est pas si je ne remet pas "bsSizeable" dans le BorderStyle après la copie.

Quelqu'un pourrait-il m'aider à comprendre la raison de ce problème (trop rapide ? Que faire alors ?).

Merci par avance

[chm0105]

Essaie de mettre un Sleep() pour commencer et savoir si c'est le problème, mais je ne pense pas...

[Lalanne]

J'ai essayé, mais sans résultat. Merci quand même ...

[ero-sennin]

Salut,

Essaie de faire un Application->ProcessMessages une fois que tu as fait la copie d'écran... Ou avant... à tester

EDIT:

Voilà le code :

Code :

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

1
2
3
4
5
6
7
8
9
10
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  this->BorderStyle=bsNone;
  Application->ProcessMessages();
  SetForegroundWindow(this->Handle);
  keybd_event(VK_SNAPSHOT,0,0,0);
  keybd_event(VK_SNAPSHOT,0,KEYEVENTF_KEYUP,0);
  Application->ProcessMessages();
  this->BorderStyle=bsSizeable;
}

Normalement ca fonctionne

[Lalanne]

Salut,

Cela marche parfaitement

Merci beaucoup pour cette solution et pour les lignes de code.