home *** CD-ROM | disk | FTP | other *** search
/ PC Professionell 2003 July / PCpro_2003_07.ISO / vollvers / edhtml / EdHTMLv5.0.exe / Main / TStrings.pas < prev    next >
Encoding:
Pascal/Delphi Source File  |  2003-05-14  |  319 b   |  17 lines
  1. {        ..::EdHTML::..      }
  2. {     System Plug-In v1.0    }
  3. { Autor: RaLib Group         }
  4.  
  5. //Przyklad: Korzystanie z typu TString
  6.  
  7. var
  8.   SS: TStringList;
  9. begin
  10.   SS := TStringList.Create;
  11.   SS.Add('Line 0');
  12.   SS.Add('Line 1');
  13.   Result := '! ' + SS[1] + ' !';
  14.   ShowMessage(Result);
  15.   SS.Free;
  16. end;
  17.