Uia, descobri algo interessante do AScan() / hb_AScan()
Enviado: 29 Ago 2025 16:59
Tava tentando entender alguns erros ao mudar HMG 3 pra OOP.......
Achei...
Isso resulta em ZERO.
mas.....
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".
Achei...
Código: Selecionar todos
PROCEDURE Main
LOCAL aList := { 0, "A", {0,0} }
SetMode(25,80)
CLS
? hb_ASCan( aList, "J" )
Inkey(0)
RETURN
mas.....
Código: Selecionar todos
? AScan( aList, { | e | e == "J" } )
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".