var s:tstack; v1,v2:string; b:^string; i:integer ;begin s:=tstack.Create; v1:='abc'; v2:='123'; s.Push(@v1); s.Push(@v2);// i:=s.Count ;// showmessage(pchar(inttostr(i))) ; b:=s.pop(); showmessage(b^); end ;
end;
以上代码为什么Show出结果为'123',而不包括'abc',
堆栈是后进先出,123 在 abc 后面入栈,当然于abc之前出栈。如果你希望abc先出,那应该使用队列而不是堆栈。
xuexi le....