Quando vou salvar o comprovante do TEF esta abrindo dialogo para salvar arquivo xps(Share Point)

[Arnaldo Cruz]

Leio o  ImagemComprovante.Text e guardo em clienteDataset

depois salvo o clienteDataset no formao xml 

DiCart := ExtractFilePath(Application.ExeName) + 'ComprovanteTEF';

DiCart := DiCart + '\' +  FrmCaixaNovo.lbCupom.Text  + 'C' + IntToStr(ViaCli) + '.xml';

cdstxtmemo.SaveToFile(DiCart); neste momento abre a tela pra salvar em formato xps