home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 December / Chip_2001-12_cd1.bin / zkuste / delphi / kompon / d23456 / CAJSCRTP.ZIP / demo_kylix / ILib.ifs < prev    next >
Text File  |  2001-05-23  |  246b  |  13 lines

  1. unit ILib; // this is an example of how to use Attached script engines.
  2.  
  3. var
  4.   TestVal: Integer;
  5.   function Test: string;
  6.   begin
  7.     writeln('ILib.Test called');
  8.     result := 'Testing';
  9.     TestVal := TestVal + 1;
  10.   end;
  11. Begin
  12. End.
  13.