ProSystem
Caros Usuarios, a ProSystem mudou de Host agora o novo Fórum é

www.procheats.ipbfree.com

Acessem e ajudem o Fórum a Crescer!

Att.MetaL

Participe do fórum, é rápido e fácil

ProSystem
Caros Usuarios, a ProSystem mudou de Host agora o novo Fórum é

www.procheats.ipbfree.com

Acessem e ajudem o Fórum a Crescer!

Att.MetaL
ProSystem
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

[Aula - 2] Concatenar Palavras.

2 participantes

Ir para baixo

[Aula - 2] Concatenar Palavras. Empty [Aula - 2] Concatenar Palavras.

Mensagem por MetaL Seg Set 14, 2009 3:29 am

Neste Exemplo será ensinado a concatenar, ou seja, juntar palavras. Em muitos lugares quando tem-se que cadastrar o nome é colocado em uma caixa e na outra caixa o sobrenome, mas na hora de imprimir, por exemplo, é necessária a junção das duas caizas, é o que será ensinado.

1º - Abra o Delphi 7.
2º - De um Duplo Clique no Componente Label.
3º - Observe que sua Label está no meio do formulário, segure clicado sobre ela e leve para a parte superior esquerda do form.
4º - Muda a Propriedade Caption desta Label para Nome : .
5º - De um Duplo clique no componente Edit.
6º - Deixe o componente Edit1 em frente ao Label1(Onde está escrito Nome).
7º - Coloque mais dois(2) componentes, uma(1) Label e 1(uma) Edit e Deixe-os como os dois(2) Primeiros componentes que colocamos.
8º - Mude a Caption do Label2 para "Sobre Nome : "(Sem aspas).
9º - Adicione um Button, clique na propriedade "Name" e mude para "Concatenar"(Sem Aspas).
10º - Adicione outra Label ao lado do Button Concantenar(Nesta Label que irá aparecer os nomes "Concatenados"
11º - Mude o Nome da Label3(Ultima Label que colocamos) para Nome_Sobrenome.

Bom Agora Vamos aos Codes.

1º - De Dois Cliques no Button "Concatenar", e digite o codigo.

Código:

Nome_Sobrenome.Caption:= Edit1.Text + ' ' + Edit2.Text;

Explicação


Nome_Sobrenome.Caption -> Nome_Sobrenome: É o nome da caixa que receberá a junção do nome e o sobrenome.
.Caption: É a Propriedade que guarda o que aparece dentro da caixa.

Edit1.Text -> Nome: É o nome da caixa que contém o nome da pessoa.
.Text: É o nome da propriedade que guarda o que aparece escrito dentro da caixa.

Edit2.Text -> Sobre Nome: É o Nome da caixa que contém o sobre nome da pessoa.
.Text -> É o nome da propriedade que guarda o que aparece escrito dentro da caixa.

+ ' ' + -> O Sinal de adição além de somar faz também junções de caracteres. Quando é número ele soma, quando é caracteres ele junta.

' ' -> As Aspas Simples server para dar espaço entre o nome e o sobre nome para que os dois não fiquem grudados.

Observação: Quando é Label usa-se a propriedade .Caption. Quando é Edit usa-se a propriedade .Text.
MetaL
MetaL
Administrador
Administrador

Mensagens : 89
Pontos : 2147483647
Reputação : 9
Data de inscrição : 27/08/2009
Idade : 28
Localização : C:\WINDOWS\system32

http://www.prosystem.forumeiros.com./

Ir para o topo Ir para baixo

[Aula - 2] Concatenar Palavras. Empty copiar

Mensagem por jscalhau Sex maio 24, 2013 5:07 pm

MetaL escreveu:
Neste Exemplo será ensinado a concatenar, ou seja, juntar palavras. Em muitos lugares quando tem-se que cadastrar o nome é colocado em uma caixa e na outra caixa o sobrenome, mas na hora de imprimir, por exemplo, é necessária a junção das duas caizas, é o que será ensinado.

1º - Abra o Delphi 7.
2º - De um Duplo Clique no Componente Label.
3º - Observe que sua Label está no meio do formulário, segure clicado sobre ela e leve para a parte superior esquerda do form.
4º - Muda a Propriedade Caption desta Label para Nome : .
5º - De um Duplo clique no componente Edit.
6º - Deixe o componente Edit1 em frente ao Label1(Onde está escrito Nome).
7º - Coloque mais dois(2) componentes, uma(1) Label e 1(uma) Edit e Deixe-os como os dois(2) Primeiros componentes que colocamos.
8º - Mude a Caption do Label2 para "Sobre Nome : "(Sem aspas).
9º - Adicione um Button, clique na propriedade "Name" e mude para "Concatenar"(Sem Aspas).
10º - Adicione outra Label ao lado do Button Concantenar(Nesta Label que irá aparecer os nomes "Concatenados"
11º - Mude o Nome da Label3(Ultima Label que colocamos) para Nome_Sobrenome.

Bom Agora Vamos aos Codes.

1º - De Dois Cliques no Button "Concatenar", e digite o codigo.

Código:

Nome_Sobrenome.Caption:= Edit1.Text + ' ' + Edit2.Text;

Explicação


Nome_Sobrenome.Caption -> Nome_Sobrenome: É o nome da caixa que receberá a junção do nome e o sobrenome.
.Caption: É a Propriedade que guarda o que aparece dentro da caixa.

Edit1.Text -> Nome: É o nome da caixa que contém o nome da pessoa.
.Text: É o nome da propriedade que guarda o que aparece escrito dentro da caixa.

Edit2.Text -> Sobre Nome: É o Nome da caixa que contém o sobre nome da pessoa.
.Text -> É o nome da propriedade que guarda o que aparece escrito dentro da caixa.

+ ' ' + -> O Sinal de adição além de somar faz também junções de caracteres. Quando é número ele soma, quando é caracteres ele junta.

' ' -> As Aspas Simples server para dar espaço entre o nome e o sobre nome para que os dois não fiquem grudados.

Observação: Quando é Label usa-se a propriedade .Caption. Quando é Edit usa-se a propriedade .Text.


boa tarde!!!!

tenho 3 edit.text (edit3.text, edit4.text, edit5.text) , que é carregado por OpenDialog (OpenDialog1, OpenDialog2 e OpenDialog3), só que preciso copiar todos os arquivos que esta carregado pelo OpenDialog em na pasta c:\exemplo + edit1.text [ c:\exemplo + o que esta no edit1.text]

estou tentando eplemetnar esse código abaixo, mas não esta dando, certo( este código funciona com um unico edit)

preciso que ele copia os arquivos de todos os edit para a pasta c:\exemplo + edit1.text



jscalhau
Membro
Membro

Mensagens : 1
Pontos : 1
Reputação : 0
Data de inscrição : 24/05/2013

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos