Changeset 74 for trunk/IDE/Forms/UFormMain.pas

Timestamp:

Jan 18, 2018, 11:54:13 PM (6 years ago)

Author:

chronos

Message:

• Fixed: Build under Lazarus 1.8.0.

File:

• trunk/IDE/Forms/UFormMain.pas (modified) (2 diffs)

trunk/IDE/Forms/UFormMain.pas

@@ -508 +508 @@
 
   if Core.ReopenLastOpenedFile and (Core.LastOpenedFiles.Items.Count > 0) then
-  if FileExistsUTF8(Core.LastOpenedFiles.Items[0]) then
+  if FileExists(Core.LastOpenedFiles.Items[0]) then
     Core.ProjectOpen(Core.LastOpenedFiles.Items[0]);
 
@@ -584 +584 @@
 begin
   FormSourceCode.Save;
-  if not FileExistsUTF8(Core.Project.FileName) then AProjectSaveAs.Execute
+  if not FileExists(Core.Project.FileName) then AProjectSaveAs.Execute
     else Core.Project.SaveToFile(Core.Project.FileName);
 end;