12 lines
341 B
Plaintext
12 lines
341 B
Plaintext
[source,vb6]
|
|
----
|
|
'Each function does a part of what the original setCoordinates function was doing, so confusion risks are lower
|
|
Public Sub SetOrigin(ByVal x As Integer, ByVal y As Integer, ByVal z As Integer)
|
|
' ...
|
|
End Sub
|
|
|
|
Public Sub SetSize(ByVal width As Integer, ByVal height As Integer, ByVal depth As Integer)
|
|
' ...
|
|
End Sub
|
|
----
|