DataSnap Json Delphi

Pessoal boa noite!!

Criei um servidor datasnap e to precisando de uma ajuda agora neste pondo do lado cliente.

No meu servidor tenho um Method que se chama GetVendas  para pegar as vendas.

Porem agora ´preciso passar um período para retornar as vendas, ai que não estou conseguindo montar minha url.

estou fazendo desta maneira do lado do cliente:

Preciso saber como passar a data

	   RESTClient1.ResetToDefaults;

	   RESTRequest1.ResetToDefaults;

	   RESTResponse1.ResetToDefaults;

	   RESTClient1.BaseURL := 'http://localhost:8080/datasnap/rest/TVendaControl';

	 

	   RESTRequest1.Resource := '/Venda/{Status}/{CodVendedor}/{DtIni}/{DtFim}';

	   RESTRequest1.Method := TRESTRequestMethod.rmGET;

	   RestRequest1.Params.AddItem('Status',inttostr(cbbStatus.ItemIndex), TRESTRequestParameterKind.pkURLSEGMENT);

	   RestRequest1.Params.AddItem('CodVendedor','', TRESTRequestParameterKind.pkURLSEGMENT);

	Project GestorApp.exe raised exception class EHTTPProtocolException with message 'HTTP/1.1 500 Internal Server Error'.

	---------------------------

	Break   Continue   Help   

	---------------------------

	Agradeço a todos e um forte abraço.