{"id":1453,"date":"2024-06-05T20:26:54","date_gmt":"2024-06-05T12:26:54","guid":{"rendered":"http:\/\/www.jh1999.cn\/?p=1453"},"modified":"2024-06-06T22:17:53","modified_gmt":"2024-06-06T14:17:53","slug":"intraweb%e5%8a%a8%e6%80%81%e7%94%9f%e6%88%90iwdbgrid","status":"publish","type":"post","link":"http:\/\/www.jh1999.cn\/?p=1453","title":{"rendered":"Intraweb\u52a8\u6001\u751f\u6210IwDbGrid"},"content":{"rendered":"
\n\n

Intraweb \u5f00\u53d1WEB\u5e94\u7528\uff0c\u9ad8\u6548\u7075\u6d3b\uff0c\u914d\u5408IWDbGrid\u63a7\u4ef6\uff0c\u80fd\u5feb\u901f\u5904\u7406\u5927\u91cf\u7684\u6570\u636e\u3002<\/p>\n\n\n\n

\u4f46\u6bcf\u4e2a\u754c\u9762\u90fd\u4eba\u5de5\u8bbe\u8ba1\u6570\u636e\u8868\u683c\uff0c\u8fd8\u662f\u76f8\u5bf9\u8d39\u65f6\u8d39\u529b\uff0c\u5982\u80fd\u7528\u4e0a\u4ee3\u7801\uff0c\u5728\u8fd0\u884c\u65f6\u52a8\u6001\u751f\u6210\u8868\u683c\uff0c\u5c31\u80fd\u7701\u53bb\u4e00\u5927\u7b14\u5f00\u53d1\u7cbe\u529b\uff0c\u8ba9\u5f00\u53d1\u4eba\u5458\u5c06\u66f4\u591a\u7684\u7cbe\u529b\u653e\u5230\u4f01\u4e1a\u903b\u8f91\u4e0a\u53bb\uff0c\u653e\u5230\u529f\u80fd\u7684\u5b8c\u5584\u548c\u6269\u5c55\u4e0a\u53bb\u3002<\/p>\n\n\n\n

\u4e0b\u9762\u5373\u662f\u52a8\u6001\u751f\u6210IWDbGrid\u7684\u5b9e\u9645\u5e94\u7528\u4ee3\u7801\uff0c\u53ef\u80fd\u4f1a\u56e0\u4e3a\u7248\u672c\u4e0d\u540c\u800c\u6709\u6240\u4e0d\u540c\u3002<\/p>\n\n\n\n

procedure TfmsbShebei.setMyGrid();\nvar\n  i:Integer;\n  sField:String;\n  ftCurr:TFieldType;\nbegin\n  qArea.Open;\n  \/\/\u83b7\u53d6\u5e76\u5b9a\u4e49FixSql\u8bed\u53e5\u975e\u7ba1\u7406\u5458\u53ea\u80fd\u770b\u5230\u81ea\u5df2\n  UserSession.setFixSql(self.Name);\n  UserSession.sOldSql:=UserSession.sFixSql;\n  qMaster.Close;\n  qMaster.SQL.Text:=UserSession.sFixSql+' '+UserSession.sFixOrder;\n  qMaster.Open;\n  \/\/\u5b9a\u4e49\u8868\u683c\u548c\u4e0b\u62c9\u8fc7\u6ee4\u7528\u680f\u4f4d\n  with AdvGrid.Columns do\n  begin\n    \/\/\u8bbe\u8ba1\u65f6\u67090,1,2,3\u680f\n    for i:=4 to qMaster.Fields.Count+3 do\n    begin\n      sField:=qMaster.Fields.Fields[i-4].FieldName;\n      ftCurr:=qMaster.Fields.Fields[i-4].DataType;\n      Qry5.Close;\n      Qry5.SQL.Text:='select top 1 * from msTblField where FieldName='+''''+sField+'''';\n      Qry5.Open;\n      Insert(i);\n      if (sField='ywID') or (sField='sbID') then\n      begin\n        Items[i].Visible:=false;\n        Continue;\n      end;\n      Items[i].ColumnHeaderAlignment:=taCenter;\n      Items[i].ColumnHeaderClick:=false;\n      Items[i].DataField:=sField;\n      Items[i].Title:=Qry5.fieldbyname('FieldDesc').AsString;\n      Items[i].Width:=Qry5.fieldbyname('ViewWidth').AsInteger;\n      if (ftCurr=ftFloat)or(ftCurr=ftBCD) then\n      begin\n         Items[i].Alignment:=taRightJustify;\n         Items[i].Editor:=edEditFloat;\n      end else if ftCurr=ftBoolean then\n      begin\n         Items[i].Alignment:=taCenter;\n         Items[i].ColumnType:=ctDataCheckBox;\n         Items[i].Editor:=edCheckBox;\n      end else if Qry5.FieldByName('bRead').AsBoolean then\n      begin\n         Items[i].Editor:=edNone;\n      end else Items[i].Editor:=edEdit;\n      \/\/\u6700\u540e\u5904\u7406\u5f85\u5b9a\u680f\u4f4d\n      if (sField='sbType') then\n      begin\n        Items[i].Editor:=edCombo;\n        qTemp.Close;\n        qTemp.SQL.Text:='Select opValue from msOption where opType=''sbType'' order by ViewOrder';\n        qTemp.Open;\n        while not qTemp.Eof do\n        begin\n          Items[i].ComboItems.Add(qTemp.fieldbyname('opValue').AsString);\n          qTemp.Next;\n        end;\n      end else if (sField='netVend') then\n      begin\n        Items[i].Editor:=edCombo;\n        qTemp.Close;\n        qTemp.SQL.Text:='Select opValue from msOption where opType=''netVend'' order by ViewOrder';\n        qTemp.Open;\n        while not qTemp.Eof do\n        begin\n          Items[i].ComboItems.Add(qTemp.fieldbyname('opValue').AsString);\n          qTemp.Next;\n        end;\n      end;\n    end;\n  end;\nend;<\/code><\/pre>\n\n
<\/svg><\/div><\/div><\/div>","protected":false},"excerpt":{"rendered":"
Intraweb \u5f00\u53d1WEB\u5e94\u7528\uff0c\u9ad8\u6548\u7075\u6d3b\uff0c\u914d\u5408IWDbGrid\u63a7\u4ef6\uff0c\u80fd\u5feb\u901f\u5904\u7406\u5927\u91cf\u7684\u6570\u636e\u3002 \u4f46\u6bcf\u4e2a\u754c\u9762\u90fd\u4eba\u5de5 … \u9605\u8bfb\u66f4\u591a<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[5],"tags":[],"class_list":["post-1453","post","type-post","status-publish","format-standard","hentry","category-kfbj"],"_links":{"self":[{"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/posts\/1453","targetHints":{"allow":["GET"]}}],"collection":[{"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1453"}],"version-history":[{"count":1,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/posts\/1453\/revisions"}],"predecessor-version":[{"id":1454,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=\/wp\/v2\/posts\/1453\/revisions\/1454"}],"wp:attachment":[{"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1453"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1453"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/www.jh1999.cn\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1453"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}