Delphi 设计模式

摘要：{没有应用状态模式的代码} //工程文件 program Project1; {$APPTYPE CONSOLE} uses uGumballMachine in 'uGumballMachine.pas'; var aGumballMachine: TGumballMachine; begin aGumballMachine := TGumballMachine.Create(5... 阅读全文