From 9d9cd7e4407dfa9dde86e27449ca6f7c1ba1a8b7 Mon Sep 17 00:00:00 2001
From: Marc Durdin <marc@keyman.com>
Date: Mon, 12 Mar 2018 14:09:08 +0700
Subject: [PATCH] Test that project is present before attempting to check
 project options in build

---
 windows/src/developer/TIKE/compile/CompileKeymanWeb.pas | 5 ++++-
 1 file changed, 4 insertions(+), 1 deletion(-)

diff --git a/windows/src/developer/TIKE/compile/CompileKeymanWeb.pas b/windows/src/developer/TIKE/compile/CompileKeymanWeb.pas
index 1a8b647f8f..6557d893e6 100644
--- a/windows/src/developer/TIKE/compile/CompileKeymanWeb.pas
+++ b/windows/src/developer/TIKE/compile/CompileKeymanWeb.pas
@@ -344,7 +344,10 @@ begin
       Callback, CKF_KEYMANWEB) > 0 then  // I3482   // I4866   // I4865
       // TODO: Free fk
     begin
-      if AOwnerProject.CompilerMessageFile.HasCompileWarning and FCompilerWarningsAsErrors then
+      if Assigned(AOwnerProject) and
+          Assigned(AOwnerProject.CompilerMessageFile) and
+          AOwnerProject.CompilerMessageFile.HasCompileWarning and
+          FCompilerWarningsAsErrors then
         FError := True;
 
       if not FError then