Germax escribió:

miqueas150 escribió:

Mafia escribió:Bieen leeo! PERO QUE NO TE PEGEN LOS APORTES

Idem

[ Imagen ]

Vas bien pibe, si me dejar una fotito demostrando la funcionalidad de 10!.

Cuando termine de Formatear la maquina te hago la imagen.. !

Saludos!

Muy lindo el code, gracias por el aporte.

Van monedas.

Te ganastes mi moneda, EXELENTE APORTE, me encanto

me dice no se encontro el metodo o el miembro de datos aca

If UserList(UserIndex).Buscado > 0 And MapInfo(UserList(UserIndex).Pos.Map).Pk = True Then
'Damos el mensaje de que el usuario 'escapoó'
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||" & UserList(UserIndex).name & " ha escapado..." & FONTTYPE_INFO)
UserList(UserIndex).Buscado = 0
UserList(UserIndex).TiempoBuscado = 0
BuscadoExistente = False
'Buscamos uno nuevo
Call BuscaUsuarioACazar
End If

Stum@Fox escribió:me dice no se encontro el metodo o el miembro de datos aca

If UserList(UserIndex).Buscado > 0 And MapInfo(UserList(UserIndex).Pos.Map).Pk = True Then
'Damos el mensaje de que el usuario 'escapoó'
Call SendData(SendTarget.ToIndex, UserIndex, 0, "||" & UserList(UserIndex).name & " ha escapado..." & FONTTYPE_INFO)
UserList(UserIndex).Buscado = 0
UserList(UserIndex).TiempoBuscado = 0
BuscadoExistente = False
'Buscamos uno nuevo
Call BuscaUsuarioACazar
End If

En que parte te salio el error ?

porque ahí me estas poniendo todo el if...