summaryrefslogtreecommitdiff
path: root/uidesigner/newformdesigner.pas
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@gmail.com>2010-04-13 22:52:24 +0200
committerGraeme Geldenhuys <graemeg@gmail.com>2010-04-13 22:52:24 +0200
commita03df130f14722a89f90075685d235c0a79073c1 (patch)
treef716e6f42c4eed30ce1e18071bba005b4e127773 /uidesigner/newformdesigner.pas
parentae9cfcea8937917c59a58f2ecd4f4235ad70a8f0 (diff)
downloadfpGUI-a03df130f14722a89f90075685d235c0a79073c1.tar.xz
UI Designer: Single click in Object Inspector sets focus to actual edit widget.
Diffstat (limited to 'uidesigner/newformdesigner.pas')
-rw-r--r--uidesigner/newformdesigner.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/uidesigner/newformdesigner.pas b/uidesigner/newformdesigner.pas
index 87feed33..b974d262 100644
--- a/uidesigner/newformdesigner.pas
+++ b/uidesigner/newformdesigner.pas
@@ -839,6 +839,8 @@ begin
NameDrag := False
else
inherited;
+ if (Editor <> nil) and (Editor.Visible) then
+ Editor.SetFocus;
end;
procedure TwgPropertyList.HandleMouseScroll(x, y: integer;