Uia, descobri algo interessante do AScan() / hb_AScan()

[JoséQuintas]

Tava tentando entender alguns erros ao mudar HMG 3 pra OOP.......
Achei...

Código: Selecionar todos

PROCEDURE Main

   LOCAL aList := { 0, "A", {0,0} }

   SetMode(25,80)
   CLS
   ? hb_ASCan( aList, "J" )
   Inkey(0)

   RETURN

Isso resulta em ZERO.

mas.....

Código: Selecionar todos

? AScan( aList, { | e | e == "J" } )

Já isso vai dar erro de type mismatch. tipos diferentes.

A princípio é a mesma pesquisa, mas....

Interessante isso.

Ao alterar HMG3 pra OOP, e alterar o Scan() pra objeto... já sabem o que apareceu pelo caminho.

A explicação é simples: da primeira forma só pesquisa, da segunda forma faz o "cálculo".