Changeset 434 for Common/UURI.pas

Timestamp:

Nov 19, 2012, 2:31:00 PM (12 years ago)

Author:

chronos

Message:

• Modified: Confused TRegistryEx property Context with Context parameter in some methods.
• Fixed: TURI path was not properly handled in case of file in root directory.

File:

• Common/UURI.pas (modified) (1 diff)

Common/UURI.pas

@@ -326 +326 @@
     Drive := Drive + DriveSeparator;
   end else Drive := '';
-  Directory.AsString := AValue;
+  if (Drive <> '') and (AValue = '') then
+    Directory.AsString := Directory.DirSeparator
+    else Directory.AsString := AValue;
 end;