upload file multipart in delphi

روی فرم دو تا کامپوننت زیر را گذاشته و کد زیر را برای ان بنویسید

 RESTClient1 و RESTRequest1

 try

    RESTClient1.BaseURL:='http://test.ir:3000/customer/sendFileToCustomer';

    RESTRequest1.AddFile('file','d:/test.png',ctMULTIPART_FORM_DATA);

    RESTRequest1.AddBody('', ctMULTIPART_FORM_DATA);

    RESTRequest1.AddParameter('code','');

    RESTRequest1.AddParameter('code2','');

    RESTRequest1.Params[0].Value:='1137';

    RESTRequest1.Params[1].Value:='403';

    RESTRequest1.Execute;

  finally

  end;