home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 April / Chip_1997-04_cd.bin / tema / 602propc / disk12 / data.12 / WINTEXT / MAKRA / SOURCES / CLOSEALL.TXT < prev    next >
Encoding:
Text File  |  1995-10-16  |  200 b   |  10 lines
  1. Program Zavrit_vse;
  2. // nebezpeΦnΘ makro, ktere bez ptanφ zav°e vÜechny dokumenty,
  3. // ani₧ by je ulo₧ilo
  4. var
  5.   i : integer;
  6. begin
  7.   for i:= 1 to CountWindows do
  8.     DocClose(kSaveNever);
  9. end.
  10.