ProcuraEnter
Esta função Procura um caractrer que indica "enter" ou nova linha(#13 ou #10) em uma string e retorna a string antes do primeiro enter, e o restante da string original, em variáveis separadas.
Sintaxe: ProcuraEnter(Alfa StrProcura, alfa end StrImp,alfa end StrResto) ;
Parâmetros:
Nome | Tipo | Descrição |
---|---|---|
StrProcura | String na qual será procurada o enter ou nova linha (#13 ou #10). | |
StrImp | A Primeira parte da string procurada, até o primeiro caracter que indica nova linha (retorno). | |
StrResto | O Restante da string, depois do primeiro caracter que indica nova linha (retorno). |
Tipo de retorno:
- StrImp: A Primeira parte da string procurada, até o primeiro caracter que indica nova linha.
- StrResto: O Restante da string, depois do primeiro caracter que indica nova linha.
Exemplo: Um exemplo de sua utilização é nas observações de Notas Fiscais;
Definir Alfa StrProcura;
Definir Alfa StrImp;
Definir Alfa StrResto;
ProcuraEnter(StrProcura, StrImp, StrResto);
Utilização da Função (dependentes): Nenhum dependente.
Observações: Para imprimir cada obs separada por enter basta mandar imprimir a variável StrImp e depois procurar sempre pela StrResto.