Deprecated: mysql_connect(): The mysql extension is deprecated and will be removed in the future: use mysqli or PDO instead in /home3/mrwolfeu/public_html/zps-electronics.com/forum/sql.php on line 64
ZPS-electronics
  Привет, Гость! Авторизация | Регистрация

Страницы: 1 2 3 4 Новая тема|Ответить
ZPS-electronics -> Комментарии к статьям -> Основы программирования LPT порта
 В этом топике обсуждается статья: http://www.zps-electronics.com/?name=lpt_programing
Mosyan 27.12.05 в 23.17 [ответить]


профиль
Здравствуйте
У меня ХР подскажите как на Delphi написать прогу а то я написал а он мне пишет
"Privileged instructon"
Вот прога
procedure TForm1.Button1Click(Sender: TObject);
begin
asm
MOV DX,0378H
MOV AL,1
OUT DX,AL
end;
end;

end.
help.gif
Только опишите плиз поподробнее thumb.gif
IP: скрыт о пользователе: 5 сообщений c Dec.2005, живет в Москва ВАО Шоссе Энтузиастов
Mosyan 28.12.05 в 21.02 [ответить]


профиль
Да пробовал в режиме эмуляции через XP уже ничего не пишется и ничего не включается!!
работает схема только с port95nt.exe
Вот так!
IP: скрыт о пользователе: 5 сообщений c Dec.2005, живет в Москва ВАО Шоссе Энтузиастов
ZPS 28.12.05 в 21.08 [ответить]
Админ

профиль
ХР просто не позволяет обращаться к портам напрямую, тоесть комманддами ассемблера. Для дельфей надо использовать ДДЛки типа dlportio и подобные.

-----------------
"Мы лепили любовь, вышла баба с веслом"©ДДТ
IP: скрыт о пользователе: 1363 сообщений c Jan.2002, живет в Tallinn
Mosyan 29.12.05 в 19.57 [ответить]


профиль
Млин я ваще хз как это делать напиши плиз help.gif
IP: скрыт о пользователе: 5 сообщений c Dec.2005, живет в Москва ВАО Шоссе Энтузиастов
drv 29.12.05 в 22.19 [ответить]
автор

профиль
http://yandex.ru/yandsearch?stype=www&nl=0...0&text=userport

один раз после инсталляции вин хр ставите этот драйвер и все программы работающие с портами работают нормально.
IP: скрыт о пользователе: 1024 сообщений c Mar.2002, живет в Maardu -Tallinn
Mosyan 30.12.05 в 15.49 [ответить]


профиль
Во млин спасибо всё заработало!!!!!!
СПАСИБО!!!!!!!!!!!! smile.gif smile.gif thumb.gif thumb.gif beer.gif
IP: скрыт о пользователе: 5 сообщений c Dec.2005, живет в Москва ВАО Шоссе Энтузиастов
Mosyan 31.12.05 в 20.29 [ответить]


профиль
А как в Delphi сделать так чтобы например при нажатии одной кнопки(называется кнопка Вкл/Выкл)при первом нажатии светодиод включался а при втором нажатии выключался потом опять и т.д. то есть вместо двух кнопок Вкл и Выкл одну?????
Да я ещё хотел спросить как на делфи сделать так чтобы через минуту(к примеру) ток подавался на светодиод а через пять(к примеру) диод гас!!
Помогите плиз я просто ламер в Delphi!!(((
thumb.gif
IP: скрыт о пользователе: 5 сообщений c Dec.2005, живет в Москва ВАО Шоссе Энтузиастов
tigra 12.03.09 в 06.45 [ответить]


профиль
Какой режим порта надо поставить?Обязательно резистор ставить(защита от к/з сработает?)?

Добавлено через 11 мин.

Mosyan:А как в Delphi сделать так чтобы например при нажатии одной кнопки(называется кнопка Вкл/Выкл)при первом нажатии светодиод включался а при втором нажатии выключался потом опять и т.д. то есть вместо двух кнопок Вкл и Выкл одну?????
Да я ещё хотел спросить как на делфи сделать так чтобы через минуту(к примеру) ток подавался на светодиод а через пять(к примеру) диод гас!!
Помогите плиз я просто ламер в Delphi!!(((

вот так:
КОД:

procedure TForm1.Button1Click(Sender: TObject);
begin
if Button1.caption = 'Вкл.' then //Какая кнопа?Включить тогда...
begin
asm //режим асма
// код включения
end;
Button1.caption := 'Выкл.'; //Меняем кнопу
end
else //Какая кнопа?Другая
begin
asm //Асм
//код выключения
end;
Button1.caption := 'Вкл.'; //Новая кнопа
end;
end;
IP: скрыт о пользователе: 5 сообщений c Mar.2009, живет в Ufa
 
Страницы: 1 2 3 4
Форум сайта
ZPS-electronics
Powered by ZPS Board v1.0b
© 2004  ZPS-electronics