Отправляет email-рассылки с помощью сервиса Sendsay

Мастера DELPHI. Новости мира компонент, FAQ, статьи...

Рассылка закрыта

При закрытии подписчики были переданы в рассылку "Delphi - проблемы и решения" на которую и рекомендуем вам подписаться.

Вы можете найти рассылки сходной тематики в Каталоге рассылок.

←   Ноябрь 2002   →
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
Автор
Сергей

Статистика

13.577 подписчиков
-18 за неделю
←   Все выпуски   →

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Информационный Канал Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 24.11.02 09:04

Лучшее из нашего FAQ   |x|
Как найти все компьютеры в рабочей группе? 

var
  Computer      : Array[1..500] of String[25];
  ComputerCount : Integer;

procedure FindAllComputers(Workgroup: String);
Var
  EnumHandle  : THandle; 
  WorkgroupRS : TNetResource; 
  Buf         : Array[1..500] of TNetResource; 
  BufSize     : Integer; 
  Entries     : Integer; 
  Result      : Integer; 

begin 
  ComputerCount := 0;
  Workgroup := Workgroup + #0;
  FillChar(WorkgroupRS, SizeOf(WorkgroupRS) , 0); 
  With WorkgroupRS do begin 
    dwScope := 2; 
    dwType := 3; 
    dwDisplayType := 1; 
    dwUsage := 2; 
    lpRemoteName := @Workgroup[1]; 
  end; 

  WNetOpenEnum( RESOURCE_GLOBALNET, 
                RESOURCETYPE_ANY, 
                0, 
                @WorkgroupRS, 
                EnumHandle ); 

  Repeat

    Entries := 1; 
    BufSize := SizeOf(Buf); 

    Result := 
     WN!
etEnumResource( EnumHandle, 
                       Entries, 
                       @Buf, 
                       BufSize ); 
   If (Result = NO_ERROR) and (Entries = 1) then begin 
      Inc( ComputerCount ); 
      Computer[ ComputerCount ] := StrPas(Buf[1].lpRemoteName); 
    end; 
  Until (Entries <> 1) or (Result <> NO_ERROR); 

  WNetCloseEnum( EnumHandle ); 
end;  { Find All Computers }

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
  • Немодальные окна в dll
    Уважаемые господа! Проблема: при закрытии первой созданной формы в dll вместе с ней закрывается и приложение, как будто ...
  • Опять я с этим ADO
    Доброе утро! Интересная проблема с ADO.Отркрываю транзакцию с самым низким IsolationLevel = ilReadUncommitted .Начинаю ...
  • Олимпиада по информатике 11-кл
    Уважаемае мастера, привожу пример задачи олимпиадной работы самой простой:      Сообщесто роботов живёт по следующим ...
  • Еще раз о транзакциях в MSSQL
    Друзья ! MSSQL+ADO НЕ ДАЕТ ВОЗМОЖНОСТИ ОТКРЫТЬ ВЛОЖЕННЫЕ (NESTED) транзакции.пишет "start more transactions on this ...
  • Написание компонента
    Как в скрытое поле добавить значение выделенной закладки из TTabControl при каждом его изменении
  • Вопрос по БД
    Как в файле БД физически стереть записи помечение как удаленние (чтоби файл постоянно не раздувался)?
  • Keyboard
    Salam Aleykum Как поменят расскладку(keyboard layout (En,Ru,Tr...)) из моего программу.И как определять расскладку. ...
У нас большой выбор статей   |x|
Мир Borland Kylix. Взаимодействие с системой: Linux API и Qt library.
В процессе разработки приложений в средах Delphi и Kylix время от времени возникает необходимость в обращении непосредственно к прикладному интерфейсу системы. Это происходит по двум причинам...
Новинки книжного рынка   |x|
Borland C++ Builder 5. Энциклопедия программиста
Borland C++ Builder 5. Энциклопедия программиста написана большим авторским коллективом под руководством Чарли Калверта и Кента Рейсдорфа и продолжает серию книг о C++ Builder, начатую Чарли Калвертом после выхода в свет первой версии этого замечательного продукта. Все без исключения авторы книги имеют не только многолетний опыт создания коммерческих продуктов при помощи систем программирования C++ Builder и Delphi, но и принимали непосредственное участие в написании большого количества книг соответствующей тематики.Книга написана опытными программистами для опытных программистов и этим она резко отличается от подавляющего большинства других книг о C++ Builder (и вообще других книг, посвященных программированию). В ней вы не найдете подробного и планомерного описания интегрированной среды разработки (IDE), перечисления всех стандартных компонентов, их свойств и методов, а также обсуждения тому подобных вопросов. Взамен этого, авторы сосредоточились на о! бсуждении наиболее сложных разделов программирования с использованием C++ Builder, которые обычно обходятся авторами других книг. Характерным является также и то, что в примерах программ, представленных на поставляемом вместе с книгой компакт-диске, авторы наряду с использованием стандартных возможностей библиотеки VCL, зачастую применяют и функции Windows API.
Автор: Калверт Ч.
Другие сайты о DELPHI   |x|
Бесплатная замена для Делфи :)
На этом сайте можно скачать оболочку для Freepascal :)
Используя бесплатную оболочку плюс бесплатный компилятор - можно писать коммерческие дельфийские проги :)
там GPL лицензия
сам ...
» Оценка сайта: 2
Опрос населения :)
Как часто вы заглядываете на наш сайт?
»»» Регулярно
»»» Раз в неделю
»»» Когда нужна помощь
»»» По почтовой рассылке
»»» Сделал стартовой страницей
Журнал "RSDN Magazine"  |x|

Дорогие друзья! Мы рады представить вам новый совместный проект сайтов www.rsdn.ru, delphi.mastak.ru и www.optim.ru - профессиональный журнал для программистов RSDN Magazine.
Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
На сайте выложен анонс пилотного выпуска журнала, вступительное слово от редакции.

Для души

Хокку дня
Над жаворонками
Отдыхаю в бескрайнем небе
На перевале.

Афоризмы
Седина - признак возраста, а не мудрости....

Фраза дня
Стояла тихая Варфоломеевская ночь.

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В Небраске (США) вам грозит арест, если ваше дите начнет икать во время службы в церкви.
В городе Волдвин парк в Калифорнии (США) официально запрещено заезжать на велосипеде в бассейн.

И на закуску коротенький анекдот
- Доктор, а Вы точно уверены, что у меня 23-я неделя беременности, а не 27-я?
- Абсолютно!
- Боже - я не за того замуж вышла!!!

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=734453

На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 
http://subscribe.ru/
E-mail: ask@subscribe.ru 		Отписаться
Убрать рекламу
В избранное