home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 September / Chip_2001-09_cd1.bin / zkuste / delphi / kompon / d23456 / CAJSCRPT.ZIP / ifpasscript / demo_del / oletest.ifs < prev    next >
Text File  |  2001-04-20  |  166b  |  8 lines
  1. Program IFSTest;
  2. var
  3.   s: IDispatch;
  4. Begin
  5.   s := CreateOleObject('Word.Application');
  6.   writeln(IntToStr(s.Creator)); // should s.Creator be an integer?
  7. End.
  8.