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

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

как послать строку в com-порт

3DiMaN ©   (2004-09-21 16:18:00) 

подскажите пожалуйста, как в порт заслать целую строку,
а не один байт,
разбираюсь с этим примером, но никак не могу строку заслать 'AT+GNM'

function WriteCPort(SendStr:string):boolean;
var
SendByte:array[0..255] of char;
KolByteW:DWord;
res:boolean;
begin
KolByte:=1;
SendByte[0]:=chr(12);
WriteFile(ComHandle,SendByte,KolByte,KolByteW,nil);
end;

---

MBo   (2004-09-21 16:35:00) [1]

WriteFile(ComHandle,SendStr[1],Length(SendStr),KolByteW,nil);

---

Наверх