From 4e8e6440dcaf0ec9ae248e2965699021d23fa57c Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 7 Apr 2012 12:15:04 +0000
Subject: [PATCH] IDE: info need build: project

git-svn-id: trunk@36655 -
---
 ide/ideinfoneedbuild.pas | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/ide/ideinfoneedbuild.pas b/ide/ideinfoneedbuild.pas
index e4ede8b3ed..0e884b259e 100644
--- a/ide/ideinfoneedbuild.pas
+++ b/ide/ideinfoneedbuild.pas
@@ -230,7 +230,7 @@ var
   Pkg: TLazPackage;
   AProject: TProject;
   NeedBuildAll: boolean;
-  PGNeedBuild: TModalResult;
+  NeedBuild: TModalResult;
 begin
   NewTargets:=GetTargets(TargetComboBox.Text);
   try
@@ -279,15 +279,23 @@ begin
         // no check available
       end
       else if Item.Target is TProject then begin
-        // ToDo
-
+        AProject:=TProject(Item.Target);
+        Item.Note:='';
+        NeedBuild:=MainBuildBoss.DoCheckIfProjectNeedsCompilation(AProject,
+                                         NeedBuildAll,Item.Note);
+        if NeedBuild=mrYes then begin
+          if NeedBuildAll then
+            Item.NeedBuild:=inbClean
+          else
+            Item.NeedBuild:=inbNormal;
+        end;
       end
       else if Item.Target is TLazPackage then begin
         Pkg:=TLazPackage(Item.Target);
         Item.Note:='';
-        PGNeedBuild:=PackageGraph.CheckIfPackageNeedsCompilation(
+        NeedBuild:=PackageGraph.CheckIfPackageNeedsCompilation(
                              Pkg,SkipDesignTimePackages,NeedBuildAll,Item.Note);
-        if PGNeedBuild=mrYes then begin
+        if NeedBuild=mrYes then begin
           if NeedBuildAll then
             Item.NeedBuild:=inbClean
           else