分享不同单位的程序

Question

我的Delphi项目中有4个units（也有4个表格）我在Unit 2中有一个名为“controlla”的程序。

procedure TForm2.controlla(numero:TEdit);
var a:string;
begin
 // the code
end; 

我做了这个程序，因为它将十进制数转换为小数。顺便说一句，我也必须在Unit 4中使用此功能。

我以为我可以用这个函数做一个* .dll库。在尝试libraby方式之前，有没有任何方法允许我使用controlla(numero:TEdit)，即单元2中的单元4，而没有dll？

Answer 1

我会创建第五个单元并将常用方法放在那里。例如，MiscUtils.pas。然后在任何需要调用任何方法的地方使用该单元。

另外，不要传入TEdit，而是使用字符串参数。这样，这种方法就不必了解TEdits，可以说它更灵活。