---

■スレッドリストへ戻る■ 全部 1- 最新50

MonaUtils

65 ：turbotypeD@monazilla.org(ｗ ：2001/04/10(火) 21:46

IncludeTrailingBackslashのソース。function IncludeTrailingBackslash(const S: string): string;
begin
　Result := S;
　if not IsPathDelimiter(Result, Length(Result)) then Result := Result + '\';
end;

25KB

---

新着レスの表示

---

スレッドリストへ戻る 全部 前100 次100 最新50

0ch BBS 2004-10-30