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

Вниз

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

 
oxothuk   (2010-04-08 13:43) [0]

В общим задание на делфях нужно сделать. Тест скрипки дл COM порта. Есть такое примечание в задании:
"требуется настроить loopback интерфейс соединив 2-й и 3-й пины порта".
Обьясните пожалуйста, как реализовывается это примечание, хотя бы кратко.


 
Anatoly Podgoretsky ©   (2010-04-08 13:46) [1]

> oxothuk  (08.04.2010 13:43:00)  [0]

Тут паяльник нужен, а не программист


 
MBo ©   (2010-04-08 13:52) [2]

соединить 2 и 3 ножки разъема компорта (RX иTX). При этом то, что посылаешь в порт, будет и приниматься на нем же (эхо-заглушка)


 
oxothuk   (2010-04-08 13:56) [3]

А как в делфях это сделать? через виртуальный интерфейс?


 
oldman ©   (2010-04-08 14:00) [4]

А может физически заглушку воткнуть, где пины соединены?


 
oxothuk   (2010-04-08 14:01) [5]

физически то я так понимаю можно, но в тз написано что все делать надо программно (


 
oldman ©   (2010-04-08 14:04) [6]

Значит никуда не посылаешь, сразу кидаешь на вход
Если я правильно понимаю, отсылаешь переменную а, читаешь в переменную b.
Вместо этого пишешь b:=a


 
oxothuk   (2010-04-08 14:19) [7]

а если устройство потключено к порту?


 
oldman ©   (2010-04-08 14:24) [8]


> oxothuk   (08.04.10 14:19) [7]


Посылаешь запрос.
Нет ответа - нет устройства. Ставится галочка "эмуляция".


 
oldman ©   (2010-04-08 14:33) [9]

А это секретное устройство стоит в соседнем доме, подключено кабелем длиной 1 км и не видно, работает оно или нет?


 
oxothuk   (2010-04-08 14:35) [10]

Ставится галочка "эмуляция". - как это реализовывается в делфях?


 
oxothuk   (2010-04-08 14:36) [11]

=)))) нет)


 
oldman ©   (2010-04-08 14:42) [12]


> oxothuk   (08.04.10 14:35) [10]
> Ставится галочка "эмуляция". - как это реализовывается в
> делфях?


if устройства нет then "Эмуляция".checked:=true else "Эмуляция".checked:=false;

if "Эмуляция".checked then
 begin
    послать a;
    принять b;
 end;
 else b:=a;


 
oldman ©   (2010-04-08 14:44) [13]

Кто мешает дать пользователю выбор между "тест устройства" и "тест в режиме эмуляции" самому?


 
oxothuk   (2010-04-08 15:40) [14]

я так понял нужно порт COM протестить.
может тут имелось ввиду что нужно принудительно соединить 2 и 3 разьем не учитывая устройства?


 
tesseract ©   (2010-04-08 16:20) [15]


> может тут имелось ввиду что нужно принудительно соединить
> 2 и 3 разьем не учитывая устройства?


Дошло наконец. Правда интересно, как ты его запаяешь на виртуальном интерфейсе.


 
TCheckBox   (2010-04-08 16:22) [16]


> if устройства нет then "Эмуляция".checked:=true else "Эмуляция".
> checked:=false;


Со мною проще так:

Эмуляция.Checked := устройства нет;


 
XXL   (2010-04-08 16:49) [17]

Уважаемый Оксотхук, а если в следующем задании будет "тест скрипки для USB" - то как делать будете ?


 
Anatoly Podgoretsky ©   (2010-04-08 17:01) [18]

> oxothuk  (08.04.2010 15:40:14)  [14]

А это реши с предподователем, нужен ли тебе программный или аппаратный LoopBack
В первом случае надо изучать микросхему и писать драйвер.


 
oxothuk   (2010-04-08 17:31) [19]

спасибо за ответы, все стало понятно



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

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

Наверх





Память: 0.48 MB
Время: 0.096 c
15-1268838645
Дмитрий
2010-03-17 18:10
2010.08.27
IbExpert


13-1125398405
Cherrex
2005-08-30 14:40
2010.08.27
WIN и VCL


2-1274419936
MKC
2010-05-21 09:32
2010.08.27
Отправка пакетов TCP


15-1274783792
12
2010-05-25 14:36
2010.08.27
а вот как такое сделали?


15-1268807889
b/@.
2010-03-17 09:38
2010.08.27
Разбор текстового файла. С чего начать ?





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский