2 files changed, 5 insertions, 5 deletions
diff --git a/examples/apps/globe/extrafpc.cfg b/examples/apps/globe/extrafpc.cfg
index bf32f456..49dd2ec7 100644
--- a/examples/apps/globe/extrafpc.cfg
+++ b/examples/apps/globe/extrafpc.cfg
@@ -4,3 +4,7 @@
 -Xs
 -XX
 -CX
+#ifdef mswindows
+-WG
+#endif
+
diff --git a/examples/apps/globe/frm_main.pas b/examples/apps/globe/frm_main.pas
index 76775a4b..ef80f2f7 100644
--- a/examples/apps/globe/frm_main.pas
+++ b/examples/apps/globe/frm_main.pas
@@ -579,7 +579,7 @@ procedure TGlobe.DrawGrid;
 var
   temp: integer;
 begin
-  Canvas.Color := TfpgColor($8080FF); // clGray;
+  Canvas.Color := TfpgColor($FF8080FF); // clGray;
   Canvas.SetLineStyle(0, lsDash);
   { Parallels }
   temp := Wfi;
@@ -672,12 +672,8 @@ end;
 
 procedure TGlobe.HandlePaint;
 begin
-  Canvas.BeginDraw;
   Canvas.Clear(clWindowBackground);
-//  R := Width div 2;
-  // inherited HandlePaint;
   DrawGlobe;
-  Canvas.EndDraw;
 end;
 
 constructor TGlobe.Create(AOwner: TComponent);