[AJUDA] Como copiar um texto?

[dudex123456 0]

Quero saber, como faço pra copiar um texto através do clique no botão?

 

Tipo, eu clico no botão Texto e o conteúdo escrito dentro dele é copiado, ai é só colar em qualquer lugar com o Ctrl+V.

[The°Hacker 6]

Declare na uses Clipbrd

 

Depois no evento OnClick do botão:

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Abraços

[dudex123456 0]

Obrigado pela ajuda.

 

Estou aprendendo a mexer com o Delphi, to na parte básica, rs.

 

Abraço.

[Lf' 7]

Bom, vamos passo a passo:

Primeiro inclua a "Use" "ClipBrd" nos seus uses.

 

Para você entender melhor..

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs, StdCtrls;

 

Adiciona a Use no final e deixa assim:

 

uses

Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,

Dialogs,StdCtrls, ClipBrd;

 

Depois é só ir no seu botão e usar a função assim:

 

Clipboard.AsText := Edit1.text;

 

Edit1.text é o Edit do texto que você quer que seja copiado pro ClipBoard da pessoa que usar o programa.

Uma dica é que você pode deixar o edit em false para que ele não apareça, ficará com um visual melhor..

pelo menos foi assim que fiz em um utilitário meu;

 

abraços!

[iMelo~' 19]

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Mais facil ainda.