none
Работа с сетью Delphi RRS feed

  • Вопрос

  • Язык программирования Delphi 7. Помогите пожалуйста. Я делаю программу которая работает с фтп и при запуске программы брандмауэр блокирует ей доступ в сеть и поэтому она критически закрывается, с ошибкой timeout. с выключенным брандмауэром программа работает без ошибок. Помогите пожалуйста как сделать, что бы при установке программу можно было занести в исключения либо как изменить код, что бы брандмауэр не ругался.

    И еще 1 вопрос, у меня прорамма использует копирование файлов/их изменение/удаление ( txt либо html) находящихся в папке прогарммы( ну или во вложенных каталогах)

    Защита windows ругается на содержание вируса, так как же мне использовать данные функции, что бы система не реагировала (нужно сделть что бы все работало не только у меня, но и у конечного пользователя).

    Код фтп который блокирует брандмауэр windows:

    begin
    if idftp1.Connected then
    begin
    IdFTP1.List(memo1.Lines,'*.html',false); end
    else   begin
    IdFTP1.Host:='*****';
    IdFTP1.Username:='***';
    IdFTP1.Password:='*******';

    IdFTP1.Connect(true);
    if idftp1.Connected then
     begin
     IdFTP1.ChangeDir('freeannex.ru/guidesuite/');

      IdFTP1.List(memo1.Lines,'*.html',false);
    end;     end;
    end;


    • Изменено ychelovek 4 декабря 2012 г. 14:19
    4 декабря 2012 г. 14:12

Ответы

Все ответы