Паскаль. временно заблокировать работу клавиатуры.

Esgal · 19 дек 2008, 09:51

да не для чего, в принципе... всесто inc(j) по сути поставить бы пустой оператор, но ; перед else нельзя... не знаю как тут правильно с синтаксисом , поэтому сделал так...

Esgal · 24 дек 2008, 00:13

горе, сдал?

BBB · 24 дек 2008, 10:04

Esgal писал(а):да не для чего, в принципе... всесто inc(j) по сути поставить бы пустой оператор, но ; перед else нельзя... не знаю как тут правильно с синтаксисом , поэтому сделал так...

Если j нафиг не нужна, чего бы вот так было не написать?

Код: Выделить всё

if i>=10*18 then {от таймера поступает примерно 18 прерываний в секунду}
  begin
    inline ($9C);   { PUSHF -- Push flags }
    KbdIntVec;
  end;

Esgal · 24 дек 2008, 15:26

ну да)) я просто ступил)) конечно так лучше *ладошкой бью по лбу*