Gracias por la ayuda finalmente encontré otra manera de hacerlo la cual comparto a continuación:
Código Delphi
[-]
SaveDialog.Filter := 'Hoja de Cálculo Excel (*.xls) | *.xls';
SaveDialog.Title := ' Salvar listado como Hoja de Cálculo Excel';
if SaveDialog.Execute then
begin
ExportGrid4ToExcel(SaveDialog.FileName,cxGrid, False);
MessageDlg('La información fué salvada en ' + SaveDialog.FileName, mtInformation, [mbOk], 0);
end;