[Lazarus] SetFocus have no effect after TCustomForm.Show

[Gabor Boros]

> Ok, then please open issue about it and attach example as you attached
> in your e-mail, so then I'll commit patch and connect it to that issue
> (so it's easier to track possible regressions).

I found a problem. See the attached example. With Form2 works like a 
charm after patch applied, but with Form1 works like before patch.

Gabor
-------------- next part --------------
A non-text attachment was scrubbed...
Name: Show_SetFocus2.tar.gz
Type: application/gzip
Size: 2170 bytes
Desc: not available
URL: <http://lists.lazarus-ide.org/pipermail/lazarus/attachments/20151016/243646df/attachment-0001.gz>