Macro substituição, a grosso modo, seria interpretar uma representação literal (a.k.a., uma string) e retornar um valor correspondente ao tipo de dados que a expressão deve retornar. O código ilustrado, pura e simplesmente, não passa de uma rotina para identificação de objetos. Isto não é macro-substituição.
Sds. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Jose Newton Araujo Enviada em: segunda-feira, 29 de junho de 2009 07:23 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Macro Substituição Como o amigo classifica o procedimento abaixo ? Como disse anteriormente, esta rotina simula uma MACRO-SUBSTITUIÇÃO no Delphi, e funciona perfeitamente. procedure TufrmPlaneja.MostraMacrosubs; Var iVezes : Byte; iComponentes : Byte; begin iComponentes := TabSheet4.ComponentCount - 1; for iVezes := 1 To iComponentes do begin if TabSheet4.Components[iVezes] is (TCheckBox) then begin ShowMessage (TCheckBox(TabSheet4.Components[iVezes]).Caption ) ; end; end; end; De: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> [mailto:delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> ] Em nome de Rubem Nascimento da Rocha Enviada em: segunda-feira, 29 de junho de 2009 03:34 Para: delphi-br Assunto: RE: [delphi-br] Macro Substituição Prioridade: Alta Companheiro, cada coisa no seu devido lugar. O conceito de macro-substituição é conhecido para aqueles que, assim como vc e eu, desenvolveram aplicações em linguagens xBase (dBase, FoxPro, Clipper, Joiner, etc.). Este conceito é inerente, portanto, a estas linguagens citadas. Por ser uma linguagem, em essência, interpretada, ela permite esse tipo de sintaxe. Já em Object Pascal isso não existe, pois além de ser uma linguagem onde o resultado final é código puro de 32 bits e não um código pseudo-compilado e interpretado, isso não faz parte da especificação da linguagem. Ou seja, não existe o conceito de macro-substituição em Delphi/Object Pascal. Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> <mailto:delphi-br%40yahoogrupos.com.br> From: jose.new...@jnewton.com.br <mailto:jose.newton%40jnewton.com.br> <mailto:jose.newton%40jnewton.com.br> Date: Fri, 26 Jun 2009 21:53:15 -0300 Subject: [delphi-br] Macro Substituição Algum dos colegas se lembra do Clipper? Quem conhece um método para macro-substituição no Delphi? (no 7). Jose Newton [As partes desta mensagem que não continham texto foram removidas]