var
  ATerminalServer: TJwTerminalServer;
  s: AnsiString;
begin

  // Create Terminal Server instance and allocate memory for it
  ATerminalServer := TJwTerminalServer.Create;

  s := 'Remember this text';

  // Store pointer in Data property
  ATerminalServer.Data := PAnsiChar(s);

  s := '';
  ...

  // and retreive it!
  s := ATerminalServer.Data;

  // Don't forget to free!
  ATerminalServer.Free;

end;