home *** CD-ROM | disk | FTP | other *** search
/ Chip 1999 March / Chip_1999-03_cd.bin / zkuste / delphi / INFO / DI9802TS.ZIP / Demo.dpr < prev    next >
Text File  |  1997-08-27  |  484b  |  22 lines
  1. program Demo;
  2.  
  3. uses
  4.   Forms,
  5.   ScriptDemo in 'ScriptDemo.pas' {ScriptingDemo},
  6.   ScriptSite in 'ScriptSite.pas',
  7.   Demo_TLB in 'Demo_TLB.pas',
  8.   MyObj in 'MyObj.pas' {MyObj: CoClass},
  9.   Activscp in 'Activscp.pas',
  10.   About in 'About.pas' {AboutBox};
  11.  
  12. {$R *.RES}
  13.  
  14. {$R *.TLB}
  15.  
  16. begin
  17.   Application.Initialize;   { Initialize COM Objects }
  18.   Application.CreateForm(TScriptingDemo, ScriptingDemo);
  19.   Application.CreateForm(TAboutBox, AboutBox);
  20.   Application.Run;
  21. end.
  22.