English
Español
BuscaLinhaTexto
Esta função é utilizada para imprimir as linhas do texto que a função QuebraTexto dividiu.
Sintaxe: BuscaLinhaTexto(Alfa Texto,Numero NroLin,Alfa End LinTex);
Parâmetros:
| Nome | Tipo | Descrição |
|---|---|---|
| Texto | Alfa | Será o mesmo Campo ou Variável indicado na função QuebraTexto. |
| NroLin | Numero | Campo, Valor ou Variável que indicará qual a linha que será impressa. |
| LinTex | Alfa | Variável que retornará a parte do Texto que será impressa. |
Tipo de retorno:LinTex: Variável alfanumérica que retornará a parte do Texto que será impressa.
Exemplo:
@ Deseja-se imprimir o texto 'Vamos ver o que acontece quando usamos estas funções para controle de impressão de linhas de um texto mais extenso' @
@ em linhas de no máximo 30 caracteres cada. @
Definir Alfa vTexto;
Definir Alfa vFrase;
vTexto = "Vamos ver o que acontece quando usamos estas funções para controle de impressão de linhas de um texto mais extenso";
QuebraTexto (vTexto,30,vNumLin);
vLinAtu = 1;
Enquanto vLinAtu <= vNumLin
Inicio
BuscaLinhaTexto (vTexto,vLinAtu,vFrase);
ListaSecao ("Adicional_1");
vLinAtu++;
Fim;
Utilização da Função (dependentes): Nenhuma.
English
Español
