发信人: kingron()
整理人: kingron(2000-12-05 19:34:18), 站内信件
|
有，使用TStack类即可！tstack.push,tstack.pop....
Ex:
uses contnrs;
var
s:tstack;
v:string;
b:^string;
begin
s:=tstack.Create;
v:='abcd';
s.Push(@v);
b:=s.pop;
showmessage(b^);
end;
【 在 perfic (聪明的大貓) 的大作中提到: 】
: 我有个程序要用到堆栈的,
: 如果用数组或者链表来实现可能比较麻烦,delphi中有没有现成可以使用的堆栈?
:
: 如何用的?
: .......
--
E_Mail:[email protected] OICQ:10228518
<BLINK>【</BLINK>
<BLINK>◎■■■■〓〓〓〓〓〓〓〓〓〓></BLINK> ◆没有最好，只有更好◆
<BLINK> 【</BLINK>
※ 修改:．kingron 于 Dec 2 13:21:05 修改本文．[FROM: 202.103.102.58]
※ 来源:．月光软件站 http://www.moon-soft.com．[FROM: 202.103.102.58]
|
|