José,

Use para isto a função Chr().

Letra A = 65, então,
Inteiro=1;
Chr(64+Inteiro) = 'A'
Inteiro=2;
Chr(64+Inteiro) = 'B'
Inteiro=3;
Chr(64+Inteiro) = 'C'
etc...

[ ]´s
Moacir

jmourajr2000 escreveu:

>Caros amigos, bom dia!
>
>Estou necessitando criar uma Progressão Alfabética, onde:
>
>Tenho um Número de Protocolo(Integer) e preciso incrementar a este 
>Protocolo uma letra(de A a Z), dependendo da quantidade ou número de 
>vezes que o cliente usar um determinado Protocolo.
>Sei que terei que mudar o campo, na tabela, de Integer para String, 
>ou criar um campo adicional para isso. Mas como faço para incrementar 
>essa Progressão?
>
>Com um Integer faço assim:
>
>  X : Integer
>
>  X := X + 1;
>
>Agradeço a atenção e abraços a todos.
>
>José de Moura
>
>
>
>
>
>  
>


-- 
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.300 / Virus Database: 265.8.6 - Release Date: 7/2/2005



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