[SOLVED] Set DrawStyle to dynamic created button

[tudi_x]

Hi!
I am trying to create buttons dynamically on a form using Lazarus 1.6 on Windows 7.
When setting the DrawStyle property as in the below I am getting 'Identifier not found dsWindows7'.
Please advise what I am missing.

Code: Pascal  [Select][+][-]

1. PROCEDURE TForm1.AddPlusBtn(LastOYPos : INTEGER);
2. CONST
3.   btnHeight = 24;
4.   btnWidth = 24;
5.   btnLeft = 24;
6.   btnDistBtw = 10;
7.  
8. VAR
9.   btnPlus : TCDButton;
10.  
11. BEGIN
12.   btnPlus := TCDButton.Create(Form1);
13.   btnPlus.Parent := Form1;
14.   btnPlus.Height := btnHeight;
15.   btnPlus.Width := btnWidth;
16.   btnPlus.Left := btnLeft;
17.   btnPlus.Top := LastOYPos + btnDistBtw;
18.   btnPlus.Visible := True;
19.   btnPlus.Enabled := True;
20.  
21.   btnPlus.DrawStyle := dsWindows7;
22.  
23.   btnPlus.Caption := '+';
24. END;      
25.  

Thank you.

[tudi_x]

It worked after adding unit customdrawndrawers.