MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!

Participe do fórum, é rápido e fácil

MMORPG Brasil
Ola, visitante! Agradecemos sua visita, para ter acesso a todo nosso conteúdo recomendamos que faça um cadastro no fórum, com ele você pode participar de tópicos e ter acesso a todas áreas da comunidade!
MMORPG Brasil
Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

#Tutoriais In-Game System

5 participantes

Ir para baixo

#Tutoriais In-Game System Empty #Tutoriais In-Game System

Mensagem por RenanR Qua 27 Fev 2013, 17:23

Nesse tutorial você clica em Tutoriais no menu do jogo (frmMirage), logo aparece uma pic onde há uma lista de tutoriais para o jogador ler (esses tutoriais são em arquivos de textos).

#1 - Criando tutoriais
Primeiramente, crie uma pasta dentro da pasta GFX do cliente, chamada "Tutoriais" (sem aspas), e dentro crie arquivos de textos, com o nome do tutorial e dentro coloque o tutorial.

#2 - Interface
Vamos abrir a source do cliente agora, logo abra a frmMirage, e crie uma picturebox chamada picTutoList , com propriedade visible=false. Dentro, coloque um FileListBox chamado flsTutos . E uma label com caption X para fechar com nome de lblTutosX

Agora crie outra picturebox bem grande, com um textbox bem grande também. Coloque o nome da pic como "picTuto" (sem aspas). E o nome do textbox ponha "txtTuto" (sem aspas), e propriedade Multiline=True. E tambem crie uma label para fechar, com o nome de lblTutoX

#3 - Codes
Adicione isso nos códigos da form frmMirage:
Código:
Private Sub flsTutos_DblClick()
Dim iFile As Long
Dim lLinha As Long
Dim sLinha As String
Dim sArquivo As String
Dim sNumerado As String

iFile = FreeFile

Open flsTutos.Path & "\" & flsTutos.FileName For Input As #iFile

lLinha = 0
sArquivo = ""
sNumerado = ""
Do While Not EOF(iFile)
    Line Input #iFile, sLinha

    lLinha = lLinha + 1

    'Pega a informação da linha
    If sArquivo <> "" Then sArquivo = sArquivo & vbCrLf
    sArquivo = sArquivo & sLinha

    'Pega a informação da linha para numerar cada linha
    If sNumerado <> "" Then sNumerado = sNumerado & vbCrLf
    sNumerado = sNumerado & Format(lLinha, "00000") & sLinha
Loop

txtTuto.Text = Empty
txtTuto.Text = sArquivo
picTuto.Visible = True
'Fecha o arquivo
Close #iFile
End Sub

Private Sub lblTutosX_Click()
picTutoList.Visible = False
End Sub

Private Sub txtTuto_GotFocus()
picScreen.SetFocus
End Sub

Private Sub TutoX_Click()
picTuto.Visible = False
End Sub

#4 - Amostras
#Tutoriais In-Game System W7667x7

#5 - Créditos
RenanR
RenanR
RenanR
Membro Veterano
Membro Veterano

Mensagens : 1048

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por GuiinhoLP Qua 27 Fev 2013, 17:35

Muito bom Renan Lv Very Happy
GuiinhoLP
GuiinhoLP
Membro Sênior
Membro Sênior

Mensagens : 257

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por Frozen Qua 27 Fev 2013, 19:07

Organizado em (:
+1 Level up .
Frozen
Frozen
Membro Veterano
Membro Veterano

Mensagens : 1339

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por sushi123 Qua 27 Fev 2013, 19:07

boa !
sushi123
sushi123
Banido
Banido

Mensagens : 188

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por RenanR Qua 27 Fev 2013, 20:01

Obrigado gente.

@sushi123
Mensagem muito curta cuidado com o flood, mas obrigado Smile
RenanR
RenanR
Membro Veterano
Membro Veterano

Mensagens : 1048

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por P-Kawansz Seg 10 Jun 2013, 16:07

acho melhor pegar o proprio sistema de guias que vem no servidor e transferir pro client..
P-Kawansz
P-Kawansz
Novato
Novato

Mensagens : 5

Ir para o topo Ir para baixo

#Tutoriais In-Game System Empty Re: #Tutoriais In-Game System

Mensagem por Conteúdo patrocinado


Conteúdo patrocinado


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