Uma maneira q conheço não é bem como uma macro substituição que existia em
outras linguagens..
é mais ou menos assim:

Existe uma função dentro do Form chamada FindComponent, no qual vc passa o
nome do objeto como parametro. Se a função encontrar o objeto, ele retornará
ele ai vc faz um typecast para a classe do seu componente, se não retorna
nil.

tipo assim:

var
  temp : TObject;
  myLabel : TLabel;
begin
  temp := FindComponent('MeuLabel01');
  if Assigned(temp) then
    begin
      myLabel := TLabel(temp);
      //faça seu codigo
    end;

end;

espero ter ajudado.. falow


2009/7/13 bene20032004 <bene20032...@yahoo.com.br>

>
>
> Como faço para usar macro no delphi ?
> Ex:
> bitbtn1.Caption
> quero substituir o 1 do bitbtn por uma variavel numerica
> Tem como fazer isto ?
> Muito obrigado por enqunto !
>
>  
>



-- 
Thales Eduardo Barros de Oliveira
Desenvolvedor Delphi / Firebird / Java
Emails:
tebosoftw...@gmail.com (GoogleTalk)
thales_...@hotmail.com (MSN)
Blog:
http://tebosoftware.blogspot.com/
Twitter:
http://twitter.com/tebosoftware

"Tente ser uma pessoa de valor, não de sucesso"
Albert Einstein


[As partes desta mensagem que não continham texto foram removidas]

Responder a