end;
edit2.text := char(n1) + char(n2);
end;
Espero ter ajudado.
- Original Message -
From: "Michel Kafury Pael" <[EMAIL PROTECTED]>
To:
Sent: Friday, January 07, 2005 1:45 AM
Subject: [delphi-br] Incremento diferente
Bom pessoal, vou postar um problema que numc
[EMAIL PROTECTED]>
To:
Sent: Friday, January 07, 2005 1:45 AM
Subject: [delphi-br] Incremento diferente
Bom pessoal, vou postar um problema que numca vi.
Em um edit a pessoa pode digitar AA, AB, AC até chegar a ZZ e eu
tenho um botão para verificar: quando for AA muda para AB; quando for
AB
cia(SequenciaToInt(Edit1.Text)+1);
end;
end.
//
>From: "Fabiano Arndt" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: delphi-br@yahoogrupos.com.br
>Subject: RE: [delphi-br] Incremento diferente
>Date: Fri, 07 J
begin
iDiv := iDiv - 1;
iMod := tam;
end;
if iMod > 0 then
Result := s[iMod] + Result;
i := iDiv;
end;
if i > 0 then
Result := s[i] + Result;
end;
>From: "Michel Kafury Pael" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.b
gt; itamar roloff
> ---
> - Original Message -
> From: "Michel Kafury Pael" <[EMAIL PROTECTED]>
> To:
> Sent: Friday, January 07, 2005 1:45 AM
> Subject: [delphi-br] Incremento diferente
>
> Bom pessoal, vou p
<[EMAIL PROTECTED]>
To:
Sent: Friday, January 07, 2005 1:45 AM
Subject: [delphi-br] Incremento diferente
Bom pessoal, vou postar um problema que numca vi.
Em um edit a pessoa pode digitar AA, AB, AC até chegar a ZZ e eu
tenho um botão para verificar: quando for AA muda para AB; quando fo
Bom pessoal, vou postar um problema que numca vi.
Em um edit a pessoa pode digitar AA, AB, AC até chegar a ZZ e eu
tenho um botão para verificar: quando for AA muda para AB; quando for
AB muda para AC e isso até ZZ. Não tenho idéia de como fazer.
Michel
--
< FAVOR REMOVER ESTA PARTE
7 matches
Mail list logo