вставка рисунка из буфера обмена

Программа делает PrintScreen, и то что делает эта команда сохраняется в буфере обмена. Как мне с него сохранить эту информацию в виде рисунка.

 

В BC++ можно так:

Код (Text):

1. #include "Clipbrd.hpp"
2. TClipboard *pCB = Clipboard();
3. if (pCB->HasFormat(CF_BITMAP))
4. {
5. Image1->Picture->Bitmap->LoadFromClipboardFormat(CF_BITMAP,pCB->GetAsHandle(CF_BITMAP),0);
6. }