home *** CD-ROM | disk | FTP | other *** search
/ Chip 1998 March / Chip_1998-03_cd.bin / zkuste / delphi / komprese / zip / DELZIP12.ZIP / DEMO1.ZIP / ZIPDEMO1.DPR < prev    next >
Text File  |  1997-09-28  |  498b  |  21 lines

  1. program zipdemo1;
  2.  
  3. uses
  4.   Forms,
  5.   mainunit in 'mainunit.pas' {Mainform},
  6.   msgunit in 'msgunit.pas' {Msgform},
  7.   extrunit in 'extrunit.pas' {Extract},
  8.   Addunit in 'Addunit.pas' {AddForm};
  9.  
  10. {$R *.RES}
  11.  
  12. begin
  13.   Application.Initialize;
  14.   Application.Title := 'Zip Demo 1';
  15.   Application.CreateForm(TMainform, Mainform);
  16.   Application.CreateForm(TMsgform, Msgform);
  17.   Application.CreateForm(TExtract, Extract);
  18.   Application.CreateForm(TAddForm, AddForm);
  19.   Application.Run;
  20. end.
  21.