Função de adicionar caracter?

[mateus007mts 14]

Bom galera é assim eu to fazendo uma parada aqui

i queria pedir ajuda em uma função !

é assim tem um edit e um memo1..

queroo uma função que adicionar numero a cada caracter digitado no edit exemplo :

 

eu escrevo no edit 1 :

 

game

 

e apareça assim no memo1 :

 

g7a7m7e

 

Tip ele vai add um numero a cada caracter digitado no edit1 ( no caso o numero 7 )...

 

Alguém tem essa função ? to atras dela faz tempo e não acho !

[Ryost 0]

não sei exatamente oque quer , mas fica uma pequena coisinha que fez oque apareceu no tópico.

está ai.

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

• Entre
• ou
• Cadastre-se

i é uma variavel do tipo integer.

para ser qualquer numero , tenta usar um random acompanhado com IntToStr().

[mateus007mts 14]

Bom se eu ponho a sua função que é :

 

for i:=0 to Length(Edit1.Text) do

Memo1.Lines.Add(Edit1.Text+ '7');

 

da o seguinte erro :

 

[Error] Unit2.pas(30): Undeclared identifier: 'i'

 

agora se eu mudo essa função para :

 

for if:=0 to Length(Edit1.Text) do

Memo1.Lines.Add(Edit1.Text+ '7');

 

da seguinte erro :

[Error] Unit2.pas(30): Expression expected but ':=' found

 

Arruma ai a função porfavor..

[FioDuMaLL 24]

voce esqueceu de declarar a var "i"

ficaria assim

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

• Entre
• ou
• Cadastre-se

 

Ajudei?Agradeça!

[mateus007mts 14]

a função funciono corretamente só tem um problema..

ele adiciona linhas

exemplo se eu escrevo Metas no edit1, aparece assim lá no memo :

 

m7

e7

t7

a7

s7

 

Eu queria que fica-se assim :

M7t7a7s tem como tirar essa parada de pular linha ?

[AceStryker 32]

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

• Entre
• ou
• Cadastre-se