摘要:
效果图如下:实现部分代码如下:var rec: Integer = 0; //记录增行按钮点击次数implementation{$R *.dfm}//动态释放单个组件内存,即销毁组件procedure TForm1.DeleteRow(Sender: TObject);begin if rec... 阅读全文
摘要:
做项目的时候,发现这个Frame很好用,为了省空间、调用和修改方便,就将Frame封装到dll(动态链接库)里面,确实很好使。效果图如下:上图是临时测试用的,忘了将Frame的align设置成alClient,不过刚好可以看出来白色区域是从dll里加载的Frame,还调用了Frame的按钮单击事件。... 阅读全文