TQueue 和 TStack, 一个是队列列表, 一个是堆栈列表; 一个是先进先出, 一个是先进后出.TQueue 主要有三个方法、一个属性:Enqueue(入列)、Dequeue(出列)、Peek(查看下一个要出列的元素);Count(元素总数). -----------------------------------------------------...
UniGui的信息弹出框MessageDlg的原型定义如下： procedure MessageDlg(const Msg: string; DlgType: TMsgDlgType; Buttons: TMsgDlgButtons; CallBack: TUniDialogCallBackAnonProc); DlgType(对话框架的类型)1、mtC...
1 2 {《HeadFirst设计模式》工厂模式之抽象工厂 } 3 { 抽象工厂的产品 } 4 { 编译工具：Delphi7.0 } 5 { E-Mail ：guzh-0417@163.com } 6 7unit uPizzaIngredient; 8 9...
然后 保存，在这里 重命名窗口 //主窗口 调用 // NewForm2.UniForm1.Show() ; //非阻塞 NewForm2.UniForm1.ShowModal();//阻塞 //子窗口 调用procedure TUniForm2.UniButton1Click(Sender: TObject)...
在MainModule里 Design 模式 1]RecallLastTheme 设为True 2]Theme选一个皮肤 总共有 classicgraycrispneptunetritontriton.modifiedariagraphite 8个默认皮肤 uses uniStrUtils, procedure TMainForm.UniFormC...