mirror of
https://github.com/lifestorm/wnsrc.git
synced 2025-12-16 21:33:46 +03:00
171 lines
3.7 KiB
Lua
171 lines
3.7 KiB
Lua
--[[
|
|
| This file was obtained through the combined efforts
|
|
| of Madbluntz & Plymouth Antiquarian Society.
|
|
|
|
|
| Credits: lifestorm, Gregory Wayne Rossel JR.,
|
|
| Maloy, DrPepper10 @ RIP, Atle!
|
|
|
|
|
| Visit for more: https://plymouth.thetwilightzone.ru/
|
|
--]]
|
|
|
|
|
|
local PANEL = {}
|
|
|
|
Derma_Hook( PANEL, "Paint", "Paint", "ListViewHeaderLabel" )
|
|
Derma_Hook( PANEL, "ApplySchemeSettings", "Scheme", "ListViewHeaderLabel" )
|
|
Derma_Hook( PANEL, "PerformLayout", "Layout", "ListViewHeaderLabel" )
|
|
|
|
function PANEL:Init()
|
|
end
|
|
|
|
-- No example for this control. Why do we have this control?
|
|
function PANEL:GenerateExample( class, tabs, w, h )
|
|
end
|
|
|
|
derma.DefineControl( "DListViewHeaderLabel", "", PANEL, "DLabel" )
|
|
|
|
--[[---------------------------------------------------------
|
|
DListView_DraggerBar
|
|
-----------------------------------------------------------]]
|
|
|
|
local PANEL = {}
|
|
|
|
function PANEL:Init()
|
|
|
|
self:SetCursor( "sizewe" )
|
|
|
|
end
|
|
|
|
function PANEL:Paint()
|
|
|
|
return true
|
|
|
|
end
|
|
|
|
function PANEL:OnCursorMoved()
|
|
|
|
if ( self.Depressed ) then
|
|
|
|
local x, y = self:GetParent():CursorPos()
|
|
|
|
self:GetParent():ResizeColumn( x )
|
|
end
|
|
|
|
end
|
|
|
|
-- No example for this control
|
|
function PANEL:GenerateExample( class, tabs, w, h )
|
|
end
|
|
|
|
derma.DefineControl( "DListView_DraggerBar", "", PANEL, "DButton" )
|
|
|
|
--[[---------------------------------------------------------
|
|
DListView_Column
|
|
-----------------------------------------------------------]]
|
|
|
|
local PANEL = {}
|
|
|
|
AccessorFunc( PANEL, "m_iMinWidth", "MinWidth" )
|
|
AccessorFunc( PANEL, "m_iMaxWidth", "MaxWidth" )
|
|
|
|
AccessorFunc( PANEL, "m_iTextAlign", "TextAlign" )
|
|
|
|
AccessorFunc( PANEL, "m_bFixedWidth", "FixedWidth" )
|
|
AccessorFunc( PANEL, "m_bDesc", "Descending" )
|
|
AccessorFunc( PANEL, "m_iColumnID", "ColumnID" )
|
|
|
|
Derma_Hook( PANEL, "Paint", "Paint", "ListViewColumn" )
|
|
Derma_Hook( PANEL, "ApplySchemeSettings", "Scheme", "ListViewColumn" )
|
|
Derma_Hook( PANEL, "PerformLayout", "Layout", "ListViewColumn" )
|
|
|
|
function PANEL:Init()
|
|
|
|
self.Header = vgui.Create( "DButton", self )
|
|
self.Header.DoClick = function() self:DoClick() end
|
|
self.Header.DoRightClick = function() self:DoRightClick() end
|
|
|
|
self.DraggerBar = vgui.Create( "DListView_DraggerBar", self )
|
|
|
|
self:SetMinWidth( 10 )
|
|
self:SetMaxWidth( 19200 )
|
|
|
|
end
|
|
|
|
function PANEL:SetFixedWidth( iSize )
|
|
|
|
self:SetMinWidth( iSize )
|
|
self:SetMaxWidth( iSize )
|
|
self:SetWide( iSize )
|
|
|
|
end
|
|
|
|
function PANEL:DoClick()
|
|
|
|
self:GetParent():SortByColumn( self:GetColumnID(), self:GetDescending() )
|
|
self:SetDescending( !self:GetDescending() )
|
|
|
|
end
|
|
|
|
function PANEL:DoRightClick()
|
|
|
|
end
|
|
|
|
function PANEL:SetName( strName )
|
|
|
|
self.Header:SetText( strName )
|
|
|
|
end
|
|
|
|
function PANEL:Paint()
|
|
return true
|
|
end
|
|
|
|
function PANEL:PerformLayout()
|
|
|
|
if ( self:GetTextAlign() ) then
|
|
self.Header:SetContentAlignment( self:GetTextAlign() )
|
|
end
|
|
|
|
self.Header:SetPos( 0, 0 )
|
|
self.Header:SetSize( self:GetWide(), self:GetParent():GetHeaderHeight() )
|
|
|
|
self.DraggerBar:SetWide( 4 )
|
|
self.DraggerBar:StretchToParent( nil, 0, nil, 0 )
|
|
self.DraggerBar:AlignRight()
|
|
|
|
end
|
|
|
|
function PANEL:ResizeColumn( iSize )
|
|
|
|
self:GetParent():OnRequestResize( self, iSize )
|
|
|
|
end
|
|
|
|
function PANEL:SetWidth( iSize )
|
|
|
|
iSize = math.Clamp( iSize, self:GetMinWidth(), math.max( self:GetMaxWidth(), 0 ) )
|
|
iSize = math.ceil( iSize )
|
|
|
|
-- If the column changes size we need to lay the data out too
|
|
if ( iSize != math.ceil( self:GetWide() ) ) then
|
|
self:GetParent():SetDirty( true )
|
|
end
|
|
|
|
self:SetWide( iSize )
|
|
return iSize
|
|
|
|
end
|
|
|
|
derma.DefineControl( "DListView_Column", "Sortable DListView Column", PANEL, "Panel" )
|
|
|
|
--[[---------------------------------------------------------
|
|
DListView_ColumnPlain
|
|
-----------------------------------------------------------]]
|
|
|
|
local PANEL = {}
|
|
|
|
function PANEL:DoClick()
|
|
end
|
|
|
|
derma.DefineControl( "DListView_ColumnPlain", "Non sortable DListView Column", PANEL, "DListView_Column" )
|