Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Apagar tudo ao deletar mapa

Ir para baixo

Apagar tudo ao deletar mapa Empty Apagar tudo ao deletar mapa

Mensagem  Pablo Qua Set 19, 2012 6:09 pm

Client~Side

Procure por:

Código:
Private Sub cmdDelete_Click()
    Call EditorClearMap
End Sub

Mude para:

Código:
Private Sub cmdDelete_Click()
    Call EditorClearMap
    Call EditorClearAttribs
    frmMapProperties.txtName.Text = " "
    frmMapProperties.txtUp.Text = "0"
    frmMapProperties.txtRight.Text = "0"
    frmMapProperties.txtDown.Text = "0"
    frmMapProperties.txtLeft.Text = "0"
    frmMapProperties.txtBootMap.Text = "0"
    frmMapProperties.txtBootX.Text = "0"
    frmMapProperties.txtBootY.Text = "0"

    Dim I As Long
    For I = 1 To MAX_MAP_NPCS
        frmMapProperties.cmbNpc(I - 1).ListIndex = 0

        TempNpcSpawn(I).Used = 0
        TempNpcSpawn(I).x = 0
        TempNpcSpawn(I).y = 0

        frmMapProperties.Spawn(I - 1).Caption = "Setar Nascimento"
    Next I
End Sub

Creditos: Desconhecido
Pablo
Pablo
Admin

Mensagens : 1
Agradecimentos : 1
Data de inscrição : 21/08/2012

http://worldrpgbr.ativoforum.com

Ir para o topo Ir para baixo

Ir para o topo

- Tópicos semelhantes

 
Permissões neste sub-fórum
Não podes responder a tópicos