详测 Generics Collections TStack(1): Push、Pop、Peek

为什么80%的码农都做不了架构师？>>>

unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,Dialogs, StdCtrls;typeTForm1 = class(TForm)Button1: TButton;procedure Button1Click(Sender: TObject);end;varForm1: TForm1;implementation{$R *.dfm}uses Generics.Collections;procedure TForm1.Button1Click(Sender: TObject);
varStack: TStack<string>;s,str: string;
beginStack := TStack<string>.Create();{压栈}Stack.Push('AAA');Stack.Push('BBB');Stack.Push('CCC');str := '';for s in Stack do str := str + s + ' ';ShowMessage(str); {AAA BBB CCC }{出栈: 后进的先出}Stack.Pop;str := '';for s in Stack do str := str + s + ' ';ShowMessage(str); {AAA BBB }{下一个将要出栈的...}ShowMessage(Stack.Peek); {BBB}Stack.Free;
end;end.

转载于:https://my.oschina.net/hermer/blog/320810

详测 Generics Collections TStack(1): Push、Pop、Peek - 其他功能同 TQueue相关推荐

三十、详测 Generics Collections: TObjectList、TObjectQueue、TObjectStack
TObjectList<T>.TObjectQueue<T>.TObjectStack<T> 分别继承自: TList<T>.TQueue<T&g ...
详测 Generics Collections TList (6): Reverse、TrimExcess
为什么80%的码农都做不了架构师?>>> unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Clas ...
详测 Generics Collections TQueue (3): OnNotify、Extract
为什么80%的码农都做不了架构师?>>> unit Unit1;interfaceusesWindows, Messages, SysUtils, Variants, Clas ...
linux汇编push,在x86汇编中寄存器上使用的push / pop指令的功能是什么？
在阅读有关汇编程序的文章时,我经常遇到人们在写文件时他们推送处理器的某个寄存器并稍后再次弹出它以恢复它之前的状态. 怎么能推一个寄存器? 它在哪里推? 为什么需要这个? 这可归结为单处理器指令还是更复 ...
四、Delphi 2009 泛型容器单元(Generics.Collections)[3]: TStackT
TQueue 和 TStack, 一个是队列列表, 一个是堆栈列表; 一个是先进先出, 一个是先进后出. TStack 主要有三个方法.一个属性: Push(压栈).Pop(出栈).Peek(查看下一 ...
Delphi 2009 泛型容器单元(Generics.Collections)[1]: TListT
Delphi 2009 新增了泛型容器单元: Generics.Collections, 同时还有一个 Generics.Defaults 单元做支持. Generics.Collections 包含 ...
js push(),pop(),unshift(),shift()的用法小结
js中push(),pop(),unshift(),shift()的用法小结 1.push().pop()和unshift().shift() 这两组同为对数组的操作,并且会改变数组的本身的长度及内容 ...
【Android 逆向】x86 汇编 ( push / pop 入栈 / 出栈指令 | ret / retn 函数调用返回指令 | set 设置目标值指令 )
文章目录一.push / pop 入栈 / 出栈指令二.ret / retn 函数调用返回指令三.set 设置目标值指令总结一.push / pop 入栈 / 出栈指令 push / p ...
MyBatis-Plus 快速开始及详测 SpringBoot 集成Mybatis-Plus
MyBatis-Plus 快速开始及详测简介 MyBatis-Plus (opens new window)(简称 MP)是一个 MyBatis (opens new window)的增强工具,在 ...

详测 Generics Collections TStack(1): Push、Pop、Peek - 其他功能同 TQueue

详测 Generics Collections TStack(1): Push、Pop、Peek - 其他功能同 TQueue相关推荐

最新文章

热门文章