Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Работа с переферией собственной сборки через COM порт. [D7, Win2k]


happyboy ©   (2003-10-22 09:12:00) 

Добрый день уважаемый All.
Есть перефирия и хочется организавать её работу через com порт.
Схема работает на 5в.
Я пишу:

*********************************

Var
F : File of Byte;
ToC1: Byte;
i,n: Word;
S: String[20];
begin
ToC1:=255; //
S:=E1.Text+".";
n:= Length(E1.Text);

AssignFile(F, "COM1")
Rewrite(F);

For i := 1 to n-1 do
Begin
Try //Scitivau chislovoe znachenie;
ToC1:=StrToInt(S[i]);
Write(F,ToC1);
Except
Continue
End;
End;
CloseFile(F);
end;

*********************************
Осцилограф показывает импульсы на ножке 7 отвечающей за питание, а на ножке 2 импульса нету.
Подскажите, что я делаю не так.


handra   (2003-10-22 12:02:00) [1]

во-первых: работать через функции Delphi с COM-портом - неблагородно,
используй WinAPI, читай:
http://www.delphikingdom.com/mastering/ports1.htm
http://www.delphikingdom.com/mastering/ports2.htm
http://www.delphikingdom.com/mastering/ports3.htm
http://www.delphikingdom.com/mastering/ports4.htm
http://www.delphikingdom.com/mastering/ports5.htm
во-вторых: надо установить параметры работы с портом - таймауты, скорость, четность и т.д.; установить сигналы готовности к приему-передачи данных...
если требуется более подробное объяснение - опиши что за девайс и протокол обмена


Наверх

Титульная страница Поиск, карта сайта Написать письмо