From 8e7250bb033fc93125fd6f3913c6d095eba89447 Mon Sep 17 00:00:00 2001 From: nilllzz Date: Wed, 21 Sep 2016 02:24:02 +0200 Subject: [PATCH] Removed unused methods in helper classes --- .../2.5DHero/HelperClasses/BasicObject.vb | 32 ------------------- 2.5DHero/2.5DHero/HelperClasses/Size.vb | 5 --- 2 files changed, 37 deletions(-) diff --git a/2.5DHero/2.5DHero/HelperClasses/BasicObject.vb b/2.5DHero/2.5DHero/HelperClasses/BasicObject.vb index 0b009dd6b..76b032897 100644 --- a/2.5DHero/2.5DHero/HelperClasses/BasicObject.vb +++ b/2.5DHero/2.5DHero/HelperClasses/BasicObject.vb @@ -12,16 +12,6 @@ Public MustInherit Class BasicObject Private _Visible As Boolean = True Private _DisposeReady As Boolean = False - ''' - ''' Use the random-function to create randomized values. - ''' - Public Random As New System.Random() - - ''' - ''' You can store a value in the Tag. - ''' - Public Tag As New Object - #End Region #Region "Properties" @@ -98,20 +88,6 @@ Public MustInherit Class BasicObject End Set End Property - ''' - ''' Returns a rectangle created by position, width and height of this object. - ''' - Public Property Rectangle As Rectangle - Get - Return New Rectangle(CInt(Position.X), CInt(Position.Y), Width, Height) - End Get - Set(value As Rectangle) - Me.Position = New Vector2(value.X, value.Y) - Me.Width = value.Width - Me.Height = value.Height - End Set - End Property - ''' ''' The size of this object (width and height) ''' @@ -141,12 +117,4 @@ Public MustInherit Class BasicObject Me._Position = Position End Sub - ''' - ''' Makes the object invisible and ready for disposing. - ''' - Public Sub Remove() - DisposeReady = True - Visible = False - End Sub - End Class \ No newline at end of file diff --git a/2.5DHero/2.5DHero/HelperClasses/Size.vb b/2.5DHero/2.5DHero/HelperClasses/Size.vb index cd81d9d18..1e482b5ce 100644 --- a/2.5DHero/2.5DHero/HelperClasses/Size.vb +++ b/2.5DHero/2.5DHero/HelperClasses/Size.vb @@ -26,9 +26,4 @@ Me._Height = Height End Sub - Public Sub Input(ByVal Width As Integer, ByVal Height As Integer) - Me._Width = Width - Me._Height = Height - End Sub - End Class \ No newline at end of file