procedure THttpTestForm.btSendClick(Sender: TObject); var ARequestContent : TStringList; AResponse: String; begin ARequestContent := TStringList.Create; try ARequestContent.Add('login_username=USERNAME'); ARequestContent.Add('login_password=PASSWORD'); ARequestContent.Add('receiver_number=09132677411'); ARequestContent.Add('note_arr[]=سلام'); ARequestContent.Add('sender_number=10007666'); AResponse := IdHTTPTest.Post('http://sms321.ir/webservice/rest/sms_send?', ARequestContent); .... finally ARequestContent.Free; end; end;