用ehlib控件可把 dbftoexcel OpenDialog.FilterIndex := 1; if OpenDialog.Execute then
LoadDBGridEhFromImportFile (TDBGridEhImportAsText,dbgrideh1,OpenDialog.FileName,true);