|
|
دليل استخدام إجراءات VBAppAss.dllللمبرمجين بلغة Visual Basic 6.0 |
إزالة الشرطة المائلة (Backslash) من نهاية مسار (Path).
الصيغة:
Function RemoveBackslash(APath As String) As String
الصنف:
TFileSystem.
الوسائط (Parameters):
| APath | المسار المطلوب إزالة الشرطة المائلة من نهايته. |
الشرح:
تقوم هذه الدالة بإعادة المسار المحدد بالبارامتر APath نفسه مع
إزالة الشرطة المائلة من نهايته، فإذا كان APath لا ينتهي أصلاً بشرطة مائلة
فإنها تعيده كما هو، و إذا كان منتهياً بشرطة مائلة فإنها تحذفها. أما في حالة كون البارامتر APath
نصاً فارغاً (Empty string, "") فإنها أيضاً تعيد نصاً فارغاً.
الدالة RemoveBackslash لا تتأكد ما إذا كان المسار المحدد في البارامتر APath
موجوداً فعلاً أم لا. إنها فقط تحذف الشرطة المائلة من نهاية النص.
الاستخدام:
Dim ObjFileSystem As New TFileSystem
Text1.Text = ObjFileSystem.RemoveBackslash(Dir1.Path)
انظر أيضاً:
الدالة AddBackslash