Delphi dicas

Simula print screen

Procedure TForm1.Button1Click(Sender: TObject);



begin



        keybd_event(VK_PRINT, 0, 0, 0);



        keybd_event(VK_PRINT, 0, KEYEVENT_KEYUP, 0);



end;

por : Euler Britto