diff options
| author | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-05-09 10:32:29 +0000 |
|---|---|---|
| committer | graemeg <graemeg@ae50a9b5-8222-0410-bf8d-8a13f76226bf> | 2008-05-09 10:32:29 +0000 |
| commit | 1805b503d2f564c8c7fc95478827a6d5b0aad4e8 (patch) | |
| tree | b71aed46809b085e2659f659568b8b92e1c47247 /src/corelib/x11 | |
| parent | a461d3206b5625fb7a45cafa218495ea59868927 (diff) | |
| download | fpGUI-1805b503d2f564c8c7fc95478827a6d5b0aad4e8.tar.xz | |
* Fixed bug where program crashed if MainMenu contains no items and you click on it.
* Fixed bug where components can't be created and Visible = False.
Diffstat (limited to 'src/corelib/x11')
| -rw-r--r-- | src/corelib/x11/gfx_x11.pas | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/corelib/x11/gfx_x11.pas b/src/corelib/x11/gfx_x11.pas index cb29ffaf..d507ecb5 100644 --- a/src/corelib/x11/gfx_x11.pas +++ b/src/corelib/x11/gfx_x11.pas @@ -1314,7 +1314,7 @@ begin if HandleIsValid then Exit; //==> - if aparent <> nil then + if AParent <> nil then pwh := TfpgWindowImpl(AParent).WinHandle else pwh := xapplication.RootWindow; @@ -1328,7 +1328,6 @@ begin end; AdjustWindowStyle; - wh := XCreateWindow(xapplication.Display, pwh, FLeft, FTop, FWidth, FHeight, 0, CopyFromParent, |