1 files changed, 65 insertions, 0 deletions
diff --git a/twin-styles/riscos/AboveButton.cpp b/twin-styles/riscos/AboveButton.cpp
new file mode 100644
index 00000000..7b66e3ba
--- /dev/null
+++ b/twin-styles/riscos/AboveButton.cpp
@@ -0,0 +1,65 @@
+/*
+  RISC OS KWin client
+  
+  Copyright 2004
+    Carsten Clever <clushkou@gmx.net>
+
+  This program is free software; you can redistribute it and/or
+  modify it under the terms of the GNU General Public
+  License as published by the Free Software Foundation; either
+  version 2 of the License, or (at your option) any later version.
+
+  This program is distributed in the hope that it will be useful,
+  but WITHOUT ANY WARRANTY; without even the implied warranty of
+  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
+  General Public License for more details.
+
+  You should have received a copy of the GNU General Public License
+  along with this program; see the file COPYING.  If not, write to
+  the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+  Boston, MA 02110-1301, USA.
+*/
+
+#include "AboveButton.h"
+
+namespace RiscOS
+{
+
+/* XPM */
+static const char * const above_xpm[] = {
+"12 12 3 1",
+" 	c None",
+".	c #000000",
+"+	c #FFFFFF",
+"            ",
+" .....      ",
+".+++++.     ",
+".+++++.     ",
+".+++++..... ",
+".+++++.++++.",
+".+++++.++++.",
+" .....+++++.",
+"     .+++++.",
+"     .+++++.",
+"      ..... ",
+"            "};
+
+AboveButton::AboveButton(TQWidget *parent)
+   : Button(parent, i18n("Keep above others"))
+{
+   setPixmap(TQPixmap((const char **)above_xpm));
+}
+
+void AboveButton::mouseReleaseEvent(TQMouseEvent *e)
+{
+   Button::mouseReleaseEvent(e);
+
+   if (!rect().contains(e->pos()))
+      return;
+
+   emit(above());
+}
+
+} // End namespace
+
+#include "AboveButton.moc"