博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2009年4月20日

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

posted @ 2009-04-20 16:52 都市牧羊 阅读(826) 评论(0) 推荐(0) 编辑