Concatenando String e Int e referenciando um objeto.

[Felipe Castro 0]

Bom dia.

Estou precisando concatenar uma string e um int para referenciar um objeto Shape, mas não consigo referencia-lo.

Exemplo:

Concatenação de('Shape' + i).visible:=true;

 

 

Obrigado pela atenção. :D

[Hugo Slepicka 0]

tipo, o seguinte...

 

 

var codigo : Integer;	  nome : string;Showmessage(nome+' '+IntToStr(codigo));

isso te ajuda?

[Felipe Castro 0]

Valeu pela resposta, mas preciso referenciar um Shape com a concatenação, para alterar suas propriedades.

[marcio.theis 3]

Usa o FindComponent, tipo:

 

(Self.FindComponent('Shape' + IntToStr(i)) as TShape).Visible:=True;

[Felipe Castro 0]

Obrigado marcio.theis, resolveu meu problema esta ajuda.Usei o cod de uma forma mais abrevida:TShape(FindComponent('Shape' +'InToStr(i))).visble:=True; :D

[marcio.theis 3]

Isso aew http://forum.imasters.com.br/public/style_emoticons/default/joia.gif pode ser desta forma tb...

[Pantoja 5]

NOssssssspoderia me explicar o q isso faz?curti a ideia!pelo visto Tshape é uma classe q você criou ou javem com o Delphi 2005?me fala ae cara!abrasss

[marcio.theis 3]

TShape é um componente que pode ser acessado na paleta Additional, no caso ele possui algumas formas geométricas, como círculos, quadrados, etc.. No caso o amigo Felipe Castro precisou de um acesso dinâmico aos componentes, possivelmente toda a criação deve de ser em tempo de execução, sendo assim você pode fazer um Find nos componentes pelo nome, ou então forçar a transformação da classe em TShape, no caso se pegar um componente errado e tentar forçar como TShape vai der erro...

[Pantoja 5]

TShape é um componente que pode ser acessado na paleta Additional, no caso ele possui algumas formas geométricas, como círculos, quadrados, etc.. No caso o amigo Felipe Castro precisou de um acesso dinâmico aos componentes, possivelmente toda a criação deve de ser em tempo de execução, sendo assim você pode fazer um Find nos componentes pelo nome, ou então forçar a transformação da classe em TShape, no caso se pegar um componente errado e tentar forçar como TShape vai der erro...

obrigado pela explicação esclrecedora amigo Theis!

 

 

show!!

[marcio.theis 3]

http://forum.imasters.com.br/public/style_emoticons/default/thumbsup.gif