Baixe o app para aproveitar ainda mais
Esta é uma pré-visualização de arquivo. Entre para ver o arquivo original
------------------------------------manipulação de texto-------------------------------------------- string {possui no máximo 255 caracteres} string[120] {aqui você determina a quantidade máxima de caracteres do seu texto, nesse caso determinei 120} função:length(string); {função para contar o número de caracteres de uma uma variável string} EXEMPLO: var texto:string; quantidade:integer; begin texto:='Exemplo"; quantidade:= length(texto); {variável quantidade receberá o número de caracteres que o texto contém ,espaço tmb conta como uma caractere, nesse caso ela receberá 7} ----------função upcase-------------- função:upcase(string); {A função upcase é usada para deixar o texto todo MAIÚSCULO funcina tipo como um caps lock} EXEMPLO: var texto:string; begin texto:='Computação-UVA'; {ficando assim: COMPUTAÇÃO-UVA } texto:=upcase(texto); end. -------------função lowercase----------- função:lowercase(string); { função usada para deixar todo o texto em minúsculo } EXEMPLO: var texto:string; begin texto:='Computação-UVA'; { ficando assim: computação-uva } texto:=lowercase(texto); end. --------------------concatenação de caracteres------------ função concat(string, string, ...); {Serve para juntar duas ou mais variáveis do tipo string } EXEMPLO: var texto1, texto2, unindo:string; Begin texto1:='Computação-'; texto2:='UVA'; unindo:=concat(texto1, texto2); { ficando asssim: Computação-UVA } end. --------------------- substring----------------------- função copy(string) {É usada para tirar uma parte do texto de uma variável string} EXEMPLO: var texto:string; Begin texto:='Computação-UVA'; texto:=copy(texto,12,14); { texto é o nome da variável, 12 é a caractere inicial em que ele vai começar a pegar e 14 é a última caractere que ele vai pegar} {ficando assim: UVA } end. ----------------------inserir string em uma string-------------- procedimento insert(string a ser inserida, string de destino, posição) { usada para colocar uma string dentro de outra string} var texto1, texto2:string; Begin texto1:='ComputUVA'; texto2:='ão-'; insert(texto2, texto1, 7); { ele irá inserir o texto2 no texto1, onde o caractere 1 do texto2 será o caractere 7 no texto1 ficando assim: Computação-UVA } End. -------------------localizar uma string em uma string----------------------- função: pos(string a ser procurada,string) {você escreve primeiro oq vc quer procurar e depois onde quer procurar} EXEMPLO var texto:string; posição:integer; Begin texto:='Computação-UVA'; posição:=pos('UVA',texto); { Ele irá procurar a de caractere por caractere até encontrar UVA quando encontrar ele indicarar em qual caractere está localizado a primeira caractere de UVA nesse caso irá indicar na variável posição: 12, caso ele não encontrar irá indicar 0} End. ---------------------deletar uma string de uma string--------------------------- procedimento: delete(string, início, quantidade); { primeiro coloca-se a variável em que quer procurar, depois o caractere inicial e depois a quantidade de caracteres} EXEMPLO: var texto:string; Begin texto:= 'Computação-UVA'; delete(texto, 11, 4); { ele irá apagar apartir do caractere 11, incluindo o próprio caractere 11, até que tenha apagado 4 caractere, ou seja, ele irá apagar do 11 ao 14 que dá exatamente 4 caracteres} End. ---------------------------conversão de texto em número------------------ procedimento: val(string a ser convertida, variável numérica, variável de teste); {primeiro indicar a variável string em que se quer converter, depois a variável que irá receber os valores numéricos contidos na variável string e por último a variável que indicarar se todos são numeros ou se tem alguma caractere que não seja número} EXEMPLO: var texto:string; numero, teste:integer; Begin texto:= '123456'; val(texto, numero, teste); { variável numero receberá 123456, variável teste receberá 0 pq ele não encontrará nenhuma caractere que não seja um número} End. EXEMPLO COM UMA CARACTERE NO MEIO DOS NÚMEROS: var texto:string; numero, teste:integer; Begin texto:= '1234B6'; val(texto, numero, teste); {variável teste receberá 5 pq ele encontrará no QUINTO caractere um não número} End. ---------------conversão de número em texto------------------- procedimento: str(variável numérica, variável string); { primeiro colocar a variável numérica depois indicar a variável de texto} var texto:string; numero:integer; Begin numero:= 1234; str(numero, texto); {texto receberá '1234'} End.
Compartilhar