用 Delphi 学设计模式（二）之工厂方法篇（原创）[6]

[入库：2005年8月18日] [更新：2007年3月24日]

本文简介：选择自 wlnh_2004 的 blog

3、在窗体单元文件中，添加一个新的事件处理过程（这里是扩展，不会影响到已有的代码）

//=============================================================================
radiobutton4: tradiobutton;
procedure radiobutton4click(sender: tobject);

procedure tform1.radiobutton4click(sender: tobject);
begin
交易(类_西瓜小贩.create);
end;
//=============================================================================

首页上页尾页 [1] [2] [3] [4] [5] [6]

本文关键：用 Delphi 学设计模式（二）之工厂方法篇（原创）

　　相关方案

本站最佳浏览方式为分辨率 1024x768 IE 6.0（或更高版本的 IE浏览器）

用 Delphi 学设计模式（二） 之 工厂方法篇 （原创）[6]

[入库：2005年8月18日] [更新：2007年3月24日]

用 Delphi 学设计模式（二）之工厂方法篇（原创）[6]