Massa.. era isso que eu tava precisando!! :)
Muito obrigado!
[]s
Vinicius
--- Em [EMAIL PROTECTED], "Vitor Luiz Redes"
<[EMAIL PROTECTED]> escreveu
> use o FindComponent, do próprio Form ...
>
> TPanel(FindComponent('Quadro'+IntToStr(Numero))).Color:=clBlack;
>
>
> "Três salvas aos bons livros.
> São o deleite dos sábios,
> a educação dos ignorantes
> e os verdadeiros feitos de nossa
> raça: Os Seres Humanos"
>
> Vitor Luiz Redes
> ------------------------------------
> Redsystem Informática
> ----- Original Message -----
> From: vinicius_mom
> To: [EMAIL PROTECTED]
> Sent: Friday, September 17, 2004 4:34 PM
> Subject: Re: RES: RES: [delphi-br] Concatenar variaveis (macro
substituição)
>
>
> Bom, então vamo lá..
>
> Eu acho que falta de concentração ou conhecimento (mais provavel
a
> segunda opção heahe) mas não to conseguindo resolver este
problema.
> Vamos supor que estou com 42 quadros na tela. Cada quadro
representa
> a possibilidade de um dia do mes estar marcado ali. Os quadros
> (paineis) começam com o nome Quadro1 e vai até o nome Quadro42.
>
> Se o dia da semana é terça feira, então deveria-se começar
> preenchendo o terceiro quadro (contando a partir de domingo).
Isso
> seria o Quadro3. Como vcs fariam para achar este quadro sem ser
por
> ifs ou case e, alem disso, colocar os outros valores nos quadros
> subsequentes?
>
> Obrigado pla ajuda,
>
> Vinicius
>
>
>
> --- Em [EMAIL PROTECTED], "Walter Chagas
> \(Desenvolvimento\)" <[EMAIL PROTECTED]> escreveu
> > > Oloco... deveria ter isso!!! Isso eh uma coisa tão importante
e os
> > > cara da borland não preveram?!?!?! :/
> > >
> >
> > Isso que voce quer é uma coisa que o Clipper fazia porque o
código
> fonte era
> > interpretado e não convertido em código puro de máquina. Não há
> como fazer
> > macrosubstituição no pascal. O que o pessoal faz é um recurso
> parecido mas
> > não é a mesma coisa.
> >
> > []s
> >
> >
> > Walter Alves Chagas Junior
> > Projeto e desenvolvimento de sistemas
> > CABTEC - Soluções em Código de Barras
> > Belo Horizonte - MG
> > Fone: (31) 2125-9019 - Fax: (31) 2125-9030
> > http://www.cabtec.com.br
> > [EMAIL PROTECTED]
> >
> >
> > ----- Original Message -----
> > From: "vinicius_mom" <[EMAIL PROTECTED]>
> > To: <[EMAIL PROTECTED]>
> > Sent: Friday, September 17, 2004 4:08 PM
> > Subject: Re: RES: RES: [delphi-br] Concatenar variaveis (macro
> substituição)
> >
> >
> > Oloco... deveria ter isso!!! Isso eh uma coisa tão importante e
os
> > cara da borland não preveram?!?!?! :/
> >
> > Agora a parte de contruir componente que nem foi comentado eu
não
> > consegui visualizar como seria... vc teria um exemplo?!
> >
> > []s
> >
> > Vinicius
> >
> >
> > --- Em [EMAIL PROTECTED], "Rubem Rocha" <[EMAIL PROTECTED]>
> > escreveu
> > > E não existe mesmo.
> > > []s
> > >
> > > -----Mensagem original-----
> > > De: Luciano R. Machado [mailto:[EMAIL PROTECTED]
> > > Enviada em: sexta-feira, 17 de setembro de 2004 15:02
> > > Para: [EMAIL PROTECTED]
> > > Assunto: Re: RES: [delphi-br] Concatenar variaveis (macro
> > substituição)
> > >
> > >
> > > Me desculpe pelo engano, deve ser o "efeito sexta-feira".
> > >
> > > Que eu saiba não há macro substituição no Delphi. :-(
> > >
> > > --
> > > Luciano Rodrigues Machado
> > > Programador - Ribeirão Preto-SP
> > >
> > > Márcio Francischinelli (DMAN) wrote:
> > >
> > > > Luciano, acho que não é bem essa a solução...
> > > > Acho que o que o Vinícius queria é uma macro substituição.
> > Exemplo:
> > > >
> > > > procedure TForm1.Button1Click(Sender: TObject);
> > > > var
> > > > t1, t2: string;
> > > > t3,t4: Double;
> > > > begin
> > > > t1 := 't';
> > > > t2 := '3';
> > > > t3 := 50;
> > > > t4 := t1 + t2;
> > > > end;
> > > >
> > > > Onde t4 deveria ficar com o valor de 50, através da soma
do
> > conteúdo
> > > > de duas variáveis retornando um nome de variável...
> > > >
> > > > Até agora procurei e não encontrei no Delphi... Alguém
sabe se
> > > > existe ???
> > > >
> > >
> > >
> > >
> > >
> > > --
> > > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
>>>>>
> > >
> > > Para ver as mensagens antigas, acesse:
> > http://br.groups.yahoo.com/group/delphi-br/messages
> > >
> > > Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
> > ou [EMAIL PROTECTED]
> > >
> > > Links do Yahoo! Grupos
> >
> >
> >
> > --
> > <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> >
> > Para ver as mensagens antigas, acesse:
> > http://br.groups.yahoo.com/group/delphi-br/messages
> >
> > Para falar com o moderador, envie um e-mail para:
> > [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> >
> > Links do Yahoo! Grupos
>
>
>
> --
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
>
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
>
>
>
> Yahoo! Grupos, um serviço oferecido por:
>
>
>
> --------------------------------------------------------------------
----------
> Links do Yahoo! Grupos
>
> a.. Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>
> b.. Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>
> c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos
do Serviço do Yahoo!.
>
>
>
> [As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
<*> Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
<*> Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
