66757316e2
- aggiornamenti vari.
22 lines
686 B
VB.net
22 lines
686 B
VB.net
Imports EgtUILib.EgtInterface
|
|
|
|
Public Class btnRendering
|
|
|
|
Sub New()
|
|
InitializeComponent()
|
|
End Sub
|
|
|
|
Private Sub rbtnWireframe_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtnWireframe.CheckedChanged
|
|
EgtSetShowMode(SM.WIREFRAME)
|
|
End Sub
|
|
|
|
Private Sub rbtnHiddenLine_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtnHiddenLine.CheckedChanged
|
|
EgtSetShowMode(SM.HIDDENLINE)
|
|
End Sub
|
|
|
|
Private Sub rbtnShading_CheckedChanged(sender As System.Object, e As System.EventArgs) Handles rbtnShading.CheckedChanged
|
|
EgtSetShowMode(SM.SHADING)
|
|
End Sub
|
|
|
|
End Class
|