非常简单问题：一大段字符串，如何将它存放在代码中？

现在有一段很长的字符串（假如有2000多字，示例如后面)，我希望把它放在代码中，运行时，直接从代码中引用。请问如何实现？如有下面一段文字：**-----------------------------**
除了表示已分配内存的地址外，指针还能通过New 例程在堆中动态分配内存，不过当你不需要这个指针时，你也必须调用Dispose 例程释放你动态分配的内存。
var
  P: ^Integer;
  s: string;
begin
  // initialization
  New (P);
  // operations
  P^ := 20;
  ShowMessage (IntToStr (P^));
  // termination
  Dispose (P);
  s := 'ok';
  showmessage(s);
end;如果指针没有值，你可以把nil 赋给它。这样，你可以通过检查指针是否为nil 判断指针当前是否引用一个值。这经常会用到，因为访问一个空指针的值会引起一个访问冲突错误，也就是大家知道的“一般保护错”（GPF）。
**---------------------------------**如何把这段文字存放在代码中，比如就像：
var
  s: string = '32434234fds';
一样。这段字符串中可以有各种字符。