Lazarus - Funcoes de tratamento de Strings

Sysutils é uma unit do Free Pascal que implementa várias funções/procedimentos utilitários e tem a vantagem de ser multiplataforma. Esses utilitários são organizados em grupos e dentre eles podemos destacar: as rotinas de conversão de dados, as rotinas de data e hora, as rotinas de formatação de strings e as rotinas de manipulação de strings.

Destacamos neste post as funções/procedimentos de manipulação de strings:

LeftStr(const s: string; n: integer): string;

Retorna os n primeiros caracteres da string s. Por exemplo:

var
   s: string;
begin
   s: 'Free Pascal'; 
   writeln(LeftStr(s, 4)); // imprime Free
end;

RightStr(const s: string; n: integer): string;

Retorna os n últimos caracteres da string s. Por exemplo:

var
   s: string;
begin
   s: 'Free Pascal'; 
   writeln(RightStr(s, 1));  // imprime "l"
end;

Neste caso o exemplo pega o último caractere de uma string e imprime na tela.

Trim(const s: string): string;

Retira os espaços das extremidades da string s. Por exemplo:

var
   s: string;
begin
   s: '  Free Pascal  '; 
   writeln(Trim(s));  // imprime "Free Pascal"
end;

TrimLeft(const s: string): string;

Retira os espaços no início da string s. Por exemplo:

var
   s: string;
begin
   s: '  Free Pascal  '; 
   writeln(TrimLeft(s));  // imprime "Free Pascal  "
end;

TrimRight(const s: string): string;

Retira os espaços do final da string s. Por exemplo:

var
   s: string;
begin
   s: '  Free Pascal  '; 
   writeln(TrimRight(s));  // imprime "  Free Pascal"
end;

A função LowerCase(const s: string): string; converte s para caixa baixa. E a função UpperCase(const s: string): string; converte s para caixa alta. Existem muitas outras funções de tratamento de strings em sysutils. Inclusive funções para AnsiString e null-terminated. Num próximo post falaremos de outras funções dessa unit.