\u3010\u6ce8\u3011\u672c\u6587\u7531\u7f51\u53cb \u5e7d\u7075 \u5206\u4eab\uff0c\u7531 swish \u6574\u7406\u5e76\u91cd\u65b0\u7f16\u8f91\u3002<\/p>\n
\u3010\u5e94\u7528\u573a\u666f\u3011<\/p>\n
\u7ecf\u5e38\u9700\u8981\u5c06A\u8868\u7684\u90e8\u5206\u6570\u636e\u5bfc\u5165\u5230B\u5e93\u7684A\u8868\u4e2d\uff0c\u4ee5\u524d\u7528\u5faa\u73af\u63d2\u5165 \u6216\u662f\u7528\u6570\u636e\u5e93\u672c\u8eab\u7684\u5bfc\u5165\u5bfc\u51fa\uff0c\u6bd4\u8f83\u8017\u65f6\uff0c\u64cd\u4f5c\u9ebb\u70e6\u3002<\/p>\n
\u3010\u539f\u59cb\u505a\u6cd5\u3011<\/p>\n
\u5faa\u73af\u63d2\u5165<\/p>\n
AdoQueryM.sql.text:=\u2019select * from A\u8868\u2019;\r\nAdoQueryM.sql.Open;\r\nWith AdoQueryM do begin\r\n First;\r\n while not Eof do begin\r\n Inc(K);\r\n AdoQueryD.Append;\r\n for i:=0 to FieldCount-1 do\r\n begin\r\n AdoQueryD.FieldByName(Fields[i].FieldName).Value:=fieldByName(Fields[i].FieldName).Value ;\r\n end;\r\n AdoQueryD.Post;\r\n Application.ProcessMessages;\r\n Next;\r\n end;\r\nend;<\/pre>\n\u3010QDB\u3011<\/p>\n
AdoQueryM.sql.text:=\u2019select * from A\u8868\u2019;\r\nAdoQueryM.sql.Open;\r\nvQDataSet.CopyFrom(AdoQueryM);\r\nfor i := 0 to vQDataSet.FieldDefs.Count-1 do\r\nbegin\r\n TQFieldDef(vQDataSet.FieldDefs[i]).Table:=\u2019 A\u8868\u2019;\r\nend;\r\nadoMssql:=TQMSSQLConverter.Create(nil); \/\/\u8f6c\u6362\u5668\r\nadoMssql.AllAsInsert:=true;\r\nadomssql.DataSet:=vQDataSet;\r\nConnDB.Execute(adomssql.sql); \/\/B\u6570\u636e\u5e93\u7684\u8fde\u63a5<\/pre>\n\u91c7\u7528QDB\u7684\u65b9\u6cd5\u6765\u8f6c\u6362\u6570\u636e\uff0c\u901f\u5ea6\u8981\u6bd4\u539f\u59cb\u65b9\u6cd5\u5feb\u4e86\u597d\u51e0\u500d\u3002<\/p>\n
2\u3001\u53ea\u590d\u5236\u6307\u5b9a\u5217\u7684\u5185\u5bb9\u5230\u6570\u636e\u5e93<\/b><\/h4>\n
A\u8868\u670950\u591a\u4e2a\u5217\uff0c\u4f46\u81ea\u5df1\u53ea\u9700\u8981\u5bfc\u51655\u4e2a\u5217\u5230\u6570\u636e\u5e93\u4e2d \uff0cQDB\u53ea\u9700\u8981\u5c06\u4e0a\u9762 1 \u4e2d\u7684<\/p>\n
\nvQDataSet.CopyFrom(AdoQueryM);<\/pre>\n<\/blockquote>\n\u6539\u4e3a\uff1a<\/p>\n
\nvQDataSet.CopyFrom(adoquery1,\u2019\u5e8f\u53f7,\u7f16\u7801,\u540d\u79f0,\u72b6\u6001,\u90e8\u95e8\u2019);<\/pre>\n<\/blockquote>\n\u65e2\u53ef\u3002<\/p>\n
3\u3001\u5927\u6570\u636e\u5bfc\u5165\u6280\u5de7-\u5206\u9875\u6279\u91cf\u5bfc\u5165<\/h4>\n
\u3010\u5e94\u7528\u573a\u666f\u3011<\/p>\n
\u67d0\u8868\u670910\u4e07\u884c\u8bb0\u5f55\u9700\u8981\u5bfc\u5165\uff0c\u975e\u5e38\u8017\u65f6\u3002<\/p>\n
\u3010\u89e3\u51b3\u65b9\u6848\u3011<\/p>\n
\u91c7\u7528QDataset\u7684\u5206\u9875\u7b97\u6cd5,\u6279\u91cf\u63d2\u5165<\/p>\n
SQLDataSet ,vData:TQDataSet;\r\nadoMssql:=TQMSSQLConverter.Create(nil); \/\/\u5404\u79cd\u8f6c\u6362\u5668\r\nvData.PageSize:=1000;\r\nfor i := 0 to vData.PageCount-1 do\r\nbegin\r\n vData.PageIndex:=i;\r\n SQLDataSet.CopyFrom(vData,dcmview); \/\/\u83b7\u53d6\u6307\u5b9a\u9875\u7684\u6570\u636e\r\n adomssql.DataSet:=SQLDataSet;\r\n conDB.Execute(adomssql.sql);\r\nend;<\/pre>\n4\u3001\u672c\u5730ClientDataSet\u7684\u65e5\u5fd7\u6587\u4ef6\u5bfc\u5165\u5230\u6570\u636e\u5e93<\/h4>\n
\u3010\u5e94\u7528\u573a\u666f\u3011<\/p>\n
\u672c\u5730\u6709\u5f88\u591aClientDataSet\u4ea7\u751f\u7684\u65e5\u5fd7\u6587\u4ef6\uff0c\u9700\u8981\u5bfc\u5165\u5230\u6570\u636e\u5e93\u4e2d<\/p>\n
\u3010\u89e3\u51b3\u65b9\u6848\u3011<\/p>\n
\uff081\uff09\u3001\u6839\u636eClientDataSet\u7684\u65e5\u5fd7\uff0c\u52a8\u6001\u4ea7\u751f\u8868\u7ed3\u6784<\/p>\n
procedure TableCreate(vfn:string;vData:TQDataSet);\r\nvar\r\n ADataset:TQDataSet;\r\n i:Integer;\r\n s,sql:string;\r\nbegin\r\n conDB.execute('if object_id(N'''+vfn+ ''',N''u'') is not null drop table '+vfn);\r\n ADataSet:=TQDataSet.Create(nil);\r\n sql:=Format('Create table %s (',[vfn])+slinebreak;\r\n try\r\n ADataset.Clone(vData);\r\n for i:=0 to ADataset.Fields.Count-1 do\r\n begin\r\n if ADataset.Fields[i].DataType in [ftString, ftMemo, ftFmtMemo, ftWideString] then\r\n begin\r\n s:=' varchar('+inttostr(ADataset.Fields[i].DataSize)+')'\r\n end\r\n else if ADataset.Fields[i].DataType in[ftSmallint, ftInteger, ftWord, ftAutoInc] then s:=' integer'\r\n\r\n else if ADataset.Fields[i].DataType in[ftLargeInt] then\r\n s:=' bigint'\r\n else if ADataset.Fields[i].DataType=ftCurrency then\r\n s:=' money'\r\n else if ADataset.Fields[i].DataType in [ftDate, ftTime, ftDateTime] then\r\n s:=' datetime'\r\n else if ADataset.Fields[i].DataType in [ftBoolean] then\r\n s:=' bit'\r\n else if ADataset.Fields[i].DataType in [ftBCD] then\r\n s:=' money'\r\n else\r\n s:=' money';\r\n sql:=' '+sql+ADataset.Fields[i].FieldName+s+',';\r\n end;\r\n sql:=Copy(sql,1,Length(sql)-1)+')';\r\n conDB.execute(sql);\r\n finally\r\n \/\/ ADataSet.Free;\r\n end;\r\nend;<\/pre>\n\uff082\uff09\u3001\u4f7f\u7528QDataSet+\u8f6c\u6362\u5668 \u4ea7\u751fSQL\u8bed\u53e5\u5e76\u6267\u884c<\/p>\n
ClientDataSetM.LoadFromFile(\u2018\u65e5\u5fd7\u6587\u4ef6\u2019);\r\nvData.CopyFrom(ClientDataSetM);\r\n--\u5206\u9875\u5bfc\u5165\u6570\u636e\r\nSQLDataSet:=TQDataSet.Create(nil);\r\nvData.PageSize:=1000;\r\nfor i := 0 to vData.PageCount-1 do\r\nbegin\r\n vData.PageIndex:=i;\r\n SQLDataSet.CopyFrom(vData,dcmview); \/\/\u83b7\u53d6\u6307\u5b9a\u9875\u7684\u6570\u636e\r\n adomssql.DataSet:=SQLDataSet;\r\n conDB.Execute(adomssql.sql);\r\n end;\r\n<\/pre>\n<\/p>\n
<\/p>\n
<\/p>\n","protected":false},"excerpt":{"rendered":"
\u3010\u6ce8\u3011\u672c\u6587\u7531\u7f51\u53cb \u5e7d\u7075 \u5206\u4eab\uff0c\u7531 swi […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"site-sidebar-layout":"default","site-content-layout":"","ast-site-content-layout":"default","site-content-style":"default","site-sidebar-style":"default","ast-global-header-display":"","ast-banner-title-visibility":"","ast-main-header-display":"","ast-hfb-above-header-display":"","ast-hfb-below-header-display":"","ast-hfb-mobile-header-display":"","site-post-title":"","ast-breadcrumbs-content":"","ast-featured-img":"","footer-sml-layout":"","ast-disable-related-posts":"","theme-transparent-header-meta":"","adv-header-id-meta":"","stick-header-meta":"","header-above-stick-meta":"","header-main-stick-meta":"","header-below-stick-meta":"","astra-migrate-meta-layouts":"default","ast-page-background-enabled":"default","ast-page-background-meta":{"desktop":{"background-color":"var(--ast-global-color-4)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"ast-content-background-meta":{"desktop":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"tablet":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""},"mobile":{"background-color":"var(--ast-global-color-5)","background-image":"","background-repeat":"repeat","background-position":"center center","background-size":"auto","background-attachment":"scroll","background-type":"","background-media":"","overlay-type":"","overlay-color":"","overlay-opacity":"","overlay-gradient":""}},"footnotes":""},"categories":[8,9,66],"tags":[57],"class_list":["post-3066","post","type-post","status-publish","format-standard","hentry","category-delphi","category-qdac","category-qdb","tag-57"],"views":5782,"_links":{"self":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/3066","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=3066"}],"version-history":[{"count":4,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/3066\/revisions"}],"predecessor-version":[{"id":3071,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=\/wp\/v2\/posts\/3066\/revisions\/3071"}],"wp:attachment":[{"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=3066"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=3066"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/blog.qdac.cc\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=3066"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}