Fórum de Suporte Digivoice
Você não está logado.
Olá,
quando atendo a chamada, imediatamente chamo a msg para digitar o codigo com 5 caracteres usando o GetDigits
procedure TForm1.VLib_1PlayStop(ASender: TObject; Port,
StopStatus: Smallint);
begin
case StopStatus of
ssNormal:
begin
case Estado[Port] of
CODIGO:
begin
InsereDado(Port,'Pedindo CODIGO');
VLib_1.GetDigits(port, 5, '#,*', 7000, 4000);
exit
end;
end; {case}
end;
end; {case}
end;
O prob q ocorre é q qdo estou digitando e ao chegar no 5 digito ele não pula para o proximo passo. Passa somente para o proximo campo qdo estoura o tempo.
Offline