LoTROInterface SVN KragenBars

import "Turbine.UI";

SimpleDragBar = class(Turbine.UI.Window);

function SimpleDragBar:Constructor(target, name)

    Turbine.UI.Window.Constructor(self);

    self.wndTarget = target;

    self.barOnTop = true;

    self.visible = false;

    self.draggable = false;

    self:SetBackColor(Turbine.UI.Color(.5, 0, 0, 0));

    -- the drag label

    self.dragLabel = Turbine.UI.Label();

    self.dragLabel:SetParent(self);

    self.dragLabel:SetForeColor(Turbine.UI.Color(1, 1, 1, 1));

    self.dragLabel:SetOutlineColor(Turbine.UI.Color(1, 0, 0, 0));

    self.dragLabel:SetFontStyle(Turbine.UI.FontStyle.Outline);

    self.dragLabel:SetFont(Turbine.UI.Lotro.Font.Verdana16);

    self.dragLabel:SetTextAlignment(Turbine.UI.ContentAlignment.TopCenter);

    self.dragLabel:SetPosition(1, 0);

    self.dragLabel:SetText(name);

    -- center

    self.center = Turbine.UI.Control();

    self.center:SetParent(self);

    self.center:SetBackColor(Turbine.UI.Color(0, 0, 0, 0));

    self.center:SetPosition(1, 24);

    -- listeners

    self.dragLabel.MouseDown = function(sender, args)

        if (args.Button == Turbine.UI.MouseButton.Left) then

            self.dragStartX = args.X;

            self.dragStartY = args.Y;

            self.dragging = true;

            if (type(self.wndTarget.DragStart) == "function") then

                self.wndTarget.DragStart();

            end

        end

    end

    self.dragLabel.MouseMove = function(sender, args)

        if (self.dragging) then

            local left, top = self.wndTarget:GetPosition();

            local width, height = self.wndTarget:GetSize();

            local x = left + (args.X - self.dragStartX);

            local y = top + (args.Y - self.dragStartY);

            x, y = validatePosition(x, y, width, height);

            self.wndTarget:SetPosition(x, y);

            self:RecalculatePosition();

        end

    end

    self.dragLabel.MouseUp = function(sender, args)

        if (args.Button == Turbine.UI.MouseButton.Left) then

            self.dragging = false;

            if (type(self.wndTarget.DragEnd) == "function") then

                self.wndTarget.DragEnd();

            end

        end

    end

    -- refresh

    self:Refresh();

end

function SimpleDragBar:SetBarOnTop(top)

    self.barOnTop = top;

    self.dragLabel:SetTextAlignment(top and Turbine.UI.ContentAlignment.TopCenter or Turbine.UI.ContentAlignment.BottomCenter);

    self:Refresh();

end

function SimpleDragBar:SetAllowsDragging(allow)

end

function SimpleDragBar:SetAllowsHUDHiding(allow, show)

end

function SimpleDragBar:SetHUDVisible(visible)

    self.visible = visible;

    self.wndTarget:SetVisible(visible);

    self:SetVisible(visible and self.draggable or false);

end

function SimpleDragBar:SetDraggable(draggable)

    self.draggable = draggable;

    self:SetVisible(draggable and self.visible or false);

end

function SimpleDragBar:Refresh()

    self:RecalculateSize();

    self:RecalculatePosition();

end

function SimpleDragBar:RecalculateSize()

    local width, height = self.wndTarget:GetSize();

    self:SetSize(width + 2, 25 + height);

    self.dragLabel:SetSize(width, 24);

    self.center:SetSize(width, height);

end

function SimpleDragBar:RecalculatePosition()

    local width, height = self.wndTarget:GetSize();

    local x, y = self.wndTarget:GetPosition();

    if (self.barOnTop) then

        self:SetPosition(x - 1, math.max(y - 24, 0));

        self.dragLabel:SetPosition(1, 0);

        self.center:SetPosition(1, 24);

    else

        self:SetPosition(x - 1, math.min(y - 1, Turbine.UI.Display:GetHeight() - (25 + height)));

        self.dragLabel:SetPosition(1, height);

        self.center:SetPosition(1, 1);

    end

end