FÓRUM DigiVoice

Srs,

Estou usando a seguinte linha abaixo para me falar uma mensagem caso o codigo esteja errado.

procedure TForm1.VerificaCodigo_Senha(Port:Integer;xCodigo,xSenha:String);
begin
    If Codigo_e_Senha='invalido' then
      begin
           CodUsu := '';
           SenhaUSU := '';
           VLib_1.PlayListClear(Port);
           VLib_1.PlayListAdd(Port,ptFile,Diretorio+'F005.wav','F005.wav', 0);
           VLib_1.PlayListAdd(Port,ptFile,Diretorio+'F003.wav','F003.wav', 2);
           ret := VLib_1.PlayList(Port,'');
           Estado[Port] := CODIGO1;
      end
end;

A placa só está falando a mensagem F003.

Porque isto ocorre ?

Obrigado pelas colaborações anteriormente enviadas.

Att. Luciano