[lmikle]

А кто тебе сказал, что есть такое ограничение?
Вот простейший пример (см ниже).
При нажатии на кнопку 2 я ясно вижу, что все символы на месте (которые после 255). Т.е. это ты что-то напутал. Например, использовал где-то ShortString, вот при приведении типов где-то косяк и всплыл.

Код:

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, Vcl.StdCtrls, Vcl.ComCtrls;

type
  TForm1 = class(TForm)
    ListView1: TListView;
    Button1: TButton;
    Button2: TButton;
    Memo1: TMemo;
    procedure Button1Click(Sender: TObject);
    procedure Button2Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
var
  item : TListItem;
  i : Integer;
  s : String;
begin
  s := '';
  for I := 1 to 250 do s := s + inttostr(i mod 10);
  s := s +  'end';

  item := ListView1.Items.Add;
  item.Caption := 'caption ' + s;
  item.SubItems.Add('subitem 1 ' + s);
  item.SubItems.Add('subitem 2 ' + s);
  item.SubItems.Add('subitem 3 ' + s);
end;

procedure TForm1.Button2Click(Sender: TObject);
const
  separator : String = #13#10 + '#' + #13#10;
var
  s : String;
begin
  if ListView1.Selected <> Nil then
    begin
      s := ListView1.Selected.caption +
       separator +
       ListView1.Selected.SubItems[0] +
       separator +
       ListView1.Selected.SubItems[1] +
       separator +
       ListView1.Selected.SubItems[2];
      Memo1.Lines.Text := s;
    end;
end;

end.