var
   Cadena:string;           {String de 255 caracteres de capacidad}
   CadenaLarga: AnsiString; {String sin limitaciones...}