Vcl.Styles.Hooks - incorrect TEdit background color in some styles

What steps will reproduce the problem?
1.Tried steps below with Delphi XE3 and XE7 (update 1)
2.Compile and run Vcl Styles Hooks (Demo App)
3.Change style to Amakrits or Charcoal Dark Slate

What is the expected output? 
The edit boxes should have dark background like the list boxes and the memo.

What do you see instead?
The edit boxes have white background. See attached screenshot1.jpg.

What version of the product are you using? 
VCL Styles Utils revision 300.

On what operating system?
Windows 7 Ultimate 64 bit

Please provide any additional information below.
Workaround: comment out the following line in Vcl.Styles.Hooks.pas - see 
screenshot2.jpg for result.

@TrampolineGetSysColorBrush    :=  InterceptCreate(user32, 'GetSysColorBrush', 
@Detour_GetSysColorBrush);

Original issue reported on code.google.com by bogdan...@gmail.com on 1 Jan 2015 at 8:36

Attachments:

screenshot1.jpg
screenshot2.jpg

mycopy / vcl-styles-utils

Vcl.Styles.Hooks - incorrect TEdit background color in some styles #103