Código Delphi [-]const ACertificateList: TCertificateList; var AnIndex: Integer); begin AnIndex := -1; end;
const ACertificateList: TCertificateList; var AnIndex: Integer); begin AnIndex := -1; end;