Copiar un texto al portapapeles delphi 7

[arespremium]

Hola lamento molestar con esto, como puedo copiar un texto al portapapeles de windows usando delphi 7 con un Button1

En visual basic 6.0 se usa:

Private Sub cmd_copiar_Click()
  Clipboard.Clear
  Clipboard.SetText txt_n10.Text // numero del text
  Clipboard.Clear
  Clipboard.SetText txt_n10.Text// numero del text
End Sub

Saludos

[dec]

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.