[Duvida/Delphi] Ajuda aqui rapidin

[Luiz Felipe. 0]

Bom galera estou com um projeto e estou preste a termina 50% hsushuss

em fim, irei direto ao ponto.

 

adicionei 2 Edit e 3 botão.

 

entao queria saber como fazer o seguinte.

 

eu clico no botao "ajuda"(exemplo) ai aparece no edit "ajuda;" ai clico no botao ajuda2 ai aparece no edit "ajuda;ajuda2;" e assim por diante.

 

ai fica tudo acumulado no edit 1.

Depois no outro botao ("Gerar" eu clico) e aparece no 2º edit por exemplo: Projeto "ajuda;ajuda2;"

 

Então é isso se alguém puder me ajudar fico muito grato.

[certs11 0]

Faça o seguinte:

No botão "Ajuda" adicone o seguinte code:

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

• Entre
• ou
• Cadastre-se

Assim você vai definir o texto do Edit1 como o texto que ele tem mais o que você quer colocar, nesse caso seria "Texto".

Para o Edit2;

Adicione o seguinte code:

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

• Entre
• ou
• Cadastre-se

Ele vai adicionar a palavra "Projeto" e o texto do Edit1, qualquer coisa estamos aqui! :)

[Luiz Felipe. 0]

está dando isso

 

[Error] Illegal character in input file: "" ($22)

[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'

 

@Edit

 

esse erro ocorre logo depois de adicionar o codigo no edit2

 

só pra lembrar tem que ter um outro botao "Gerar" que no caso após ter clicado no Gerar ele iria gerar tudo no edit2

[~SuiGetsu! 0]

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

• Entre
• ou
• Cadastre-se

seria o correto.

[Luiz Felipe. 0]

Isso mesmo SuiGetSu.

 

Agora qual comando para por no 2º botao o "Gerar" que iria gerar no Edit2 ?

 

@Edit

 

Valeu consegui já :P

[Lacy 6]

Edit2.Text := ('Projeto' + Edit1.Text) só Inverter as Seções # Edit1 / Edit2 :D

[Luiz Felipe. 0]

Já consegui.

Agora como crio um botao que copie tudo que ta dentro do Edit2

[OVator 0]

Clipboard.Clear;

Clipboard.SetText(edit1.text);

[Luiz Felipe. 0]

Ta dando erro

 

[Error] Unit1.pas[335]:Undeclared identifier

[OVator 0]

uses

ClipBrd;

[Luiz Felipe. 0]

agora deu erro do SetText

[OVator 0]

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

• Entre
• ou
• Cadastre-se

[Luiz Felipe. 0]

Valeu vator consegui :)

Uma outra coisa, eu usei um componente Memo ai eu clico em um botao que faz uns codigos dentro da Memo, então eu queria saber se da pra alterar apenas a cor das letras que aparecera dentro da Memo.

[OVator 0]

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

• Entre
• ou
• Cadastre-se

[Luiz Felipe. 0]

Eu terei que por o que em uses?

[OVator 0]

Nada.

[Luiz Felipe. 0]

É porque está dando o seguinte erro.

 

[Error] Unit1.pas(342): Undeclared identifier: 'Clolor'

[OVator 0]

Color.

Desculpe,havia escrito errado.

[Luiz Felipe. 0]

Acho que não é pois está dando esse erro agora.

 

[Error] Unit1.pas(8): File not found: 'Color'

 

@Edit

 

A sim você me mandou o codigo errado.

 

o codigo certo é

 

Memo1.Font.Color := clGreen;

 

voce tinha esquecido do :=

 

Valeu ai pela ajuda ;)

[OVator 0]

Como está o seu código? (a parte do memo).

[Luiz Felipe. 0]

Já consegui vator como eu editei a cima você me mando o codigo "certo" porem com uma simples coisinha que estava gerando o erro.

 

você me mando apenas Memo1.Font.Color "esqueceu do ":""= clGreen;

 

que no caso irá ficar assim

 

Memo1.Font.Color := clGreen;

 

obrigado pela ajuda :)