Объявили var:word (byte, dword); Управляем var.0:=true; var.1:=false; Обнуляем var:=0;
Правила форума