PMyBaseDebug (清凉级Debug工具单元)

小草呢清凉级调试单元PMyBaseDebug。我喜欢写类,可每写一个类总得建一个工程来为这个类Debug,时间长了就有好多工程O_O;突然发现我总是在做同样重复的事,比如我要比较2个算法消耗的时间,我总要在调用这个算法的过程前边加上时间计算:var Ls,Le:Cradinal;begin Ls:=Gettickcount; {调用算法} Le:=Gettickcount; Showmessage(Format('此算法消耗了%s豪秒',[intTostr(Le-ls)]));end;当我在断点时想看鼠标下显示某个变量的值时Delphi的Ide老不喜欢显示给我看-_-;想用个Showmessage或者MessageBox把它弹出来吧 又会碰上此算法执行在线程中无法弹出,想找个地方把它输出吧,又要麻烦的建立容器和传递容器,So动手写了个方便自己日常debug的工具单元,为什么是单元呢?因为我不太喜欢写成组件感觉有些多余的东西。在你的程序里引用了它,就具备了基本的Debug能力并且可以方便的记录和显示你想输出的值或者信息,相信会让你省不少事的。希望能在你Codeing的时候带来一丝方便;同时请不要拿她去跟别的工具(如CodeSite)比较这是没得比的;我都说了这是清凉级的。喜欢的朋友下去用用,源代码在里边了可以根据自己需要定制功能^_^demo界面请看“截图”如何使用请看“使用方法”Demo代码在“Demo文件”里边,把那个rar文件望桌面拖就可以。PmyBaseDebug.pas在“单元文件”里,同样望桌面拖。