Скачать: CL | DM;

Работа с com-портом.   Найти похожие ветки 

← →
Shakesbeer ©   (2007-10-19 14:49) [0]

Есть такой код
procedure TForm1.Button1Click(Sender: TObject);
var F: Textfile;
begin
   AssignFile( F, "com1");
   Rewrite(F);
   Writeln( F, "sdsd");
   Writeln( F, "sdffdfs");
   CloseFile(F);
end;
К порту подключен принтер для печати чеков.
Всё работало нормально до перезагрузки.
Потом стал печатать 1 строчку "АААААААА..."
Я попробовал подключиться через HyperTerminal (Пуск-Стандартные-Связь), создал там поключение через этот порт - начал печатать что ввожу. Закрыл HyperTerminal и удалил даже подключение - прога продолжала работать. Но после перезагрузки снова бяка. Что-происходит с портом, но как это сделать в Дельфи?

---

← →
Сергей М. ©   (2007-10-19 15:14) [1]

> как это сделать в Дельфи?


Возьми на вооружение TurboPower Async Pro и не мучайся.

---

← →
Anatoly Podgoretsky ©   (2007-10-19 19:54) [2]

> Shakesbeer  (19.10.2007 14:49:00)  [0]

Это он не печатает, это крик души.
Несовместимость настроек ком порта.

---

← →
korneley ©   (2007-10-19 21:52) [3]

> Несовместимость настроек ком порта.
Именно!!! В 99% случаев при подключении внешнего оборудования на COM - порт, непонятки возникают из за несогласованности скорость/кол-во бит/стоп-бит/проверка четности. Чаще именно скорости подключения, т.к. 8-нет-1 умолчание почти везде. А вот скорость на _железе_ надо бы проверить, дабы и прога и железо имели одинаковые представления о мире их окружающем...

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.014 c