基于u盘的软件授权

				program Demo;
				
				uses
				  Forms,
				  UnitDemo in 'UnitDemo.pas' {frmDemo},
				  UnitDialog in 'UnitDialog.pas' {frmDialog},
				  USBPass_TLB in 'C:\Program Files\Borland\Delphi7\Imports\USBPass_TLB.pas';
				
				{$R *.res}
				
				begin
				  Application.Initialize;
				  Application.CreateForm(TfrmDemo, frmDemo);
				  Application.CreateForm(TfrmDialog, frmDialog);
				  Application.Run;
				end.