~philho/+junk/JavaFX

import javafx.stage.*; // Stage, StageStyle, Screen, Alert...
import javafx.scene.*; // Scene, Node, CustomNode, Group, Cursor, Parent

import javafx.scene.image.Image;
import javafx.scene.image.ImageView;
import javafx.scene.paint.*; // Color, LinearGradient, RadialGradient...
import javafx.scene.shape.*; // Line, Rectangle, Circle, Ellipse...
import javafx.scene.text.*; // Text, Font...
import javafx.scene.transform.*; // Transform, Translate, Rotate, Scale...
import javafx.scene.effect.*; // Blend, Reflection, DisplacementMap, XxxBlur, XxxShadow...
import javafx.scene.input.*; // KeyCode, KeyEvent, MouseButton, MouseEvent
import javafx.scene.control.*; // Button, CheckBox, ListView, ProgressBar, RadioButton, TextBox...
import javafx.scene.layout.*; // HBox, VBox, Flow, LayoutInfo...

import javafx.animation.*; // Timeline, KeyFrame, KeyValue...
import javafx.animation.transition.*; // AnimationPath, Transition, XxxTransition, OrientationType

import javafx.async.*; // Task, RunnableFuture, JavaTaskBase

import javafx.data.pull.PullParser;
import javafx.data.pull.Event;
import javafx.data.xml.XMLConstants;
import javafx.data.xml.QName;

import javafx.geometry.*; // Bounds, BoundingBox, Point2D, Rectangle2D...
import javafx.fxd.*; // Duplicator, FXDnode, FXDContent, FXDLoader
import javafx.data.Pair;
import javafx.io.Resource;
import javafx.io.Storage;
import javafx.io.http.*; // HttpHeader, HttpRequest, HttpStatus, URLConverter

import javafx.lang.*; // Duration, FX...
import javafx.util.*; // Bits, Math, Sequences, Properties...
import javafx.date.DateTime;

import java.util.Locale;
import java.util.ArrayList;
import java.lang.System;
import java.lang.Exception;
import java.io.*;

/*
var filePath = "D:/Documents/Images/References/coins.jpg";
var image = Image
{
    url: "file:///{filePath}";
    height: 400, preserveRatio: true
    backgroundLoading: true
    placeholder: Image
    {
        url: "D:/Documents/Images/Animations/aniswirl.gif"
    }
}

var scene: Scene;
Stage
{
    title: "Forum Test"
    scene: scene = Scene
    {
        width: 500
        height: 500
        fill: Color.LAVENDER
        content:
        [
            ImageView
            {
                image: image
                x: 50, y: 50
            }
        ]
    }
}
sidehatch.SideHatch.activate();
*/

/*
import javax.help.*;
import java.net.URL;

var scene: Scene;
Stage
{
    title: "Forum Test"
    scene: scene = Scene
    {
        width: 500
        height: 500
        fill: Color.LAVENDER
        content:
        [
            Ellipse
            {
                fill: Color.GREEN
                centerX: 50, centerY: 50
                radiusX: 80, radiusY: 50
            }
            Button
            {
                translateX: 20
                translateY: 40
                text: "Help"
                action: function (): Void
                {
                    JHelp helpViewer = null;
                    try
                    {
                        // Get the classloader of this class.
                        ClassLoader cl = getClass().getClassLoader();
                        URL url = HelpSet.findHelpSet(cl, "jhelpset.hs");
                        // Create a new JHelp object with a new HelpSet.
                        helpViewer = new JHelp(new HelpSet(cl, url));
                        // Set the initial entry point in the table of contents.
                        helpViewer.setCurrentID("Simple.Introduction");
                    }
                    catch (Exception e)
                    {
                        println("API Help Set not found");
                    }
                }
            }
        ]
    }
}

static public HelpBroker startJavaHelp()
{
    HelpBroker hb = null ;
    URL url = null;
    String helpHS = "help/help.hs";
//~ 	ClassLoader cl = ecowand.Main.class.getClassLoader();
    ClassLoader cl = getClass().getClassLoader();
    try
    {
        url = HelpSet.findHelpSet(cl, helpHS);
        HelpSet hs = new HelpSet(cl, url);
        hb = hs.createHelpBroker();
    }
    catch(Exception e)
    {
        e.printStackTrace();
        System.out.println("Url error here " + url);
    }
    return hb;
}
*/

class ChatList extends CustomNode {
    // The data to list
    public var data: Object[];
    // The nodes used to display data (only enough for the currently visible part)
    var nodes: Node[];
    var scrollBar: ScrolLBar;

    public var width = 100.0;
    public var height = 100.0;
    public var itemHeight = 10.0;

    // Number of visible items in the list
    var visibleCount: Integer = bind ((height / itemHeight) as Integer) + 1;
    var currentStartItem = 0;
    var yoff = 0.0;

    public var scrollValue = 0.0 on replace { adjust(); }

    // Provide this function to create nodes in the list
    // Called when scrolling to create nodes as they are displayed
    public var createItemNode: function(obj: Object, bounds: Bounds): Node;

    public function update(): Void
    {
        regen(0, visibleCount);
    }

    function adjust(): Void {
        // There is a bug in v.1.2 scroll bar: min is set to 0 but scrollValue can go negative...
        var visibleStart = scrollValue;
        if (scrollValue < 0) visibleStart = 0;
        var startItem = (visibleStart / itemHeight) as Integer;
        yoff = -(visibleStart mod itemHeight);
        println("{visibleStart} {startItem} {yoff}");
        if (startItem != currentStartItem) {
            currentStartItem = startItem;
            regen(startItem, startItem + visibleCount);
        }
    }

    function regen(start: Integer, end: Integer): Void {
        def bds = BoundingBox { width: width, height: itemHeight };
        nodes = for (i in [start .. end]) {
            var nd = createItemNode(data[i], bds);
            nd.translateY = (indexof i) * itemHeight;
            nd; // To add to nodes sequence
        }
    }

    override public function create(): Node {
        Group {
            content: Group { content: bind nodes, translateY: bind yoff }
            clip: Rectangle { width: bind width, height: bind height }
        }
    }

    init {
        scrollBar = ScrollBar {
            min: 0, max: bind (elements.size() - 1) * itemHeight
            vertical: true
            height: bind height
            value: bind scrollValue with inverse
            unitIncrement: itemHeight / 2
        }
        update();
    }

}

class Item {
    public var username = "foo";
    public var message = "bar";
}

function customView(obj: Object, bounds: Bounds): Node {
    var item = obj as Item;
    return Group {
        content: [
            Rectangle {
                width: bounds.width, height: bounds.height
                fill: LinearGradient { startX : 0.0, startY : 0.0, endX : 0.0, endY : 1.0
                        stops: [
                            Stop { color: Color.rgb(230,230,230), offset: 0.0 },
                            Stop { color: Color.rgb(210,210,210), offset: 1.0 },
                        ]
                }
            }
            Text { content: item.username, x: 10, y: 15, font: Font.font("Helvetica", 17) }
            Text { content: item.message,  x: 10, y: 26, font: Font.font("Helvetica", 11) }
        ]
    }
}
def ITEM_HEIGHT = 30;

class ChatDisplay extends CustomNode {

    var username = "TableScene.GetUserName()";
    var TextField = TextBox { translateY: 123, columns: 27, selectOnFocus: true }
    var chatList: ChatList;
    var elements: Item[];

    var scrollValue = 0.0;

    public function PutMessage(Message: String, UserName: String): Void {
        var buff = Item { message: Message, username: UserName };
        insert buff into elements;
        chatList.update();
//~ 		display();
    }

    public function display(): Void {
        println("-----");
        for(i in [0 ..< sizeof elements]){
            println("{i} {elements[i].message}");
        }
    }

    public override function create(): Node {
        return Group {
            content: [
               Rectangle { width: 298, height: 148, fill: Color.ORANGE },
               TextField,
               Button { translateY: 125, translateX: 242, text: "Send", action: function() {
//~                           TableScene.SendMessage(TextField.text, username);
PutMessage(TextField.text, "Some Person");
               }},
               Button {translateY: 125, translateX: 301, text: "Exit", action: function() {
//~                           TableScene.DelateClient(username);
display();
               }},
               chatList = ChatList {
                    translateX: 0
                    translateY: 0
                    data: bind elements
                    width: 280 height: 120
                    itemHeight: ITEM_HEIGHT
                    createItemNode: customView
                }
            ]
        }
    }
}

var scene: Scene;
var cd = ChatDisplay {};
cd.PutMessage("This is a message", "Zielony");
Stage
{
    title: "Forum Test"
    scene: scene = Scene
    {
        width: 500
        height: 500
        content:
        [
            cd
        ]
    }
}