From 666f004e4cd404c74023c96817902dbb5abbd512 Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Sat, 6 Dec 2014 13:32:48 +0000
Subject: [PATCH] lcl: fixed compilation WinCE

git-svn-id: trunk@47122 -
---
 lcl/lresources.pp | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/lcl/lresources.pp b/lcl/lresources.pp
index 3866d14af1..d0bd1b1c32 100644
--- a/lcl/lresources.pp
+++ b/lcl/lresources.pp
@@ -3089,7 +3089,9 @@ function InitLazResourceComponent(Instance: TComponent;
     {$ifdef UseRES}
     if Stream = nil then
     begin
-      FPResource := FindResource(HInstance, PChar(ResName), PChar(RT_RCDATA));
+      FPResource := FindResource(HInstance, PChar(ResName),
+        {$IF (FPC_FULLVERSION>=20701) and defined(Windows)}Windows.{$ENDIF}RT_RCDATA
+        );
       if FPResource <> 0 then
         Stream := TLazarusResourceStream.CreateFromHandle(HInstance, FPResource);
     end;