Pra colocar uma animação no caption do meu formulário principal....

OBS: ainda não consegui resolver esse problema, rs
  -----Mensagem original-----
  De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Luciane Coimbra
  Enviada em: terça-feira, 30 de agosto de 2005 17:05
  Para: delphi-br@yahoogrupos.com.br
  Assunto: Re: [delphi-br] Re: Laço com uppercase e lowercase


  Curiosidade: pra que vc quer esta rotina?

  Abraço

  ----- Original Message -----
  From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
  To: <delphi-br@yahoogrupos.com.br>
  Sent: Tuesday, August 30, 2005 4:44 PM
  Subject: RES: [delphi-br] Re: Laço com uppercase e lowercase


  e tem mais outro problema, eu quero que isso fique se repetindo
  indefinidamente.....se eu deixar o micro ligado por dias eu não quero que
a
  rotina pare depois de 100 vezes...
    -----Mensagem original-----
    De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
  nome de Leandro
    Enviada em: terça-feira, 30 de agosto de 2005 16:29
    Para: delphi-br@yahoogrupos.com.br
    Assunto: Re: [delphi-br] Re: Laço com uppercase e lowercase


    coloque:

    Application.ProcessMessages;

    antes de iniciar o laço.

    Leandro

    ----- Original Message -----
    From: "Eduardo Silva ®" <[EMAIL PROTECTED]>
    To: <delphi-br@yahoogrupos.com.br>
    Sent: Tuesday, August 30, 2005 3:30 PM
    Subject: RES: [delphi-br] Re: Laço com uppercase e lowercase


    > Funcionou quase perfeito, eu só não consigo fechar o form agora, tenho
  que
    > ir no delphi e fechar a aplicação, caso contrário, não fecha, fica
tudo
    > travado...
    >
    > -----Mensagem original-----
    > De: delphi-br@yahoogrupos.com.br
[mailto:[EMAIL PROTECTED]
    > nome de Stock
    > Enviada em: terça-feira, 30 de agosto de 2005 14:38
    > Para: delphi-br@yahoogrupos.com.br
    > Assunto: [delphi-br] Re: Laço com uppercase e lowercase
    >
    >
    > eu nao sei pra que precisa disso, mas veja se te ajuda:  coloque num
  form
    um
    > edit, um label e um botao e no onclik do botao o
    > seguinte codigo,.,   procedure TForm1.BitBtn1Click(Sender: TObject);
var
    > i,a:integer; begin for i:=0 to 100 do     begin     for a:=1 to
    > length(edit1.text) do         begin
    > label1.Caption:=copy(edit1.Text,1,a-1)+uppercase(copy(edit1.text,a
    > 1))+copy(edit1.text,a+1,length(edit1.text)-(a-1));
    > application.ProcessMessages;         sleep(1000);         end;
end;
    end;
    > ele ira fazer o que pede num intervalo de 1 segundo cada letra...
    > [EMAIL PROTECTED] 600 modelos de sites profissionais - Imperdivel
    > http://www.kitsites.com/index.php?ref=50   -------Original
  Message-------
    > From: Eduardo Silva ® Date: 08/30/05 14:19:32 To: Grupo Delphi-br
  Subject:
    > Laço com uppercase e lowercase   Galera preciso fazer uma rotina
(laço)
  de
    > modo que ele passe letra por letra deixando a letra que ela esta
  passando
    no
    > momento maiúscula e ao sair da letra ela fique minúscula, assim:
  Teste
    > tEste   teSte   tesTe   testE     Teste   tEste   teSte   tesTe
testE
    > E assim sucessivamente...     Alguem tem alguma dica?
    > ~\\|//~                     -(o o)-
    > o--------------oOOOo--(_)--oOOOo-------------o |
    > | |           Eduardo de Almeida Silva         | |   Câmara Municipal
de
    > Lençóis Paulista     | |  [EMAIL PROTECTED]  -   (14)3263-0326   |
|
    > | |                .oooO   Oooo.               |
    > ---------------(   )---(   )---------------o                   \
(     )
  /
    > \_)   (_/       -- <<<<< 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
    >
    > [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
    >
    >
    >
    >
    >
    >
    >
    >
    >
    >
    > __________ NOD32 1.1204 (20050829) Information __________
    >
    > This message was checked by NOD32 antivirus system.
    > http://www.nod32.com
    >
    >
    >
    >
    > --
    > <<<<< 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:
                PUBLICIDADE




  --------------------------------------------------------------------------
--
  --
    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!.



    __________ NOD32 1.1204 (20050829) Information __________

    This message was checked by NOD32 antivirus system.
    http://www.nod32.com


  [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












  --
  <<<<< 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:
              PUBLICIDADE




----------------------------------------------------------------------------
--
  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!.



  __________ NOD32 1.1205 (20050830) Information __________

  This message was checked by NOD32 antivirus system.
  http://www.nod32.com


[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

 


Responder a