Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Boa tarde galera,
tenho um programa que tem a possibilidade de salvar os registros, porém toda vez que eu tenho que salvar eu tenho que escrever: NomeArquivo.xml, gostaria se saber como adicionar a extensão automaticamente.
Tenho o seguinte código:
procedure TDespesas.BtSalvarClick(Sender: TObject);
begin
if SaveDialog1.Execute then
begin
ClientDataSet1.SaveToFile(SaveDialog1.FileName, dfXMLUTF8);
end;
end;Desde já, obrigado! :thumbsup:
Carregando comentários...