With Thisform Local laDig1, laDig2 Dimension laDig1[.oleCaptura.MinutiaeSize] As Byte Dimension laDig2[.oleCaptura.MinutiaeSize] As Byte If .oleCaptura.LiveCapture(6000,50) Do While Not .oleCaptura.IsCaptured Enddo Comarray(.oleCaptura,10) If .oleCaptura.GetMinutiaeData(@laDig1) Thisform.oleCaptura.Clear() If .oleCaptura.LiveCapture(6000,50) Do While Not .oleCaptura.IsCaptured Enddo Comarray(.oleCaptura,10) If .oleCaptura.GetMinutiaeData(@laDig2) Comarray(.oleCaptura,10) Messagebox(.oleVerifica.GetMatchingScore(laDig1, laDig2),64,"Score") && Always returns 0, value must be greater than 100! Comarray(.oleCaptura,10) If .oleVerifica.Register(laDig1, laDig2) && Return invalid parameter error Else Messagebox(.oleVerifica.ErrorString,16,"Erro 1") Endif Else Messagebox(.oleCaptura.ErrorString,16,"Erro 2") Endif Else Messagebox(.oleCaptura.ErrorString,16,"Erro 3") Endif Else Messagebox(.oleCaptura.ErrorString,16,"Erro 4") Endif Else Messagebox(.oleCaptura.ErrorString,16,"Erro 5") Endif Comarray(.oleCaptura) Endwith