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

RusFAQ.ru: Программирование на Delphi


РАССЫЛКИ ПОРТАЛА RUSFAQ.RU

/ КОМПЬЮТЕРЫ И ПО / Языки программирования / Delphi

Выпуск № 930
от 20.09.2007, 14:05

Администратор:Калашников О.А.
В рассылке:Подписчиков: 464, Экспертов: 78
В номере:Вопросов: 3, Ответов: 4


Вопрос № 102036: Привет Експерти. Мне нужно получить список имен всех пользователей. Имя активного пользователя узнать просто(getusername), а получить список всех не знаю как. Помогите. Моя жизнь вваших руках. :-) Спасибо. ...
Вопрос № 102068: Уважаемые эксперты, у меня к вам 2 вопроса 1) как создать собственный компонент 2) как создать компонент унаследованный от существующего в делфи. ..
Вопрос № 102118: Как можно проерить является ли строка IP адрессом или доменом...

Вопрос № 102.036
Привет Експерти.
Мне нужно получить список имен всех пользователей.
Имя активного пользователя узнать просто(getusername), а получить список всех не знаю как.
Помогите.
Моя жизнь вваших руках. :-)
Спасибо.
Отправлен: 14.09.2007, 14:04
Вопрос задал: Мельник Віктор Ананійович (статус: Посетитель)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 0)

Отвечает: Coupler
Здравствуйте, Мельник Віктор Ананійович!
В прикрепленном файле - исходник, получающий список всех пользователей в системе (NT, 2k, XP). Нужные функции также лежат в приложении. Взято с DRKB

Приложение:

Прикреплённый файл: Загрузить >>
Срок хранения файла на сервере RusFAQ.ru составляет 30 суток с момента отправки ответа.

Ответ отправил: Coupler (статус: Практикант)
Ответ отправлен: 14.09.2007, 14:17


Вопрос № 102.068
Уважаемые эксперты, у меня к вам 2 вопроса

1) как создать собственный компонент
2) как создать компонент унаследованный от существующего в делфи.

Отправлен: 14.09.2007, 18:52
Вопрос задал: Кэр Лаэда (статус: Студент)
Всего ответов: 1
Мини-форум вопроса >>> (сообщений: 1)

Отвечает: Gh0stik
Здравствуйте, Кэр Лаэда!

Поскольку данный вопрос весьма объемен, то осмелюсь предложить Вам такие две книги:
Рэй Конопка. Создание оригинальных компонент в среде Delphi
Рэй Конопка Создание оригинальных компонент в среде Delphi Книга написана известным автором и разработчиком Рэем Конопкой и посвящена построению профессиональных компонент визуальной среды разработки Delphi. Рассматриваются вопросы, связанные с основными аспектами объектно-ориентированного программирования, работы в среде Delphi, языка Object Pascal и визуального подхода к быстрой разработке приложений....

Михаил Голованов, Евгений Веселов. Создание компонентов в среде Delphi. Руководство разработчика
Книга посвящена созданию компонентов на языке Object Pascal, предназначенных для использования в средах разработки фирмы Borland. Описываются особенности реализации ООП в Object Pascal и библиотеки классов VCL и CLX. Показывается, как расширять имеющиеся компоненты и писать собственные компоненты "с нуля". Рассматриваются невизуальные, графические и оконные компоненты, а также компоненты для работы с СУБД. Представлен процесс создания редакторов компонентов и их свойств, широко применяемых в Delphi. Даны практические рекомендации по распространению готовых компонентов и встраиванию их в среду разработки, по написанию справочной системы для разработанных компонентов, по расширению возможностей IDE Delphi. Приведено подробное описание малодокументированной возможности Object Pascal, связанной с получением и использованием информации времени выполнения (RTTI). Изложение сопровождается большим количеством примеров самых различных типов компонентов....

Good Luck!!!
---------
Господь Бог - это всего лишь сверхмощный генератор случайных чисел, в соответствии с которыми сочетаются события на Земле. Генератор случайных чисел - и только.
Ответ отправил: Gh0stik (статус: Профессор)
Украина, Славянск
Организация: Славянский государственный педагогический университет (Кафедра алгебры)
ICQ: 289363162
----
Ответ отправлен: 14.09.2007, 23:03


Вопрос № 102.118
Как можно проерить является ли строка IP адрессом или доменом
Отправлен: 15.09.2007, 11:49
Вопрос задал: Зиновьев Максим Александрович (статус: Посетитель)
Всего ответов: 2
Мини-форум вопроса >>> (сообщений: 3)

Отвечает: Denisss

Здравствуйте, Зиновьев Максим Александрович!

Самый простой способ проверки, является ли введенная строка IP-адресом - это проверка последнего символа строки. В доменных адресах последний символ никогда не является цифрой:

var
  addr: String;
...
  if not (addr[Length(addr)] in ['0'..'9']) then
    MessageBox(Handle, PChar(addr + ' не является IP-адресом'),
      'IsIPAddress', MB_ICONASTERISK);


Второй вариант (посложнее) - воспользоваться приведенной в приложении функцией. Данная функция проверяет, является ли введенная строка правильным IP-адресом (т.е. адресом вида: 0..255.0..255.0..255.0..255).

Пример использования функции:

  if not IsIPAddress(Edit1.Text) then
    MessageBox(Handle, PChar(Edit1.Text + ' не является IP-адресом'),
      'IsIPAddress', MB_ICONASTERISK);


Удачи!

Приложение:

Ответ отправил: Denisss (статус: Профессионал)
Россия, Москва
----
Ответ отправлен: 15.09.2007, 13:13
Оценка за ответ: 5
Комментарий оценки:
Спасибо, то что надо

Отвечает: Багель Александр
Здравствуйте, Зиновьев Максим Александрович!

Можно воспользоваться следующим кодом.
Здесь первоначально предполагается что передан IP адрес, но если inet_addr вернет ошибку, тогда предполагается что передано UNC имя. Если это не так, то gethostbyname вернет ошибку.

Приложение:

Ответ отправил: Багель Александр (статус: 1-ый класс)
Ответ отправлен: 17.09.2007, 10:02
Оценка за ответ: 5


Отправить вопрос экспертам этой рассылки

Приложение (если необходимо):

* Код программы, выдержки из закона и т.п. дополнение к вопросу.
Эта информация будет отображена в аналогичном окне как есть.

Обратите внимание!
Вопрос будет отправлен всем экспертам данной рассылки!

Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или
экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.


Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)!
Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.


© 2001-2007, Портал RusFAQ.ru, Россия, Москва.
Авторское право: ООО "Мастер-Эксперт Про"
Техподдержка портала, тел.: +7 (926) 535-23-31
Хостинг: "Московский хостер"
Поддержка: "Московский дизайнер"
Авторские права | Реклама на портале
Версия системы: 4.59 от 18.09.2007
Яндекс Rambler's Top100
RusFAQ.ru | MosHoster.ru | MosDesigner.ru | RusIRC.ru
Kalashnikoff.ru | RadioLeader.ru | RusFUCK.ru

В избранное