ItemPainter по идее QaK

[Johnson]

решил проблему... скопировал itemsid.ini в папку скриптов...

[NLObP]

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

решил проблему... скопировал itemsid.ini в папку скриптов...

Это конечно тоже решение, но надо было исправить в процедуре INIT

procedure Init; //Вызывается при включении скрипта
begin
  FormMain:=Create_FormMain;
  stats.Lines.Add('Скрипт: Рисование предметами by ArchDevil!');
  timer:=TTimer.Create(nil);
  timer.OnTimer:=@OnTimer;
  timer.enabled:=false;
  timer.interval:=700; //время задержки
  ready:=false;
  StringList:=TStringList.Create;
  ItemsName:=TStringList.Create;
  try
    ItemsName.LoadFromFile('itemsid.ini');
  except
    stats.Lines.Add('itemsid.ini не найден!');
    exit;
  end;
  buf:=hstr('0F');
  SendToServerEx(Name);
end;

вот эти строчки

try
  ItemsName.LoadFromFile('itemsid.ini');
except
  stats.Lines.Add('itemsid.ini не найден!');
  exit;
end;

на такую

ItemsName.LoadFromFile('.\settings\itemsid.ini');