str:=AnsiToUtf8(用户名edit.Text);
str:=HTTPEncode(str);
str:=self.IdHTTP1.Get(‘http://127.0.0.1:8081/datasnap/rest/tprjmis/web_login/‘+httpencode(AnsiToUtf8(用户名edit.Text))+‘/‘+ HTTPEncode(AnsiToUtf8(密码edit.text)));
原文：http://www.cnblogs.com/HuiLove/p/3962249.html