Hola,
Código Delphi
[-]
uses
ClipBrd;
begin
ClipBrd.Clipboard.SetTextBuf('Texto a copiar');
end;
PD. Disculpa que el código no se resalte: algunas etiquetas no están activadas ahora mismo, empero, han de seguir usándose, para cuando vuelvan a activarse.