Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате
Форум программистов > Delphi: Сети > Рекомендации при проблемах с Indy


Автор: MetalFan 28.3.2008, 14:26
Много вопросов возникает у программистов, которые при попытке написать что-нибудь сетевое с использованием библиотеки Indy, столкнулись с разными проблемами.
В большей части случаев проблем удается избежать, 
если отказаться от устаревшей версии Indy, поставляемой вместе с самой Delphi (особенно это касается старых версий Delphi - 6,7) и установить более свежую.

Ссылки:
  • http://www.indyproject.org/.
  • Официальный файловый архив: ftp://indy.fulgan.com/ и http://indy.fulgan.com/ 
  • На 25 мая 2011 года последней версией является http://indy.fulgan.com/ZIP/Indy10_4640.zip
  • http://indy.fulgan.com/SSL/
  • http://www.indyproject.org/Sockets/Docs/Indy10Installation.EN.aspx
  • http://forums2.atozed.com/viewforum.php?f=7
Модератор: Просьба ко всем!
НЕ ЗАСОРЯЙТЕ ТЕМУ вопросами!
Здесь только общие рекомендации по установке/использованию/решению классических проблем. 
Для вопросов создавайте отдельные темы.

Автор: Akella 23.1.2010, 15:51
Рекомендация при установке новой версии Indy. Перед удалением текущей версии и установкой новой обязательно сохраните текущую удаляемую версию. 
Может случиться вот как у меня: Удалил полностью старую версию. Скачал и начал устанавливать новую. При установке ошибки. Всё, тупик. 
На их форуме просто так ничего не спросишь. Там даже сообщение твоё могут не пропустить.

Автор: CodeMonkey 6.6.2010, 13:44
Цитата(Akella @  20.1.2010,  12:29 Найти цитируемый пост)
Конктент грузится, хоть и с ошибкой, но Memo1.Text вместо кириллицы знаки вопросов ??? ?????? ????. 
memo1.text := UTF8ToAnsi(idHttp1.Get('http://novorossiysk.irr.ru/advert/55647524/')); 

http://www.delphikingdom.ru/asp/answer.asp?IDAnswer=68134.

Автор: Akella 21.6.2010, 13:11
Я уже давно нашёл у нас на форуме умную функцию перекодировки
Код

function UTF8ToStrSmart(Value: String): String;


      function UTF8ToStr(Value: String): String;
      var
        buffer: Pointer;
        BufLen: LongWord;
      begin
        BufLen := Length(Value) + 4;
        GetMem(buffer, BufLen);
        FillChar(buffer^, BufLen, 0);
        MultiByteToWideChar(CP_UTF8, 0, @Value[1], BufLen - 4, buffer, BufLen);
        Result := WideCharToString(buffer);
        FreeMem(buffer, BufLen);
      end;


var
  Digit: String;
  i: integer;
  HByte: Byte;
  Len: Byte;
begin
  Result := '';
  Len := 0;
  if Value = '' then Exit;
  for i := 1 to Length(Value) do
  begin
    if Len > 0 then
    begin
      Digit := Digit + Value[i];
      Dec(Len);
      if Len = 0 then
        Result := Result + UTF8ToStr(Digit);
    end else
    begin
      HByte := Ord(Value[i]);
      if HByte in [$00..$7f] then       //Standart ASCII chars
        Result := Result + Value[i]
      else begin
        //Get length of UTF-8 char
        if HByte and $FC = $FC then
          Len := 6
        else if HByte and $F8 = $F8 then
          Len := 5
        else if HByte and $F0 = $F0 then
          Len := 4
        else if HByte and $E0 = $E0 then
          Len := 3
        else if HByte and $C0 = $C0 then
          Len := 2
        else begin
          Result := Result + Value[i];
          Continue;
        end;
        Dec(Len);
        Digit := Value[i];
      end;
    end;
  end;
end;

Автор: MetalFan 25.5.2011, 10:37
Модератор: Потерты все старые неактуальные сообщения, а так же сообщения не по теме.

Автор: Akella 13.1.2013, 14:30
Переустановка Indy/как переустановить indy
удаление indy/как удалить встроенную версию indy


Цитата

Перейдите в окно Install Packages (Component->Install Packages), уберите галочки из всех пакетов Indy и удалите их нажав кнопку Remove.
Затем откройте окно настроек среды (Tools->Options->Library Win32/64) и удалите из строки Library path пути к исходным кодам Indy(они могут отсутствовать). Удобно пользоваться диалоговым окном, которое открывается нажатием на кнопку [...].
 
После этого добавьте в Library path 3 пути:
<Полный путь>\Lib\System
<Полный путь>\Lib\Core
<Полный путь>\Lib\Protocols
 
Закройте Delphi.
Удалите из директории с установленной Delphi исходные коды Indy. Обычно они располагаются в папке <папка с Delphi>/sources/Indy (папку также можно удалить).
Из папки Lib, которая располагается по адресу <папка с Delphi>/lib, удалите файлы
Код:
 
IndySystem*.*
IndyCore*.*
IndyProtocols*.*
dclIndyCore*.*
dclIndyProtocols*.*
 
Удаление завершено, приступим к установке.
Запустите Delphi, и откройте пакет IndySystemX0.dpk (где X – это ваша версия Delphi), который располагается по следующему адресу: <папка Indy>\Lib\System и скомпилируйте его.
Затем откройте пакет IndyCoreX0.dpk из папки <папка Indy>\Lib\Core и скомпилируйте его.
После этого откройте и скомпилируйте пакет IndyProtocolsX0.dpk, который располагается в папке <папка Indy>\Lib\Protocols.
Далее откройте пакет dclIndyCoreX0.dpk, который располагается в папке <папка Indy>\Lib\Core и установите его, после также установите пакет dclIndyProtocolsX0.dpk из папки <папка Indy>\Lib\Protocols.
 
Описанный выше порядок очень важен, компилируйте и устанавливайте пакеты именно в указанной последовательности.
 
Вот и все, поздравляю, теперь у вас установлена нужная вам версия Indy.
 
Если у Вас возникает следующая ошибка:
RLINK32: Error opening File packagename.drf
Попробуйте следующий метод:
- Удалите все .DCP и .BPL файлы из пакета.
- Откройте .DPK файл в IDE, перейдите в параметры проекта, установите Build Control на "Explicit Rebuild".
- Скомпилируйте пакет.
- Повторите эти действия для каждого зависимого пакета. 


http://forum.ru-board.com/topic.cgi?forum=33&topic=11977&start=1040#6

Powered by Invision Power Board (http://www.invisionboard.com)
© Invision Power Services (http://www.invisionpower.com)