Порт!

Тема в разделе "Delphi - Система", создана пользователем Codekid, 16 авг 2006.

Наш партнер Genesis Hackspace
Статус темы:
Закрыта.
  1. Codekid

    Codekid Гость

    как открыть 6112 порт c помощбю delphi?
     
  2. sdriver

    sdriver Гость

    В warcraft решил поиграть :)
    попробуй отключить защиту, типа брандмаудера и других прог-фаерволов
     
  3. Codekid

    Codekid Гость

    создавать немагу

    тут или ip нет или порт закрыт
     
  4. Codekid

    Codekid Гость

    никто незнает чтоль?:D
     
  5. ????

    ???? Гость

    <!--QuoteBegin-Codekid+18:08:2006, 10:12 -->
    <span class="vbquote">(Codekid @ 18:08:2006, 10:12 )</span><!--QuoteEBegin-->никто незнает чтоль
    [snapback]42433" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    просто вопрос поставлен неоднозначно.<!--QuoteBegin-Codekid+16:08:2006, 15:47 -->
    <span class="vbquote">(Codekid @ 16:08:2006, 15:47 )</span><!--QuoteEBegin-->как открыть 6112 порт c помощбю delphi
    [snapback]42315" rel="nofollow" target="_blank[/snapback]​
    [/quote]
    Код (Text):
    procedure TForml.ButtonlClick(Sender: TObject);
    var
    i:Integer;
    ipstr:String;
    begin
    ipstr:='127.0.0.1';
    TcpClientl.RemotePort:=IntToStr(6112);
    //Пытаемся открыть
    TcpClientl.Open;
    //Если удалось, то сообщаем об этом
    if TcpClientl.Connected then
    ShowMessage(IntToStr(6112)+' открыт');
    //Закрываем порт
    TcpClientl.Close;
    end;
     
  6. Barmutik

    Barmutik Гость

    Если он заблокирован(занят) скажем каким либо программно аппартным средством к которому вы не имеете доступа .. то "открыть" его никак не получится...
     
Загрузка...
Похожие Темы - Порт
  1. Evgeniy777
    Ответов:
    4
    Просмотров:
    173
  2. WebWare Team
    Ответов:
    6
    Просмотров:
    473
  3. abdurtim
    Ответов:
    0
    Просмотров:
    172
  4. nomad981
    Ответов:
    0
    Просмотров:
    117
  5. s2004
    Ответов:
    0
    Просмотров:
    181
Статус темы:
Закрыта.

Поделиться этой страницей