Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Система";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Вниз

Com-порт   Найти похожие ветки 

 
Verg   (2003-09-05 13:34) [40]

Не, ну чес-слово, ну по 25-му кругу уже понесло....

> -=Vlad=- © (05.09.03 13:29) [38]


Ну может он выдать одиночный импульс, может:


SetCommBreak(HCFile);
Sleep(500);
ClearCommBreak(HCfile);


Заряди себе на тачку и увидишь импульс длительностью 500 мс на выводе Tx!


 
-=Vlad=-   (2003-09-05 13:36) [41]

ЗЫЫ Автору ветки
Ком порт - последовательное устройство данные передаются последовательно по через одну ногу, принимаются с другой а стальные нужны для обеспечения протокола обмена. Так что

>а именно интересует считывание/запись логических 0/1 на >определённые выводы портов

не реализуемо на ком порте 8)


 
Verg   (2003-09-05 13:38) [42]


EscapeCommFunction(HCfile, SETBREAK); // вариации на тему SETDTR, SETRTS
Sleep(500);
EscapeCommFunction(HCfile, CLRBREAK);


 
pasha_676   (2003-09-05 13:49) [43]

2Vlad

> не реализуемо на ком порте

Примеры написали и практически это уже делали - а люди не верят и все. Ну попробуй сам. Работает это.


 
-=Vlad=-   (2003-09-05 14:16) [44]

>Verg © (05.09.03 13:34) [40]

согласен, не подумал, хотя это и очевидно.

>pasha_676 © (05.09.03 13:49) [43]

Я имел в виду, что реализовать протокол отличный от стандартного, где необходимо контролировать состояние всех ног порта невозможно или передать одновременно на все ноги единицу да еще и определенной длительности тоже мягко говоря затруднительно. Не говоря уже о том что программная реализация протокола очень не надежна. Что будет если во время sleepа пригрузить другой задачей проц, да так минуты на две, что будет у тебя импульс определенной длительности, сомневаюсь.

>автору ветки
Опиши плиз задачу более конкретно, а то мі тут уже начали спор не по существу...


 
Verg   (2003-09-05 14:27) [45]


> Что будет если во время sleepа пригрузить другой задачей
> проц, да так минуты на две, что будет у тебя импульс определенной
> длительности, сомневаюсь.


Verg © (05.09.03 12:23) [35]


 
-=Vlad=-   (2003-09-05 14:52) [46]

2Verg © (05.09.03 14:27) [45]

>Verg © (05.09.03 12:23) [35]
Тогда это будет уже не Sleep.


 
Verg   (2003-09-05 15:04) [47]


> Тогда это будет уже не Sleep.


ОК. Договорились :)


 
Keith Flint   (2003-09-05 19:53) [48]

Спасибо люди большое за советы! На самом деле функции GetCommModemStatus и EscapeCommFunction по-моему наиболее подходящие для этого дела! Вот только про ф-ю EscapeCommFunction я сёдня от друга узнал, а про GetCommModemStatus от Вас!

Товарищи, ну ещё один вопро тогда, попробовал я сделать так:

var FHandle: Thandle;

FHandle := CreateFile(PChar("COM2"),GENERIC_WRITE, 0, nil, OPEN_EXISTING, FILE_FLAG_OVERLAPPED, 0);
EscapeCommFunction(FHandle,SETRTS);

Вроде бы должно на 20-м выводе на COM2 12 вольт появиться, ан нет! Может у меня COM2 не рабочий, а?! У меня сначала его разъёма не было, пришлось самому подключать, может напутал чё?!

Так вот если не трудно, для какого-нибудь контроля, может кто скажет где какие напряжения должны на нём между ногамии быть, - хочу вольтметром прозвонить...


 
Anatoly Podgoretsky   (2003-09-05 20:04) [49]

А зря, мог бы и вчера узнать, если бы прочитал все сообщения, еще 4 сентября сказали.


 
Urvin   (2003-09-06 02:38) [50]

http://www.internals.com/utilities/winio.zip



Страницы: 1 2 вся ветка

Форум: "Система";
Текущий архив: 2003.11.13;
Скачать: [xml.tar.bz2];

Наверх




Память: 0.53 MB
Время: 0.047 c
1-41729
Saturn
2003-11-03 15:45
2003.11.13
Хитрый вопрос. :)


6-41796
Fixxxer
2003-09-16 00:41
2003.11.13
есть ли разница в скриптах?


3-40917
Manticor
2003-10-19 16:12
2003.11.13
IBM DB2 Server и Delphi програма


1-41515
Артем
2003-10-25 22:22
2003.11.13
ShellExecute


1-41287
Len
2003-10-31 14:16
2003.11.13
Взаимодействие VB и DELPHI





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский