Código Delphi [-]ReadCardResult:= MyCompActX.ReadInformation(CardInformation, 20, 20, 1, 'INGRESE NUM...'); CardInformation2 := CardInformation^;
ReadCardResult:= MyCompActX.ReadInformation(CardInformation, 20, 20, 1, 'INGRESE NUM...'); CardInformation2 := CardInformation^;