На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Соблюдайте общие правила форума
Пожалуйста, выделяйте текст программы тегом [сode=pas] ... [/сode]. Для этого используйте кнопку [code=pas] в форме ответа или комбобокс, если нужно вставить код на языке, отличном от Дельфи/Паскаля.
Указывайте точные версии Delphi и используемых сетевых библиотек.

Не приветствуется поднятие старых тем. Если ваш вопрос перекликается со старой темой, то для вопроса лучше создать новую тему, а старую указать в первом сообщении с описанием взаимосвязи.

Внимание:
попытки открытия обсуждений реализации вредоносного ПО, включая различные интерпретации спам-ботов, наказывается предупреждением на 30 дней.
Повторная попытка - 60 дней. Последующие попытки бан.
Мат в разделе - бан на три месяца...

Полезные ссылки:
user posted image MSDN Library user posted image FAQ раздела user posted image Поиск по разделу user posted image Как правильно задавать вопросы


Выразить свое отношение к модераторам раздела можно здесь: user posted image Krid, user posted image Rouse_

Модераторы: Krid, Rouse_
  
> Запись в массив IP-адреса компютеров
    Как записать в массив IP-адреса компьютеров, находящиеся в локальной сети! :wacko:
      так например :)
      ExpandedWrap disabled
        var myarray:array of string;
        ...
        procedure AddIPtoMyArray(newIP:string);
        begin
          SetLength(myarray,Length(myarray)+1);
          myarray[High(myarra)]:=newIP;
        end;

      а если все же вопрос "как найти все компьютеры в сети" - то это здесь:
      http://delphiworld.narod.ru/base/find_all_..._workgroup.html
      а про преобразование имя компа в IP здесь:
      http://delphiworld.narod.ru/base/name_to_ip.html
        Цитата
        ZEE, 18.02.04, 15:38
        SetLength(myarray,Length(myarray)+1);
        myarray[High(myarra)]:=newIP;

        Стиль ужасно знаком :)
          Цитата
          Song, 18.02.04, 17:34
          Стиль ужасно знаком

          :huh: и на чей похож?
            На мой.
              не знал, но может действительно когда-то видел твой пример на похожую тему - и перенял...
              так что копирайт ставить? :)
                Вот здесь например: TabSheet, Memo, определение имени

                Добавлено в :
                ZEE, да нет конечно :))))))
                Просто увидел кусочек кода и сразу понял, что от моего кода перенял :)
                  Цитата
                  Song, 18.02.04, 17:48
                  Вот здесь например: TabSheet, Memo, определение имени
                  Просто увидел кусочек кода и сразу понял, что от моего кода перенял

                  нет, я так стал с динамическими массивами работать гораздо раньше, вобще-то подумал что ни у кого я не перенимал я этого, ну т.е. у Борманцев - может быть - это я из справки по "Dynamic arrays"
                    Ок, ладно не грузись :)
                    Цитата
                    ZEE, 18.02.04, 17:55
                    я так стал с динамическими массивами работать гораздо раньше

                    Ну ты ж не думаешь, что я стал работать с динамическими массивами начиная с этой темы? :D
                      А как на счёт того чтобы описать в коментариях статью, в которой описано как найти компьютеры в сети?! Я сколько непытался понять, так сам и не разобрался!
                        и чтож там коментировать? <_< - там все через WNetOpenEnum / WNetEnumResource делается - их описание есть в хелпе - остальное дело техники - или еще что-то надо? :mellow:
                        0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
                        0 пользователей:


                        Рейтинг@Mail.ru
                        [ Script execution time: 0.0785 ]   [ 16 queries used ]   [ Generated: 23.10.26, 23:01 GMT ]