[Brons14]

Помогите разобраться с такой задачей, есть Edit в него пишется число (количество), по нажатии кнопки необходимо, что бы в ADODataSet добавилось количество записей равному указанному числу в Edit, так что бы в поле "Номер" последовательно происходила нумерация 1, 2, 3, и так до i:=StrToInt(Edit1.Text)
что то вроде этого

Код:

var
i: integer;
index: integer;
begin
  index:=0;
 i:=StrToInt(Edit1.Text);
for index:=0 to i do
DataModule2.ExDS.Insert;
DataModule2.ExDS.FieldValues['Номер экземпляра']:=index+1;
 DataModule2.ExDS.Post;

знаю код совершенно не правильный, но смысл я думаю понятен