Ya lo resolvi, solo estaba poniendo mal esta parte
Código Delphi
[-]FileStreamP := TIdMultiPartFormDataStream.Create;
FileStreamGI := TIdMultiPartFormDataStream.Create;
los generaba cada que entraba a la funcion y por eso solo me guardaba el ultimo dato, asi que solo lo puse fuera de la función, si a alguien le ocurre el mismo error que a mi, espero esto le ayude