Browse Source

Update zgl_file.pas

Seenkao 4 years ago
parent
commit
def0d773a7
1 changed files with 3 additions and 3 deletions
  1. 3 3
      Zengl_SRC/src/zgl_file.pas

+ 3 - 3
Zengl_SRC/src/zgl_file.pas

@@ -190,14 +190,14 @@ begin
     FOM_CREATE: FileHandle := FpOpen(platform_GetRes(s + FileName), O_Creat or O_Trunc or O_RdWr);
     FOM_CREATE: FileHandle := FpOpen(platform_GetRes(s + FileName), O_Creat or O_Trunc or O_RdWr);
     FOM_OPENR:  FileHandle := FpOpen(platform_GetRes(s + FileName), O_RdOnly);
     FOM_OPENR:  FileHandle := FpOpen(platform_GetRes(s + FileName), O_RdOnly);
     FOM_OPENRW: FileHandle := FpOpen(platform_GetRes(s + FileName), O_RdWr);
     FOM_OPENRW: FileHandle := FpOpen(platform_GetRes(s + FileName), O_RdWr);
-    FOM_OPENW:  FileHandle := FpOpen(platform_GetRes(s + FileName), O_WRONLY);;
+    FOM_OPENW:  FileHandle := FpOpen(platform_GetRes(s + FileName), O_WRONLY);
   end;
   end;
 {$Else}
 {$Else}
   case Mode of
   case Mode of
     FOM_CREATE: FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_Creat or O_Trunc or O_RdWr);
     FOM_CREATE: FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_Creat or O_Trunc or O_RdWr);
     FOM_OPENR:  FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_RdOnly);
     FOM_OPENR:  FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_RdOnly);
     FOM_OPENRW: FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_RdWr);
     FOM_OPENRW: FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_RdWr);
-    FOM_OPENW:  FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_WRONLY);;
+    FOM_OPENW:  FileHandle := FpOpen(platform_GetRes(filePath + FileName), O_WRONLY);
   end;
   end;
 {$ENDIF}{$EndIf}
 {$ENDIF}{$EndIf}
   Result := FileHandle <> FILE_ERROR;
   Result := FileHandle <> FILE_ERROR;
@@ -662,7 +662,7 @@ begin
     Result := copy(Str, lenStr - (lenStr - pos) + 1, (lenStr - pos));
     Result := copy(Str, lenStr - (lenStr - pos) + 1, (lenStr - pos));
 end;
 end;
 
 
-// èìÿ
+// èìÿ
 function file_GetName(const FileName: UTF8String): UTF8String;
 function file_GetName(const FileName: UTF8String): UTF8String;
   var
   var
     tmp: UTF8String;
     tmp: UTF8String;