В индексированной таблице Paradox нужно вставить запись в определённое место. После команды tbl->Insert() запись сортируется согласно сортировки индекса и улетает.
Подскажите, есть ли база в которой можно вставить запись только командой Insert()? Или как изменить код, чтобы не пробегать по всем записям.

void __fastcall TDM::InsertRec(void)
{
int inc = tblTrucksInc->AsInteger;
tblTrucks->Insert();
TBookmark Rec = tblTrucks->GetBookmark();
tblTrucks->DisableControls();
tblTrucksInc->Value = inc - 1 ;
// Прохожу таблицу снизу, уменьшая знач индекса
tblTrucks->Last();
while( tblTrucksInc->AsInteger >= inc )
{
tblTrucks->Edit();
tblTrucksInc->Value = tblTrucksInc->Value + 1 ;
tblTrucks->Prior();
};
tblTrucks->Edit();
tblTrucksInc->Value = inc ;
tblTrucks->Post();
tblTrucks->GotoBookmark(Rec);
tblTrucks->FreeBookmark(Rec);
tblTrucks->EnableControls();
}