Цитата:
|
Сообщение от Aristarh Dark
Скорее всего у тебя i за пределами длины ItemList
|
ругаеться
---------------------------
Financialadvisor
---------------------------
Access violation at address 0047A1E7 in module 'FinancialAdvisor.exe'. Read of address 00000024.
---------------------------
ОК
---------------------------
Код:
i:=ListViewRashod.itemindex;
//индексу i присваиваеться выделенная строка ListViewRashod
ListViewRashod.Items.Delete(i-1);
ItemList[i].AllDateArray:=0;
ItemList[i].Statya:='';
ItemList[i].Summa:=0;
ItemList[i].skidka:=0;
ItemList[i].schet:='';
ItemList[i].val:='';
ItemList[i].com:='';
setLength(ItemList,i-1);