WSnapForm.pas
资源名称:delphi.rar [点击查看]
上传用户:fh681027
上传日期:2022-07-23
资源大小:1959k
文件大小:0k
源码类别:
Delphi控件源码
开发平台:
Delphi
- unit WSnapForm;
- interface
- uses
- SysUtils, Classes, Graphics, Controls, Forms, Dialogs;
- type
- TForm1 = class(TForm)
- private
- { Private declarations }
- public
- { Public declarations }
- end;
- var
- Form1: TForm1;
- implementation
- uses ComApp;
- {$R *.DFM}
- const
- CLASS_ComWebApp: TGUID = '{3B672D3F-F633-4F70-B377-E862448F6F9B}';
- initialization
- TWebAppAutoObjectFactory.Create(Class_ComWebApp,
- 'WSnap1', 'WSnap1 Object');
- end.