DELPHI通用模块怎么做怎么调用

Question

能够给出一个最简单的例子，怎么做，怎么调用？
求代码，求说明！
多谢了！

Answer 1

implementation
uses *****
     

Answer 2

通用模块 vb吗？
delphi 不区分 调用方法↓

Answer 3

你说明的通用模块，可以是指下面二种：
一是Dll封装的Form。 
二是EXE封装的Form。
二者功能基本一致，但在调用上不同。 
相同：（1）都不能共享主程序的变量参数；（2）都与主程序相脱离，操作时不装入内存，只是调用时载入；（3）都具有调用的灵活性，不同的用户，调用不同的模块；
非同：（1）编辑方式不一样，前者Form封装进一个Dll中，后者就是一个执行文件。（2）调用机制不一样；（3）隐藏性不一样，前者比后者强。本人使用经验上看，偏向后者（EXE模块）。一是它可以单独调试，无主程序也能执行。二是调用方式简单可靠。三是维护简单。为了将做成它与（DLL模块一致），采取措施：（1）调用它时，需加入密码参数，才能进入，这样与Dll模块一样具有保密性了；（2）通过调用参数还可以，向模块传递数据；

Answer 4

如果项目小，exe简单。
如果项目大，exe文件会是10M以上大，都放在一个project下，太多，维护麻烦。

Answer 5

    以上各位实在是不好意思，没时间上来看看。比如我做一个查找的FORM，希望可以在其它地方调用，问题是这个查找的FORM有没有什么特别的代码？还有，调用的时候应该用什么代码？
   多谢了！

Answer 6

FORM，最简单，其他地方包括文件
直接创建访问就可以了啊
use find.pas
frmFind := TfrmFind.Create(nil);
frmFind.ShowModal

Answer 7

FindForm就和平常一样，如果想做成对话框样式，可以加一个“确定”“取消”按钮。
“确定”的Click:self.ModelResult := mrOK;
“取消”的Click：self.ModelResult := mrCancel;调用：uses Find;procedure TForm1.Button1Click(Sender: TObject);
begin
  with TFindForm.Create(application) do
    try
      case ShowModal of
        mrOK: //按了确定的操作
        mrCancel: //按了取消或关闭窗口的操作
      end;
    finally
      Free;
    end;
end;

Answer 8

用Frame做！需要执行的代码全放在Frame中！调用么就直接用Standard中的Frames加载进去就可以！那Frame就是你自己做的一个控件！这个很好用！