summaryrefslogtreecommitdiff
path: root/src/corelib/gfx_widget.pas
diff options
context:
space:
mode:
Diffstat (limited to 'src/corelib/gfx_widget.pas')
-rw-r--r--src/corelib/gfx_widget.pas2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/corelib/gfx_widget.pas b/src/corelib/gfx_widget.pas
index a49f3cca..7c46c6d1 100644
--- a/src/corelib/gfx_widget.pas
+++ b/src/corelib/gfx_widget.pas
@@ -575,6 +575,7 @@ var
n: integer;
c: TComponent;
begin
+// writeln('Widget.HandleShow - ', ClassName, ' x:', Left, ' y:', Top, ' w:', Width, ' h:', Height);
FOnScreen := True;
// FVisible := True;
@@ -897,6 +898,7 @@ end;
procedure TfpgWidget.MsgPaint(var msg: TfpgMessageRec);
begin
+// writeln('TfpgWidget.MsgPaint - ', Classname);
Canvas.BeginDraw;
HandlePaint;
if Assigned(FOnPaint) then