Universo Games
Ola , Convidado



Você ainda não e cadastrado então cadastre-se e veja todas as atualizações no mundo rpg!!!
Universo Games

Suporte e Desenvolvimento só no Universo Games

Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

Você não está conectado. Conecte-se ou registre-se

Sistema de Termos de Serviço

Ver o tópico anterior Ver o tópico seguinte Ir em baixo  Mensagem [Página 1 de 1]

1Tutorial Sistema de Termos de Serviço em Seg 04 Jul 2011, 19:25

RicardoxD


Membro
Membro
Client~Side

Na frmNewAccount crie um chekBox com as seguintes configurações:

Código:
Name : chkTermos
Caption: Eu os termos de serviço


Ainda na frmNewAccount procure por:

Código:
        ' Prevent high ascii chars
        For I = 1 To Len(Msg)
            If Asc(Mid(Msg, I, 1)) < 32 Or Asc(Mid(Msg, I, 1)) > 126 Then
                Call MsgBox("Você não pode usar acentos na sua conta.", vbOKOnly, GAME_NAME)
                txtName.Text = vbNullString
                Exit Sub
            End If
        Next I


Abaixo adicione:

Código:
If chkTermos.Value = Unchecked Then
Call MsgBox("Você não aceitou os termos de serviço!")
Exit Sub
End If


Agora porcure por:

Código:
        Case MENU_STATE_NEWACCOUNT
            frmNewAccount.Visible = False
            If ConnectToServer = True Then
                Call SetStatus("Conectado, enviando informações da nova conta...")
                Call SendNewAccount(frmNewAccount.txtName.Text, frmNewAccount.txtPassword.Text)
            End If


Mude para:

Código:
        Case MENU_STATE_NEWACCOUNT
            frmNewAccount.chkTermos.Value = Checked
            frmNewAccount.Visible = False
            If ConnectToServer = True Then
                Call SetStatus("Conectado, enviando informações da nova conta...")
                Call SendNewAccount(frmNewAccount.txtName.Text, frmNewAccount.txtPassword.Text)
            End If


Creditos:

A mim

2Tutorial Re: Sistema de Termos de Serviço em Ter 26 Jul 2011, 21:52

giovani18


Membro
Membro
oque ele faz qual o função

http://masterdbz.xpg.com.br

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo  Mensagem [Página 1 de 1]

Permissão deste fórum:
Você não pode responder aos tópicos neste fórum