GS-Zone

No encuentro una linea :P Ir al Indice

Moderadores: Moderadores de Argentum, Especialistas de Argentum, Especialistas de Programación

8

Nota » 10 Oct 2011 14:05

La cosa es asi, estube con un chabon pasando este codigo posteado en la 13.0
ft70327_npc_vende_items_por_copas.html
Y me paso todo el servidor para la 12.1 y yo me puse con el cliente y me buscaba todo, sin errores, pero cuando fui a buscar esta linea no me aparece por Ningun lado, se las dejo aver si me pueden decir como seria en la 12.1, gracias...



Y esto pasarlo a 12.1 porque me saltan errores al compilar

<Staff Zarate-AO>
59 (-1)
Aprendiz [1]
Registrado: Años de membresíaAños de membresía
Ubicación: Intentando Programar
Mensajes: 225

Nota » 10 Oct 2011 22:36

Tenes que buscar esta linea:
  1. Label1(1).Caption = Round(NPCInventory(List1(0).ListIndex + 1).Valor * Val(cantidad.Text), 0) 'No mostramos numeros reales


Y el if seria:
  1. If NPCInventory(itemslot).Copas > 0 Then
  2. Label1(1).Caption = "Valor en copas : " & NPCInventory(itemslot).copas
  3. Else
  4. Label1(1).Caption = Round(NPCInventory(List1(0).ListIndex + 1).Valor * Val(cantidad.Text), 0) 'No mostramos numeros reales
  5. End If


Saludos ^^

Imagen
Imagen
Staff Zeiked-Games
641
Dragon Ancestral [3]
Registrado: Años de membresíaAños de membresía
Ubicación: Castelar
Mensajes: 3416
Aportes: 66
Premios: 3
Usuario omnipresente (1) Embajador (2)

Nota » 11 Oct 2011 19:36

Me salta Variable no Definida y me marca itemslot
<Staff Zarate-AO>
59 (-1)
Aprendiz [1]
Registrado: Años de membresíaAños de membresía
Ubicación: Intentando Programar
Mensajes: 225

Nota » 11 Oct 2011 21:02

gonza5a escribió:Me salta Variable no Definida y me marca itemslot


Fijate asi:
  1. If NPCInventory(slot).Copas > 0 Then
  2. Label1(1).Caption = "Valor en copas : " & NPCInventory(slot).copas
  3. Else
  4. Label1(1).Caption = Round(NPCInventory(List1(0).ListIndex + 1).Valor * Val(cantidad.Text), 0) 'No mostramos numeros reales
  5. End If

Imagen
Imagen
Staff Zeiked-Games
641
Dragon Ancestral [3]
Registrado: Años de membresíaAños de membresía
Ubicación: Castelar
Mensajes: 3416
Aportes: 66
Premios: 3
Usuario omnipresente (1) Embajador (2)

Nota » 11 Oct 2011 21:10

Me marca Slot igualmente, y no me habia dado cuenta que esta linea que me dijistes que busque me aparece 2 veces y no se cual es.

Label1(1).Caption = Round(NPCInventory(List1(0).ListIndex + 1).Valor * Val(cantidad.Text), 0) 'No mostramos numeros reales
<Staff Zarate-AO>
59 (-1)
Aprendiz [1]
Registrado: Años de membresíaAños de membresía
Ubicación: Intentando Programar
Mensajes: 225

Nota » 11 Oct 2011 21:29

gonza5a escribió:Me marca Slot igualmente, y no me habia dado cuenta que esta linea que me dijistes que busque me aparece 2 veces y no se cual es.

Label1(1).Caption = Round(NPCInventory(List1(0).ListIndex + 1).Valor * Val(cantidad.Text), 0) 'No mostramos numeros reales


Y depende, lee, en el post ese de la 13.x donde lo pide, aparece en frmcomerciar, y frmbancobj, fijate en cual lo tenes que poner.

Saludos ^^

Imagen
Imagen
Staff Zeiked-Games
641
Dragon Ancestral [3]
Registrado: Años de membresíaAños de membresía
Ubicación: Castelar
Mensajes: 3416
Aportes: 66
Premios: 3
Usuario omnipresente (1) Embajador (2)

Nota » 11 Oct 2011 22:39

Okey pero me salta error de compilacion y me marca slot...
<Staff Zarate-AO>
59 (-1)
Aprendiz [1]
Registrado: Años de membresíaAños de membresía
Ubicación: Intentando Programar
Mensajes: 225

Nota » 12 Oct 2011 00:59

gonza5a escribió:Okey pero me salta error de compilacion y me marca slot...


Estube revisando los 2 codigos, declara donde pongas el if, dim slot as byte.

Saludos ^^

Imagen
Imagen
Staff Zeiked-Games
641
Dragon Ancestral [3]
Registrado: Años de membresíaAños de membresía
Ubicación: Castelar
Mensajes: 3416
Aportes: 66
Premios: 3
Usuario omnipresente (1) Embajador (2)


Volver a AO 0.12.x

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados