Código Delphi [-]SetLength(Array_idmatriculas_incorr, cont_arr); Array_idmatriculas_incorr[cont_arr]:=dm.IBQuery1.FieldByName('id').AsInteger; inc(cont_arr,1);
SetLength(Array_idmatriculas_incorr, cont_arr); Array_idmatriculas_incorr[cont_arr]:=dm.IBQuery1.FieldByName('id').AsInteger; inc(cont_arr,1);