Delphi Refactor 重构

最新推荐文章于 2016-04-22 09:55:00 发布

weixin_30263073

最新推荐文章于 2016-04-22 09:55:00 发布

阅读量149

点赞数

CC 4.0 BY-SA版权

原文链接：http://www.cnblogs.com/cb168/p/4673433.html

本文介绍了一种使用Delphi进行重构的方法，不仅展示了如何将现有代码重构成更简洁的过程，还进一步将其重构为独立的函数，提高了代码的复用性和可维护性。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

delphi refactor

procedure TCameraComponentForm.btnRefreshConfigClick(Sender: TObject);
var
a:string;
begin
a:=CameraComponent1.CaptureSetting.Width.ToString;

Memo1.Lines.Add( a);
end;

不仅可以重构成过程

还可以重构函数参数，真强大！

procedure TCameraComponentForm.btnRefreshConfigClick(Sender: TObject);
var
a:string;
begin
a:=CameraComponent1.CaptureSetting.Width.ToString;
  AddLog(a);
end;

procedure TCameraComponentForm.AddLog(a: string);
begin
  Memo1.Lines.Add(a);
end;