Changeset 108 for trunk/UTarget.pas

Timestamp:

May 6, 2019, 1:41:36 PM (6 years ago)

Author:

chronos

Message:

• Modified: Do not use old UTF8 functions variants.

File:

• trunk/UTarget.pas (modified) (2 diffs)

trunk/UTarget.pas

@@ -420 +420 @@
   end;
   if CompilerPath <> '' then begin;
-    if FileExistsUTF8(CompilerPath) then
+    if FileExists(CompilerPath) then
     try
       Process := TProcess.Create(nil);
@@ -457 +457 @@
     'compiled' + DirectorySeparator + Name + DirectorySeparator +
     ExtractFileNameOnly(ProjectFileName) + RunExtension;
-  if not FileExistsUTF8(ExecutorPath) then
+  if not FileExists(ExecutorPath) then
     raise Exception.Create(Format(SExecutorNotFound, [ExecutorPath]));
   if FileExists(CompiledFile) then