diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-09-07 11:35:59 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2007-09-07 11:35:59 +0000 |
| commit | c05c7618ddfcf94117efaae8c83dfa2738f5d0a3 (patch) | |
| tree | 25d5aa2247b659f35520ed40215e16f7505cb590 /src/corelib | |
| parent | 8c4b085a78dccc8f5e5fe429a360ad456175b173 (diff) | |
| download | fpGUI-c05c7618ddfcf94117efaae8c83dfa2738f5d0a3.tar.xz | |
* GUI: Made some components properties published so the RTTI can
be used against them. A required for the GUI Designer and streaming.
* GUI Designer: Added 8 new components to the component palette.
* GUI Designer: Other minor improvements.
Diffstat (limited to 'src/corelib')
| -rw-r--r-- | src/corelib/gfx_widget.pas | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/corelib/gfx_widget.pas b/src/corelib/gfx_widget.pas index b0e22233..c777c496 100644 --- a/src/corelib/gfx_widget.pas +++ b/src/corelib/gfx_widget.pas @@ -154,6 +154,8 @@ procedure TfpgWidget.SetActiveWidget(const AValue: TfpgWidget); begin if FActiveWidget = AValue then Exit; //==> + if FFormDesigner <> nil then Exit; + if FActiveWidget <> nil then FActiveWidget.HandleKillFocus; FActiveWidget := AValue; |