summaryrefslogtreecommitdiff
path: root/prototypes/multihandle
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graemeg@users.sourceforge.net>2006-11-29 20:16:44 +0000
committerGraeme Geldenhuys <graemeg@users.sourceforge.net>2006-11-29 20:16:44 +0000
commit2d2e0db915663e3f06f0661137acf446bfe79231 (patch)
tree22f9340177850f913a135b9f3bc6f79a48244a26 /prototypes/multihandle
parent0f38c8497fd2a9348fe0eac9a823683e75989873 (diff)
downloadfpGUI-2d2e0db915663e3f06f0661137acf446bfe79231.tar.xz
* Optimised X11 so that only one Expose event will occur from the X Server
when mapping the top level parent window. * The Prototype GUI has been modified to not auto call Show when a Widget or Form is created.
Diffstat (limited to 'prototypes/multihandle')
-rw-r--r--prototypes/multihandle/gui2Base.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/prototypes/multihandle/gui2Base.pas b/prototypes/multihandle/gui2Base.pas
index bdb604b8..e9f4dad8 100644
--- a/prototypes/multihandle/gui2Base.pas
+++ b/prototypes/multihandle/gui2Base.pas
@@ -208,7 +208,6 @@ begin
FColor := colLtGray;
OnPaint := @EvOnPaint;
OnMouseReleased := @EvOnMousePress;
- Show;
end;
{ TForm }
@@ -263,6 +262,7 @@ begin
Create(nil, [woWindow]);
end;
+
{ TButton }
procedure TButton.EvOnPaint(Sender: TObject; const Rect: TRect);