[nneett]

Сообщение от Fer123

nneett,
я вместо этого

repeat
            ItemOID:=GetItemEnchant(ItemID, CurEnchLvl);
            if ItemOID=0 then begin
              inc(CurEnchLvl);
              Edit2.text:=inttostr(CurEnchLvl);
            end;
          until ItemOID<>0;

CurEnchLvl получаю в InventoryUpdate для определенного ItemOID
Это как раз эффективно когда точишь блесс точками.

Если убрать эти строчки, то не идет проверка на сколько заточена вещь и он точит, пока точки не закончатся. А так, так же зависает, при сбросе точки не на 0, а на 15.