Como verificar se o numero e decimal

15/12/2003

1

Desenvolvi uma aplicação frente de Loja, mas gostaria de vincular a unidade do produto com a quantidade que ele aceita.

Por exemplo se for PC(PEÇA) UN (unitário) LT (lata) Sc (Saco) elenão pereá aceitas numeros com casas decimais, e se for KG(quilo), MT(metro), ele aceitaria.

Poderia tratar isto com uma máscara, mas primeiro colocamos a quantidade e depois o codigo de barras
Como verificar se a quantidade informada tem casa decimais ??

Agradeço a todos

T+


Responder

Posts

16/12/2003

Vanius

Bom dia Emery.

Nao entendi direito mas, vamos tentar.

Vc pode colocar no evento OnKeyPress do edit de quantidade o seguinte:

begin
if (Tipo IN [´PC´, ´UN´, ´LT´, ´SC´]) and (Key IN [´,´ , ´.´]) then
Key := #0;
{ Desta forma se vc escolher um dos tipos acima e for digitado
, ou . seu sistema irá ignora o . ou , como se o user não tivesse digitado nada.
}
end;

tente fazer isto.
Se não der me manda um mail.


Abraços,


Vanius Girodo
vaniusg@yahoo.com.br


Responder