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
 
InícioInício  PortalPortal  EventosEventos  PublicaçõesPublicações  Registrar-seRegistrar-se  Conectar-seConectar-se  
Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

Compartilhe | 
 

 Sistema de Termos de Serviço

Ir em baixo 
AutorMensagem
RicardoxD
Praticante
Praticante
avatar

Mensagens : 89

MensagemAssunto: Sistema de Termos de Serviço   Seg 04 Jul 2011, 19:25

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
Voltar ao Topo Ir em baixo
giovani18
Praticante
Praticante
avatar

Mensagens : 74

MensagemAssunto: Re: Sistema de Termos de Serviço   Ter 26 Jul 2011, 21:52

oque ele faz qual o função
Voltar ao Topo Ir em baixo
http://masterdbz.xpg.com.br
 
Sistema de Termos de Serviço
Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» Hoppi Hotel - Sistema Lucrativo - Habbo Pirata - Gratis - Eventos - Promoções - Vagas na Equipe
» Habbo Sistema Lucrativo - Sem Lag - Totalmente Novo - Wireds 100& - Cassinos - Raros Semanais
» Novo sistema da Receita
» Sistema de Captcha com letras aleatórias
» Esse é o sistema de moeda e é isso?

Permissão deste fórum:Você não pode responder aos tópicos neste fórum
Universo Games :: Tutoriais-
Ir para: