Sources
Delphi Russian Knowledge Base
DRKB - это самая большая и удобная в использовании база знаний по Дельфи в рунете, составленная Виталием Невзоровым

Cut и Copy отказываются работать

01.01.2007

Вам нужно добавить следующие строки в конец unit:

initialization
  OleInitialize(nil);
finalization
  OleUninitialize;

Автор: Song

Взято из https://forum.sources.ru