PAGUE 6 MESES
LEVE 12 MESES
GARANTIR DESCONTO

Fórum Uma ajuda pelo amor de DEEEEEEUS!! #203924

02/01/2004

0

Ola amigos, é o seguinte:

Tenho uma tabela com o campo CODIGO em string e gostaria de gravar nele forma aleatórias com letras e numeros. Estou usando o seguinte código:

var 
i: integer; 
const 
str = ´0123456789ABCDE´; 
max = 4; 
begin 
for i:= 1 to max do 
begin 
  TabelaCODIGO.Text:=  TabelaCODIGO.Text + str[random(length(str)) + 1]; 
end; 



No OnNewRecord eu coloco esse codigo, toda vez que vou inserir ele gera a combinação e mostra no DBEdit. Até ai ok. Porém ele repete as vezes o mesmo numero, entao quero que seja feita uma busca do mesmo numero gerado antes de mostrar no DBEdit. Caso seja igual ele gere um novo, se nao for igual mostre.

Gostaria do CÓDIGO FONTE desda função com urgencia se possivel, pois so me deram dicas, mas nao saiu do papel. Quero o codigo mesmo escrito.

Um abraço


Njunior

Njunior

Responder

Utilizamos cookies para fornecer uma melhor experiência para nossos usuários, consulte nossa política de privacidade.

Aceitar