BasicNoUIObjShutdown Method

public int Shutdown()

Public Function Shutdown As Integer

public:
virtual int Shutdown() sealed

private void Form1_FormClosing(object sender, System.ComponentModel.FormClosingEventArgs e)
{
    // prevent form closing until WinWrap Basic has exited all nested execution
    // prevent form closing if user cancels the request
    switch (basicIdeCtl1.Shutdown())
    {
        case -1: // Basic engine execution is nested.
            timer1.Enabled = true;
            e.Cancel = true;
            break;
        case 0:
            break;
        case 1: // cancelled by user
            e.Cancel = true;
            break;
    }
}

private void Form1_FormClosed(object sender, System.ComponentModel.FormClosedEventArgs e)
{
    // disconnect and release all COM objects used by WinWrap Basic
    bool okay = basicIdeCtl1.Disconnect();
    Debug.Assert(okay, "Disconnect must return true.");
}

private void timer1_Tick(object sender, System.EventArgs e)
{
    // poll the idectl until InEvent returns False
    // only then is it okay to close the form containing the idectl
    if (!basicIdeCtl1.InEvent)
    {
        timer1.Enabled = false;
        Close();
    }
}

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.ComponentModel.FormClosingEventArgs) Handles MyBase.FormClosing
    ' prevent form closing until WinWrap Basic has exited all nested execution
    ' prevent form closing if user cancels the request
    Select Case BasicIdeCtl1.Shutdown
        Case -1 ' Basic engine execution is nested.
            Timer1.Enabled = True
            e.Cancel = True
        Case 0
            ' okay
        Case 1
            ' cancelled by user
            e.Cancel = True
    End Select
End Sub

Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.ComponentModel.FormClosedEventArgs) Handles MyBase.FormClosed
    ' disconnect and release all COM objects used by WinWrap Basic
    Dim okay As Boolean = BasicIdeCtl1.Disconnect
    Debug.Assert(okay, "Disconnect must return True.")
End Sub

Private Sub Timer1_Tick(ByVal sender As Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    ' poll the idectl until InEvent returns False
    ' only then is it okay to close the form containing the idectl
    If Not BasicIdeCtl1.InEvent Then
        Timer1.Enabled = False
        Close()
    End If
End Sub

private: System::Void Form1_FormClosing(System::Object ^  sender, System::ComponentModel::FormClosingEventArgs ^  e)
{
    // prevent form closing until WinWrap Basic has exited all nested execution
    // prevent form closing if user cancels the request
    switch (basicIdeCtl1->Shutdown())
    {
        case -1: // Basic engine execution is nested.
            timer1->Enabled = true;
            e->Cancel = true;
            break;
        case 0:
            break;
        case 1: // cancelled by user
            e->Cancel = true;
            break;
    }
}

private: System::Void Form1_FormClosed(System::Object ^  sender, System::ComponentModel::FromClosedEventArgs ^  e)
{
    // disconnect and release all COM objects used by WinWrap Basic
    bool okay = basicIdeCtl1->Disconnect();
    Debug::Assert(okay, "Disconnect must return true.");
}

private: System::Void timer1_Tick(System::Object ^  sender, System::EventArgs ^  e)
{
    // poll the idectl until InEvent returns False
    // only then is it okay to close the form containing the idectl
    if (!basicIdeCtl1->InEvent)
    {
        timer1->Enabled = false;
        Close();
    }
}