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

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

COM1 [D7, XP]


F@T@L_Err0r ©   (2007-10-18 11:06:00) 

Здравствуйте.Скажите плиз,для работы с Сom портами надо подключать дополнительные модули в uses или нет?а то когда пытаюсь применить ReadComm то пишет - Undeclarated indefiner...


SergeR   (2007-10-18 15:38:00) [1]

офигеть )))


Сергей М.   (2007-10-18 12:43:00) [2]


> Жди теперь


ПлакалЪ ..


Маша Шрайбер   (2007-10-18 12:42:00) [3]

Потрясающе! ЮЮ телепат!


F@T@L_Err0r   (2007-10-18 12:33:00) [4]

Пишет что MemoryStreamReceivedFromCOM - undeclarated indefiner


ЮЮ   (2007-10-18 12:32:00) [5]

> см. WriteFile/ReadFile

Во вчерашнй ветке у него и с этим проблемы были.

> см. Image1.Picture.Graphic.LoadFromStream(MemoryStreamReceivedFromCOM)
> ;


Жди теперь

> MemoryStreamReceivedFromCOM то пишет - Undeclarated indefiner...


Сергей М.   (2007-10-18 12:25:00) [6]


> как передать по кому файл


см. WriteFile/ReadFile


> отобразить его в соответствуюющем компоненте?Например картинку
> в Image1.picture


см. Image1.Picture.Graphic.LoadFromStream(MemoryStreamReceivedFromCOM);


F@T@L_Err0r   (2007-10-18 12:19:00) [7]

И еще вопрос:как передать по кому файл и отобразить его в соответствуюющем компоненте?Например картинку в Image1.picture.


Сергей М.   (2007-10-18 12:13:00) [8]

Значит не все выковырял.
Где-то среди ковыряемого должна бы быть объявлена и реализована функция ReadComm


F@T@L_Err0r   (2007-10-18 12:00:00) [9]

отсюдаво же и выковырял...с delphimaster.ru
CommHandle:= CreateFile('COM1',GENERIC_READ or GENERIC_WRITE, 0, nil,
OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL or FILE_FLAG_OVERLAPPED,0);
 SetCommMask(CommHandle, EV_RXFLAG);
 GetCommState(CommHandle,DCB);
 DCB.BaudRate:=CBR_9600;
 DCB.Parity:=NOPARITY;
 DCB.ByteSize:=8;
 DCB.StopBits:=OneStopBit;
 DCB.EvtChar:=chr(13);
 SetCommState(cId,DCB);
CommThread := CreateThread(nil,0,@ReadComm,nil,0,ThreadID);
WaitCommEvent(CommHandle,TransMask,@Ovr);
ClearCommError(CommHandle,Errs,@Stat);


Сергей М.   (2007-10-18 11:49:00) [10]


> какого именно?


А мне почем знать ?

Ты вообще откуда выковырял этот пример с ReadComm ?


F@T@L_Err0r   (2007-10-18 11:43:00) [11]

>Имя этого юнита и следует указать в uses вызывающего процедуру юнита.

А простите за тупость какого именно?


Сергей М.   (2007-10-18 11:33:00) [12]


> это обычная процедура, входя состав модуля


Не модуля, а юнита.
Имя этого юнита и следует указать в uses вызывающего процедуру юнита.


F@T@L_Err0r   (2007-10-18 11:31:00) [13]

это обычная процедура, входя состав модуля


Маша Шрайбер   (2007-10-18 11:23:00) [14]

А это что ReadComm?


Наверх

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