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,


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.