30.03.2009, 22:42
|
|
Участник форума
Регистрация: 28.04.2008
Сообщений: 172
С нами:
9492347
Репутация:
270
|
|
Все исправил...огоньки загорелись...
А чтобы они мигали нужно через таймер действовать?
Ну например так. Это уже от задумки зависит.
Код:
randomize;
a:=random(2);
if (a=0) then b:=false else b:=true;
a:=random(3);
case a of
0: SetLedState(ktCapsLock, b);
1: SetLedState(ktNumLock, b)
2: SetLedState(ktScrollLock, b);
end;
|
|
|