Dúvida como gerar cartelas premiadas - Como fazer?

Delphi

29/05/2006

Preciso imprimir 12.000.000 cartelas, numeradas de 00.000.001 a 12.000.000. Neste universo, existem 3.900 cartelas premiadas onde estas cartelas tem uma letra de identificação que diz se elas são premiadas ou não.
As cartelas premiadas tem a letra X dizendo que elas são premiadas.
As cartelas não premiadas tem a letra Z dizendo que não são premiadas.

exemplo
00.000.001 Z
00.000.002 Z
00.000.003 X
.
.
.
12.000.000 X


Facc

Facc

Curtidas 0

Respostas

_rodfaria_

_rodfaria_

29/05/2006

Procure por random e randomize no help.

Essa lógica de uma letra definir se é premiada ou não é muito manjada.
Não vai demorar muito para o vendedor de cartelas sacar que entre centenas que ele tem na mão apenas uma ou outra tem X (ou sei lá que letra você vai por).

Não sou especialista nisso, mas sugiro um algoritmo mais elaborado.

Segue um exemplo meia boca:
Se a cartela é premiada:
Se o primeiro número é par, a letra é qualquer uma entre A, M, J, K
Se o primeiro número é ímpar, a letra é qualquer uma entre I, P, X
Se a cartela não é premiada, a letra é qualquer outra restante.


GOSTEI 0
Facc

Facc

29/05/2006

Procure por random e randomize no help. Essa lógica de uma letra definir se é premiada ou não é muito manjada. Não vai demorar muito para o vendedor de cartelas sacar que entre centenas que ele tem na mão apenas uma ou outra tem X (ou sei lá que letra você vai por). Não sou especialista nisso, mas sugiro um algoritmo mais elaborado. Segue um exemplo meia boca: Se a cartela é premiada: Se o primeiro número é par, a letra é qualquer uma entre A, M, J, K Se o primeiro número é ímpar, a letra é qualquer uma entre I, P, X Se a cartela não é premiada, a letra é qualquer outra restante.


entendi o que vc quis dizer, mas essa numeração não saíra na cartela, é apenas para informar a impressora que o numero tal setado com o ´X´ deverá ser impressa com a combinação de 3 números iguais, igual as raspadinhas da CEF.


GOSTEI 0
POSTAR