1 files changed, 0 insertions, 137 deletions
diff --git a/examples/gui/widgetdemo/OpenSoftStyle.pas b/examples/gui/widgetdemo/OpenSoftStyle.pas
deleted file mode 100644
index 437982dd..00000000
--- a/examples/gui/widgetdemo/OpenSoftStyle.pas
+++ /dev/null
@@ -1,137 +0,0 @@
-unit OpenSoftStyle;
-
-{$mode objfpc}{$H+}
-
-interface
-
-uses
-  Classes, fpgui, gfxbase, fpgfx;
-  
-type
-
-  { TOpenSoftStyle }
-
-  TOpenSoftStyle = class(TDefaultStyle)
-  public
-    // Colors
-    function    GetGUIColor(Color: TColor): TGfxColor; override;
-    // Buttons (todo)
-//    procedure   DrawButtonFace(Canvas: TGfxCanvas; const ARect: TRect; Flags: TButtonFlags); override;
-    // GroupBox
-    procedure   DrawGroupBox(Canvas: TFCanvas; const ARect: TRect; const ALabel: String; WidgetState: TWidgetState); override;
-  end;
-  
-
-var
-  gOpenSoftStyle: TOpenSoftStyle;
-  
-implementation
-
-
-const
-  // Some predefined colors:
-  rgbaDkBlue:     TGfxColor = (Red: $0000; Green: $0000; Blue: $8000; Alpha: $0000);
-  rgbaLtYellow:   TGfxColor = (Red: $ffff; Green: $ffff; Blue: $e100; Alpha: $0000);
-
-  rgbaWindowText: TGfxColor = (Red: $0000; Green: $0000; Blue: $0000; Alpha: $0000);
-  rgbaWindow:     TGfxColor	= (Red: $efef; Green: $efef; Blue: $efef; Alpha: $0000);
-  rgbaDkGrey:     TGfxColor	= (Red: $8686; Green: $8686; Blue: $8686; Alpha: $0000);
-  rgbaGbAALtGrey: TGfxColor	= (Red: $baba; Green: $baba; Blue: $baba; Alpha: $0000);
-  rgbaGbAADkGrey: TGfxColor	= (Red: $7878; Green: $7878; Blue: $7878; Alpha: $0000);
-
-
-{ TOpenSoftStyle }
-
-function TOpenSoftStyle.GetGUIColor(Color: TColor): TGfxColor;
-begin
-  Result := inherited GetGUIColor(Color);
-  case Color of
-    // UI element colors
-    clScrollBar:      Result := rgbaWindow;
-    clMenu:           Result := rgbaWindow;
-//    clWindow:         Result := GetUIColor(clWhite);
-//    clMenuText:       Result := GetUIColor(clBlack);
-//    clWindowText:     Result := GetUIColor(clBlack);
-//    clAppWorkSpace:   Result := GetUIColor(clGray);
-//    clHighlight:      Result := GetUIColor(clNavy);
-//    clHighlightText:  Result := GetUIColor(clWhite);
-    cl3DFace:         Result := rgbaWindow;
-//    cl3DShadow:       Result := rgbaDkWhite;
-//    clGrayText:       Result := GetUIColor(clGray);
-//    clBtnText:        Result := GetUIColor(clBlack);
-//    cl3DHighlight:    Result := GetUIColor(clWhite);
-    cl3DDkShadow:     Result := GetUIColor(clMidnightBlue);
-//    cl3DLight:        Result := GetUIColor(clDarkWhite);
-//    clInfoText:       Result := GetUIColor(clBlack);
-//    clInfoBk:         Result := GetUIColor(clLightYellow);
-//
-//    else              Result := GetUIColor(clWhite);
-  end;
-
-end;
-
-
-procedure TOpenSoftStyle.DrawGroupBox(Canvas: TFCanvas; const ARect: TRect;
-    const ALabel: String; WidgetState: TWidgetState);
-var
-  TitleWidth, TitleHeight, TopLine: Integer;
-begin
-  TitleWidth  := Canvas.TextWidth(ALabel);
-  TitleHeight := Canvas.FontCellHeight;
-  TopLine     := ARect.Top + TitleHeight div 3;
-
-  Canvas.SetColor(rgbaDkGrey);
-  // box outline
-  with ARect do
-  begin
-    // top
-    Canvas.DrawLine(Point(Left + 2, TopLine), Point(Left + 12, TopLine));
-    Canvas.DrawLine(Point(Left + TitleWidth + 16, TopLine), Point(Right - 2, TopLine));
-    // right
-    Canvas.DrawLine(Point(Right-1, TopLine + 2), Point(Right-1, Bottom - 2));
-    // bottom
-    Canvas.DrawLine(Point(Right - 3, Bottom-1), Point(Left + 1, Bottom-1));
-    // left
-    Canvas.DrawLine(Point(Left, Bottom - 3), Point(Left, TopLine + 1));
-  end;
-
-  // Text caption
-  SetUIColor(Canvas, clWindowText);
-  DrawText(Canvas, ARect.TopLeft + Point(14, 0), ALabel, WidgetState);
-
-  { Anti-Aliasing - Top/Left }
-  Canvas.SetColor(rgbaGbAALtGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(0, TopLine+1));
-  Canvas.DrawPoint(ARect.TopLeft + Point(1, TopLine));
-  Canvas.SetColor(rgbaGbAADkGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(1, TopLine+1));
-  { Anti-Aliasing - Top/Right }
-  Canvas.SetColor(rgbaGbAALtGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-1, TopLine+1));
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-2, TopLine));
-  Canvas.SetColor(rgbaGbAADkGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-2, TopLine+1));
-  { Anti-Aliasing - Bottom/Right }
-  Canvas.SetColor(rgbaGbAALtGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-1, ARect.Bottom-2));
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-2, ARect.Bottom-1));
-  Canvas.SetColor(rgbaGbAADkGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(ARect.Right-2, ARect.Bottom-2));
-  { Anti-Aliasing - Bottom/Left }
-  Canvas.SetColor(rgbaGbAALtGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(0, ARect.Bottom-2));
-  Canvas.DrawPoint(ARect.TopLeft + Point(1, ARect.Bottom-1));
-  Canvas.SetColor(rgbaGbAADkGrey);
-  Canvas.DrawPoint(ARect.TopLeft + Point(1, ARect.Bottom-2));
-end;
-
-
-initialization
-  gOpenSoftStyle := TOpenSoftStyle.Create;
-  
-finalization
-  if Assigned(gOpenSoftStyle) then
-    gOpenSoftStyle.Free;
-  
-end.
-