Hi,
I just tested. Active Form always returns Focused False. Use property Active
instead.
Result := (FControl is TCustomForm) and TCustomForm(FControl).Active;
V.
______________________________________________________________
Od: Lubos Pintes via Lazarus <[email protected]>
Komu: [email protected]
Datum: 04.03.2018 17:58
Předmět: [Lazarus] An expression is returning false, why?
Hello,
Sorry for possibly stupid subject and maybe off-topic question. In my
UIA code, I am testing if a control has focus. So I have a FControl:
TControl declared in my class.
Now say FControl contains a TForm1 instance, simply we have very simple
program with just an empty window. Then an expression:
Result := FControl is TWinControl and TWinControl(FControl).Focused;
returns false. I am sure the form has focus..., because
ShowMessage(BoolToStr(Focused)) returns -1, which represents true...
--
_______________________________________________
Lazarus mailing list
[email protected]
https://lists.lazarus-ide.org/listinfo/lazarus
<https://lists.lazarus-ide.org/listinfo/lazarus>
--
_______________________________________________
Lazarus mailing list
[email protected]
https://lists.lazarus-ide.org/listinfo/lazarus
