Schowek do zmiennej

Jak jakiejs zmiennej przypisac zawartosc schowka??

uses ClipBrd;

zmienna := Clipboard.AsText;

A jak sprawdzic czy jest cos w schowku?

Poczytaj se unit ClipBrd i bedziesz wszystko wiedział :)

Logiczne [glowa]

if Clipboard.AsText = '' then ShowMessage('Schowek pusty') else ShowMessage('W schowku siedzi tekst '+ Clipboard.AsText);