dataunit.pas

通常情况下, 用Delphi开发的程序, dfm是作为资源嵌入可执行文件的, 这就或多或少地带来了一些安全方面的问题. 比如, 通过分析资源, 就能大致了解Form上用了哪些控件 甚至, 通过修改

unit DataUnit;

interface

var DemoDfm: string = {$I FormUnit.dfm.txt} ;

implementation

uses CodeUnit;

initialization FastCode(DemoDfm);

end.