[delphi-br] Laço com uppercase e lowercase

2005-08-31 Por tôpico Eduardo Silva ®
Galera, com a rotina abaixo eu quase conegui chegar no que eu quero. Coloquei um timer, interval = 2000. O problema é que ele ta muito rápido e fica parado muito tempo no final da ultima letra. Algupém tem uma saída mais "elegante"? Obs: testei várias configurações e não cheguei num número idea

RES: [delphi-br] Laço com uppercase e lowercase

2005-08-30 Por tôpico Eduardo Silva ®
de agosto de 2005 14:25 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Laço com uppercase e lowercase não sei se tá certo, pois fiz direto no email. Mas com certeza a "lógica" é essa e ainda tem como otimizar... procedure maluca(aTexto: string); var i: integer;

Re: [delphi-br] Laço com uppercase e lowercase

2005-08-30 Por tôpico José Henrique
não sei se tá certo, pois fiz direto no email. Mas com certeza a "lógica" é essa e ainda tem como otimizar... procedure maluca(aTexto: string); var i: integer; begin for i := 1 to length(aTexto) do begin aTexto := lower(aTexto); aTexto[i] := upper(aTexto[i]); showMessage(aTexto); end; Abr

[delphi-br] Laço com uppercase e lowercase

2005-08-30 Por tôpico Eduardo Silva ®
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