Стеки Опции

[-Наська-]

Блин эти фиговы штуки... Теорию поняла... хочу вывести в Мемо. как ето сделать?

[Scorp_Freeman]

Memo1.Clear;

bufS:=stek;
while bufS<>nil do
begin
Memo1.Lines.Add(bufS.FIO);
bufS:=bufS.Prev;
end;

где stek-вершина стека, bufS.Prev-указатель на предыд. узел, bufS.FIO - поле которое хочешь вывести