System.SysUtils
//
function IncludeTrailingBackslash(const S: string): string;
begin
Result := IncludeTrailingPathDelimiter(S);
end;
//
function IncludeTrailingPathDelimiter(const S: string): string;
begin
Result := S;
if not IsPathDelimiter(Result, High(Result)) then
Result := Result + PathDelim;
end;
沒有留言:
張貼留言