Files
wnsrc/lua/vgui/prop_generic.lua

88 lines
1.7 KiB
Lua
Raw Normal View History

2024-08-04 22:55:00 +03:00
--[[
| 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/
--]]
--
-- prop_generic is the base for all other properties.
-- All the business should be done in :Setup using inline functions.
-- So when you derive from this class - you should ideally only override Setup.
--
local PANEL = {}
AccessorFunc( PANEL, "m_pRow", "Row" )
function PANEL:Init()
end
function PANEL:Think()
--
-- Periodically update the value
--
if ( !self:IsEditing() && isfunction( self.m_pRow.DataUpdate ) ) then
self.m_pRow:DataUpdate()
end
end
--
-- Called by this control, or a derived control, to alert the row of the change
--
function PANEL:ValueChanged( newval, bForce )
if ( ( self:IsEditing() || bForce ) && isfunction( self.m_pRow.DataChanged ) ) then
self.m_pRow:DataChanged( newval )
end
end
function PANEL:Setup( vars )
self:Clear()
local text = self:Add( "DTextEntry" )
if ( !vars || !vars.waitforenter ) then text:SetUpdateOnType( true ) end
text:SetPaintBackground( false )
text:Dock( FILL )
-- Return true if we're editing
self.IsEditing = function( slf )
return text:IsEditing()
end
-- Enabled/disabled support
self.IsEnabled = function( slf )
return text:IsEnabled()
end
self.SetEnabled = function( slf, b )
text:SetEnabled( b )
end
-- Set the value
self.SetValue = function( slf, val )
text:SetText( util.TypeToString( val ) )
end
-- Alert row that value changed
text.OnValueChange = function( slf, newval )
self:ValueChanged( newval )
end
end
derma.DefineControl( "DProperty_Generic", "", PANEL, "Panel" )