volvoВашу программу я тоже скачал, но там только модуль. А сами процедуры у меня есть для работы с деком. Камнем преткновения для меня является - это связать процедуры с интерфейсом и вообще я не знал, что должно отображаться в интерфейсе для дека, вот поэтому я и скачал эту прогу.
Попытался сделать, чтобы меню в этой программе оставалось всё время на одном месте, я сделал так :
Код
repeat
[b]clrscr;[/b]
showmenu;
readln(selection);
case selection of
1: pushbegin(root,tail,getelem);
2: popbegin(root,tail);
3: pushend(root,tail,getelem);
4: popend(root,tail);
5: clrscr;
end;
until selection=5;
Казалось бы всё ок, но вот когда пытаешься извлечь элемент из дека, то он не отображается на экране. В чём моя ошибка?