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  Registrar-seRegistrar-se  Conectar-seConectar-se  
Ola Convidado, Seja Bem vindo a equipe lhe deseja boa sorte no seu projeto!

Compartilhe | 
 

 Vendo membro da Guild Online

Ir em baixo 
AutorMensagem
Lucas Roberto
Administrador
Administrador
avatar

Mensagens : 709

MensagemAssunto: Vendo membro da Guild Online   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

_______________________________________________________________________________________________________


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


Última edição por ΩLuucαs Robεrto em Dom 26 Fev 2012, 08:58, editado 1 vez(es)
Voltar ao Topo Ir em baixo
http://universogamesmmo.forumeiros.com
NuKeNiN
Praticante
Praticante
avatar

Mensagens : 67

MensagemAssunto: Re: Vendo membro da Guild Online   Dom 03 Jul 2011, 21:31

kra vlw eu tava tentano acha isso, obrg
Voltar ao Topo Ir em baixo
 
Vendo membro da Guild Online
Voltar ao Topo 
Página 1 de 1
 Tópicos similares
-
» ASSISTIR SUPERNATURAL 10 TEMPORADA DUBLADO E LEGENDADO ONLINE
» Pack 1.250 100% Sistems! 0 Bugs! Ranking [ONLINE]
» YUUP.ONLINE
» TOP 5 - Jogos que resistiram ao tempo
» Gameplay de FEZ e Link online e grátis para o filme "INDIE GAME: THE MOVIE"!

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