Universo Games
Ola , Convidado



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

Vendo membro da Guild Online

Ver o tópico anterior Ver o tópico seguinte Ir em baixo

Tutorial Vendo membro da Guild Online

Mensagem por Lucas Roberto em Dom 14 Nov 2010, 12:31

Bom pessoal Mais um Tutorial como ver player da Guild Online
Primeiro Cria uma Form com Nome "frmGuildMembers" eo caption "Membros da Guild Online"
de dois Clica na Form e adiciona isso:
Código:
 Timer1.Enabled = True
lblGuild.Caption = "Guild: " & GetPlayerGuild(MyIndex)
Bom Cria um ListBox com nome "lstMembers"
agora cria um timer ponha em sua propriedade seu interval de "500"
de dois clique e adiciona
Código:
 lstMembers.Clear
lstMembers.AddItem ("-Membros da Guild Online-")
For I = 1 To MAX_PLAYERS
If IsPlaying(I) Then
If GetPlayerGuild(I) = GetPlayerGuild(MyIndex) Then
lstMembers.AddItem (GetPlayerName(I))
End If
End If
Next I
Agora Cria uma label com nome "lblGuild" e caption "Guild:"
Agora crie um CommandButton com qualquer name mais com caption "Sair da Guild"
De dois Clique e adiciona:
Código:
Dim Packet As String
Packet = "GUILDLEAVE" & END_CHAR
Call SendData(Packet)
Timer1.Enabled = False
Unload Me
agora para fechar a form cria uma label com qualquer nome e qualquer caption
de dois clique e adicione:
Código:
 Timer1.Enabled = False
Unload Me
agora para abrir o Form e presiso criar um Botão
de dois clique e adiciona:
Código:
 frmGuildMembers.Visible = True

Pronto Pessoal
Creditos
ΩLuucαs Robεεrto


Última edição por ΩLuucαs Robεrto em Dom 26 Fev 2012, 08:58, editado 1 vez(es)

_______________________________________________________________________________________________________


[Você precisa estar registrado e conectado para ver esta imagem.]
avatar
Lucas Roberto

Mensagens : 706

http://universogamesmmo.forumeiros.com

Voltar ao Topo Ir em baixo

Tutorial Re: Vendo membro da Guild Online

Mensagem por NuKeNiN em Dom 03 Jul 2011, 21:31

kra vlw eu tava tentano acha isso, obrg
avatar
NuKeNiN

Mensagens : 67

Voltar ao Topo Ir em baixo

Ver o tópico anterior Ver o tópico seguinte Voltar ao Topo

- Tópicos similares

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