Показать сообщение отдельно
  #4  
Старый 30.03.2015, 14:16
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,906
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

1. Убери из своей процедуры записи в порт (Procedure WriteStrToPort(Str:String) ; ) строку 8.
2. Вызывай так: WriteStrToPort(#$01#$3A#$1A);
3. Profit
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием