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

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


Информационный Канал Subscribe.Ru

Ежедневная рассылка сайта Мастера DELPHI

DELPHIMASTER.ru

Выпуск от 28.06.04 09:18

Акция !

Внимание!Акция в поддержку отечественного производителя ПО. Подробнее...

Лучшее из нашего FAQ   |x|
Как опеределить состояние модема под Win32?
См. пример
Пример:

procedure TForm1.Button1Click(Sender: TObject);
var
CommPort : string;
hCommFile : THandle;
ModemStat : DWord;
begin
CommPort := 'COM2';

{Open the comm port}
hCommFile := CreateFile(PChar(CommPort),
GENERIC_READ,
0,
nil,
OPEN_EXISTING,
FILE_ATTRIBUTE_NORMAL,
0);
if hCommFile = INVALID_HANDLE_VALUE then
begin
ShowMessage('Unable to open '+ CommPort);
exit;
end;

{Get the Modem Status}
if GetCommModemStatus(hCommFile, ModemStat) <> false then begin
if ModemStat and MS_CTS_ON <> 0 then
ShowMessage('The CTS (clear-to-send) is on.');
if ModemStat and MS_DSR_ON <> 0 then
ShowMessage('The DSR (data-set-ready) is on.');
if ModemStat and MS_RING_ON <> 0then
ShowMessage('The ring indicator is on.');
if ModemStat and MS_RLSD_ON <> 0 then
ShowMessage('The RLSD (receive-line-signal-detect) is
on.');
end;

{Close the comm port}
CloseHandle(hCommFile);
end;


Источник: Дельфи. Вокруг да около.



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

Обсуждается в конференциях   |x|
  • TreeView на WinAPI
    Уважаемые знатоки WinAPI. Подскажите как нарисовать TreeView используя WinAPI ? Все что я нашел по этому вопросу для ...
  • Альтернатива TCanvas и указателям?
    Пишу небольшой программатор для гирлянды на 4 канала. Понятно, что у лампочки 2 состояния (горит, не горит) и все это ...
  • Asteroid Killer
    Вот скачал с DelphiX пример игрушки - Delphi Rocks. Переделал, добавил оружие, звуки, некоторые эффекты. http://www....
  • Архив форума KOL
    Можно ли где-нибудь взять архив только одного форума по KOL. Возможно, что вопросы с которыми я сталкиваюсь, уже ...
  • Оле объект и База данных
    Здравствуйте. Подскажите пожайлуста как можно сохранить в базу данных в блоб поле ОЛЕ объект, вернее в ОЛЕ загружен ...
  • Передача файлов
    Как в локальной сети можно передовать файлы?
  • Как получить указатель на функцию?
    Надо передать в DLL адрес функции, а потом её вызвать из DLL. Проблема в том, что DLL на С++, а прога на Делфи. С ...
У нас большой выбор статей   |x|
Серия статей. Kylix Tutorial. 3. Работа с базами данных через dbExpress. Коннект - есть коннект.
Сегодня мы продолжим рассмотрение и сосредоточимся на компоненте SQLConnection.
Новинки книжного рынка   |x|
Технологии передачи данных. 7-е изд.
В книге рассматриваются современные технологии передачи данных и перспективы их развития. Освещаются основные аспекты передачи информации, от структуры сетей до безопасности их использования. Представлены технологии, позволяющие существенно улучшить качество работы отдельных пользователей, а также корпораций и государственных учреждений. Издание содержит подробные сведения, необходимые для понимания функционирования различных систем передачи данных — от кабельных сетей до беспроводных спутниковых систем. Книга предназначена как профессионалам в области систем коммуникации, так и студентам технических специальностей.
Автор: Хелд Г.
Опрос населения :)
Новый журнал для программистов "RSDN Magazine". Ваше мнение, нужен ли он вообще?
»»» Да
»»» Нет
Для души

Хокку дня
Плотно закрыла рот
раковина морская.
Невыносимый зной!

Афоризмы
Никто так не нуждается в отпуске, как человек, только что вернувшийся из отпуска (Элберт Хаббард)

Фраза дня
Никогда человек не бывает так близок к совершенству, как при заполнении анкеты на работу.

Дурацкие законы (информация предоставлена сайтом kurilka.com)
В городе Чико в Калифорнии (США) штраф до 500 долларов, грозит всякому, кто взорвет в пределах города ядерное устройство. Интересно, кто это штраф будет взымать?
В Нью Орлеане (США) нельзя призязывать крокодилов к гидрантам.

И на закуску коротенький анекдот
В аудитоpию заглядывает голова (по внешнему виду не cовcем тpезвая) и пpоизноcит:
- Ик! Это теcт! Меня видно?!

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


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

Добро пожаловать на сайт -= Мастера DELPHI =- 

http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться

В избранное