I used component QFormDock.Inc from with example QFormDock.Bas (additional by Ben Laws (c) 2004). All works fine...
...until I did add $TypeCheck ON into example and did run compiler. Ooops! - compiler finds 2 errors in file QFormDock.Inc:
1) on line 171 and 172 are these 2 wrong commands (dots are missing): .UndockedForm.Left = (Screen.Width - UndockedForm.Width)/ 2
.UndockedForm.Top = (Screen.Height - UndockedForm.Height)/ 2
Right syntax must be with .UndockedForm: .UndockedForm.Left = (Screen.Width - .UndockedForm.Width)/ 2
.UndockedForm.Top = (Screen.Height - .UndockedForm.Height)/ 2
2) Variable [color=#990000] I[/color] is NOT DECLARED on all inner code. It can make a mistake in future using of variable [color=#990000] I[/color] in my other code... What about variable TempI instead of often used variable [color=#990000] I[/color]? Declaring is needing.
Who can repair this (Author? Guidance?)
Have a nice day. Slavo
P.S.: QFormDock is very nice component with many styles. I think, from this time I will often use it in my forms. My THANK to the author!!! | 
搜索
论坛
Home
回顶部
1. Two errors on QDockForm.Inc
g.yi.org Hits:0
