RosettaCodeData/Task/URL-encoding/PascalABC.NET/url-encoding.pas

##
function URLEncode(s: string) := System.Uri.EscapeDataString(s);

Println(URLEncode('http://foo bar/'));