怎样用delphi将SQL server中的数据导出为文本格式?
2个回答
展开全部
这里给你提供一种方法建议:
采用ehlib里的dbgrideh,查询你需要到处的数据
uses DBGridEhImpExp;
到处函数,csv, 将后缀改为txt,即分隔符为逗号
procedure ExportData;
var
ExpClass:TDBGridEhExportClass;
FileName:String;
begin
if savedialog1.execute then
begin
filename:=savedialog1.filename;
ExpClass := TDBGridEhExportAsCSV;
if ExpClass <> nil then
SaveDBGridEhToExportFile(ExpClass,DBGridEh1,FileName, True);
end;
end;
采用ehlib里的dbgrideh,查询你需要到处的数据
uses DBGridEhImpExp;
到处函数,csv, 将后缀改为txt,即分隔符为逗号
procedure ExportData;
var
ExpClass:TDBGridEhExportClass;
FileName:String;
begin
if savedialog1.execute then
begin
filename:=savedialog1.filename;
ExpClass := TDBGridEhExportAsCSV;
if ExpClass <> nil then
SaveDBGridEhToExportFile(ExpClass,DBGridEh1,FileName, True);
end;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询