(Resolvido) [Duvida] Client Chooser

[Mek Fiuchem 212]

Bom eu vi o outro topico aqui do client choose mais nao consigo arrumar eu coloco no Form1

c = clientchooser.showbox

p = c.getclients

mais da esses erros

Warning    1    Access of shared member, constant member, enum member or nested type through an instance; qualifying expression will not be evaluated.    C:\Documents and Settings\Taylor\Meus documentos\Visual Studio 2008\Projects\MF Auto\MF Auto\Form1.vb    12    13    MF Auto

Error 2 Value of type 'System.Collections.Generic.List(Of Tibia.Objects.Client)' cannot be converted to 'Tibia.Objects.Player'. C:\Documents and Settings\Taylor\Meus documentos\Visual Studio 2008\Projects\MF Auto\MF Auto\Form1.vb 12 13 MF Auto

eu queria saber como faz para arrumar :/ Form Inteiro:

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants


Public Class Form1

    Public c As Client

    Public p As Player


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

	    c = ClientChooser.ShowBox

	    p = c.GetClients

    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

	    Main.Show()

    End Sub

End Class

Me ajudem nessa ai por favor ty

[Augusto 660]

Olha só o que você esta fazendo...

O ClientChooser serve exatamente pra não usar o "GetClients", pois ele mesmo faz isso e da a lista dos clientes abertos, agora não intendi o porque você colocou pra variavel "p" receber o valor de "GetClients", pois o "tipo" da variavel "p" é "Player", e não "Client".

No segundo erro ele fala exatamente isso, que não é possivel converter o tipo "Tibia.Objects.Client" para "Tibia.Objects.Player".

Para arrumar isso, você tem que usar o seguinte

p = c.GetPlayer

E novamente digo, procure aprender a programar cara, senão perderá muito tempo com problemas de falta de lógica.

[Mek Fiuchem 212]

Consegui colocar vlws :wow mais tenho outra duvida tipoo show name in tibia

eu coloque isso

    Private Sub ToolStripMenuItem10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem10.Click

	    If ToolStripMenuItem10.Checked = True Then

		    c.Window.Title = "Tibia -  + p.Name + "

	    Else

		    c.Window.Title = "Tibia"

	    End If

    End Sub

quando eu cliclo no toolstripmenuitem10 ele fica checked tudo mais olho no tibia a title fica "Tibia - + p.name +

queria saber como faz ao invez de apareçer "Tibia - + p.name +" apareçer Tibia - Nomedochar

[Kimoszin 1160]

c.Window.Title = "Tibia -  & p.Name & "

Se tu soubesse programação nao perguntaria isso!

[Mek Fiuchem 212]

Digo o msm proce eu coloquei isso adianto nada :/

apareçeu na title no tibia : "Tibia - & p.name &"

[Kimoszin 1160]

c.Window.Title = "Tibia - " & p.Name

[Mek Fiuchem 212]

Object reference not set to an instance of an object.

da linha :

c.Window.Title = "Tibia - " & p.Name

[Kimoszin 1160]

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants

Public Class Form1

    Public Shared c As Client

    Public Shared p As Player


    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

	    c = ClientChooser.ShowBox

	    p = c.GetPlayer

    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

	    c.Window.Title = "Tibia -" & p.Name

    End Sub

End Class

[Mek Fiuchem 212]

ta dando na msm :/

Imports Tibia

Imports Tibia.Util

Imports Tibia.Objects

Imports Tibia.Constants

Public Class Main

	Public Shared Player

	Public Shared Client

Private WithEvents NIcon As New NotifyIcon  

  Private Sub Main_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load, NotifyIcon1.Click

		Client = Tibia.Util.ClientChooser.ShowBox()

	End Sub

	Private Sub ToolStripMenuItem10_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ToolStripMenuItem10.Click

		Client.Window.Title = "Tibia - " & Player.name

	End Sub

End Class

Editado Outubro 20, 2011 por Mek Fiuchem (veja o histórico de edições)

[Guilherme. 189]

Ai ai . . .

c.Window.Title = "Tibia - " & p.Name & " "

Tente assim

Editado Outubro 20, 2011 por Guilherme. (veja o histórico de edições)

[Kimoszin 1160]

Aqui deu certo, TibiaApi 8.6, testei antes de passar para vc!

[Mek Fiuchem 212]

Consegui , Todos reputados , Pode fexar o topico.

Por causa de um simbolo nao tava conseguindo opaskdpoaskdpoaks

Editado Outubro 21, 2011 por Mek Fiuchem (veja o histórico de edições)

[Augusto 660]

Isso é desconhecimento da linguagem que você usa...

Bom, tópico fechado a pedido do autor.