home *** CD-ROM | disk | FTP | other *** search
/ Chip 2001 December / Chip_2001-12_cd1.bin / zkuste / delphi / kompon / d23456 / CAJSCRTP.ZIP / demo_kylix / test3.ifs < prev    next >
Text File  |  2000-05-15  |  119b  |  8 lines
  1. Program CajScriptTest;
  2. var S: String;
  3. begin
  4.   S := 'ABCDEF';
  5.   S := Copy(S, 2, 3); { 'BCD' }
  6.   writeln(s);
  7. end.
  8.