Есть такой замечательный обьект Clipboard, надо в Uses добавить ClipBrd. Юзай его метод Clipboard.HasFormat, инфа есть в справке.
Код:
Передаешь одну из этих констант в HasFormat и узнаешь есть ли в бо то что тебе нужно.
CF_TEXT Text with a CR-LF combination at the end of each line. A null character identifies the end of the text.
CF_BITMAP A Windows bitmap graphic.
CF_METAFILEPICT A Windows metafile graphic.
CF_PICTURE An object of type TPicture.
CF_COMPONENT Any persistent object.