[Lazarus] Strange behaviour of TCustomEditButton ancesters

[Frans]

Hi

I use TFileNameEdit (but TDirectoryEdit acts the same) on the second tabsheet of a PageControl where 
it's the first control to receive focus. I set the focus manually in the method form.tabshow for the 
event OnShow.
The first time I activate that tab, SetFocus has the effect as shown in FirstTime.png. When I select 
the tab another time, the effect is normal, as shown in Second time.png.
Is can't find out why. Is this a bug? I use Lazarus 1.6 and FCP 3.0.0.

-- 
mvg
Frans van Leeuwen
M 06-51695390

-------------- next part --------------
A non-text attachment was scrubbed...
Name: First time.png
Type: image/png
Size: 7547 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20160312/0d318a67/attachment-0004.png>
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Second time.png
Type: image/png
Size: 8206 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20160312/0d318a67/attachment-0005.png>