如何操作才能让&显示出来～

怎么操作才能让&显示出来～～
procedure TForm1.Button1Click(Sender: TObject);
var ss:string;
begin
  ss:='webpath2=&ruid=301546089456&fun=a&fun2=3&cid=0001&pn=2' ;
  showmessage(ss);
end;

[解决办法]

Delphi(Pascal) code

procedure TForm1.Button1Click(Sender: TObject);var ss:string;begin  ss:= 'webpath2=&&ruid=301546089456&&fun=a&&fun2=3&&cid=0001&&pn=2 ' ;  showmessage(ss);end;