Portal Melhores Rádios Estereogramas Guia de Programação MDV Max Converter MDV Player
Função para adicionar barra ao final de um endereço (Delphi)

Função para adicionar barra ao final de um endereço (Delphi)

Função para adicionar barra ao final de um endereço (Delphi)

//Função para Adicionar Barra ao final de um Endereço
function funAdicionaBarraEndereco(pStrEndereco: String): String;
var
  strEnd: String;
begin
  strEnd := pStrEndereco;
  if strEnd[Length(strEnd)] '\' then
    strEnd := strEnd + '\';
  Result := strEnd;
end;