Definindo Constantes para a Aplicação
|
Início Anterior Próximo |
|
Estado := 6; //Ilegível -> Dificil manutenção
|
(....)
|
Estado := TRANSFERENCIA; //Facilidade de manutenção
|
|
|
const
|
|
//AS CONTANTES SERÃO DEFINIDAS AQUI
|
//Você deve digitar a palavra const também
|
|
var
|
Form1: TForm1;
|
|
|
implementation
|
|
{$R *.DFM}
|
|
|
const
|
|
// Estados de Atendimento
|
NADA = 1;
|
BOASVINDAS = 3;
|
ESPERA_DIGITOS_MENU = 4;
|
ESPERA_DIGITOS_RAMAL = 5;
|
TRANSFERENCIA = 6;
|
TENTEMAISTARDE = 7;
|
SUBMENU = 8;
|
ESPERA_SUBMENU = 9;
|
|
|
const
|
|
// Estados de Atendimento
|
NADA = 1;
|
BOASVINDAS = 3;
|
ESPERA_DIGITOS_MENU = 4;
|
ESPERA_DIGITOS_RAMAL = 5;
|
TRANSFERENCIA = 6;
|
TENTEMAISTARDE = 7;
|
SUBMENU = 8;
|
ESPERA_SUBMENU = 9;
|
|
//Estado de Ramais
|
LIVRE = 0;
|
OCUPADO = 1;
|
NAOATENDE = 2;
|
|
//Estados de Flash
|
DISCA = 0;
|
RETOMA = 1;
|
|
|
const
|
|
(...colocar abaixo dos estado de flash.....)
|
|
//Ramais de fuga (telefonista, portaria, etc...)
|
RAMAL_FUGA1 = '220';
|
RAMAL_FUGA2 = '222';
|
|
//Toque para retomada da ligacao em caso do ramal
|
//não atender
|
NUMTOQUESRETOMADA = 5;
|