OS caracteres de A a Z s�o uma seq��ncia num�rica decimal na TABELA ASCII,
portanto podes usar
Var c: Byte;
C := Ord('A');
Inc(c);
O caracter vc encontra em Chr(c);
Atenciosamente
-----Mensagem original-----
De: jmourajr2000 [mailto:[EMAIL PROTECTED]
Enviada em: quarta-feira, 9 de fevereiro de 2005 09:06
Para: [email protected]
Assunto: [delphi-br] Como criar uma Progress�o Alfab�tica
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
--
<<<<< 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
<*> 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
