Puedes utilizar la clase
TClipBoard de Delphi.
Incluyes la unit "clipbrd" en la claúsula USES.
Declaras una variable declaramos (también puedes utilizar la ya declarada por Delphi).
Lo creamos.
Almacenamos algo en él.
Código Delphi
[-]
cb.AsText := 'Lo que quieras';
Y la liberamos: