Форум — Ответы     (  К темам )

?	nadya: Как "сфотографировать" Рабочий стол (25-11-2002 19:50:25)
Как поместить изображение Рабочего стола или выбранного окна в Image.
Владимир (25-11-2002 22:34:35)
Если это форма нашего приложения — то это просто, иначе придется подумать //--------------------------------------------------------------------------- void __fastcall TForm1::BitBtn1Click(TObject *Sender) { // какая-либо форма нашего приложения, например Form2 Graphics::TBitmap *FormImage = Form2->GetFormImage(); Clipboard()->Assign(FormImage); Image1->Picture->Assign(Clipboard()); Image1->Refresh(); } //--------------------------------------------------------------------------- // делаем копию экрана void __fastcall TForm1::Button1Click(TObject *Sender) { // нажмите кнопочку PrintScreen а затем — Button1 Image1->Picture->Assign(Clipboard()); Image1->Refresh(); } //---------------------------------------------------------------------------
Владимир (10-12-2002 14:48:18)
Программно нажать любую клавишу, например PrintScreen Код клавиши PrintScreen — это VK_SNAPSHOT // нажимаем keybd_event(VK_SNAPSHOT, 0, 0, 0); // и например помещаем изображение в компонент Image1 Image1->Picture->Assign(Clipboard()); Image1->Refresh();