Zmienna przechowująca długi(1000+) tekst (AnsiString?)

Muszę napisać program ze zmienną przechowującą opis czegoś i 255 znaków nie wystarczy. Czytałem że trzeba użyć AnsiString, ale jak napiszę tak to nie działa:

procedure TForm1.Button1Click(Sender: TObject);
var slowo : AnsiString;
begin
slowo:='aaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaaa';
label1.caption:=slowo;
end;  

Error:
slowo.pas(41,8) Error: Constant strings can't be longer than 255 chars

W uses mam takie oto elementy:

uses
  Classes, SysUtils, FileUtil, LResources, Forms, Controls, Graphics, Dialogs,
  StdCtrls; 

Wie ktoś co z tym zrobić? Może źle używam tego AnsiString

to spróbuj załadować to z pliku.txt to ci zadziała

Dzięki. Zrobiłem, żeby z memo czytało do zmiennej i działa :)

I popsuł forum....
skasuj ten tekst "aaaaaaaaaaaa" bo rozsadziło stronę.

Spróbuj tak:

var slowo : AnsiString;
begin
slowo:= AnsiString('aaaaaaaaaaaaaaaa...aaaaaaaaa');
label1.caption := slowo;
end;

Komunikat:
slowo.pas(41,8) Error: Constant strings can't be longer than 255 chars
oznacza, że nie możesz wpisać więcej niż 255 znaków w edytorze.

Możesz rozbić ten łańcuch i zapisać to np. tak:

slowo := 'aaa...aaa';
slowo := slowo + 'bbb...bbb';

w ten sposób edytor nie będzie się czepiał, a slowo będzie zawierać lancuch 'aaa...aaabbb...bbb'