Buscar por:
Código Function AddBarra(S: string): string; var Temp: string; begin Temp := S; if S[Length(Temp)] <> '' then Temp := Temp + ''; Result := Temp; end;
Function AddBarra(S: string): string; var Temp: string; begin Temp := S; if S[Length(Temp)] <> '' then Temp := Temp + ''; Result := Temp; end;
Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009