⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 u_dengji.pas

📁 销售业绩核算系统
💻 PAS
📖 第 1 页 / 共 3 页
字号:
🔍
123 
                  adoquery88.FieldValues['b007']:=adoquery7.FieldValues['bianhao'];
                  adoquery88.FieldValues['n007']:=adoquery7.FieldValues['name'];
                  adoquery88.FieldValues['b008']:=adoquery8.FieldValues['bianhao'];
                   adoquery88.FieldValues['n008']:=adoquery8.FieldValues['name'];
                   adoquery88.FieldValues['b009']:=adoquery9.FieldValues['bianhao'];
                  adoquery88.FieldValues['n009']:=adoquery9.FieldValues['name'];
                  adoquery88.FieldValues['b010']:=adoquery10.FieldValues['bianhao'];
                  adoquery88.FieldValues['n010']:=adoquery10.FieldValues['name'];
                 adoquery88.FieldValues['b011']:=adoquery11.FieldValues['bianhao'];
                adoquery88.FieldValues['n011']:=adoquery11.FieldValues['name'];

                 adoquery88.Post;
                adoquery11.next;
               end;  //11
               adoquery88.Append;
               adoquery88.FieldValues['b001']:=adoquery1.FieldValues['bianhao'];
              adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
              adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
              adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
              adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
              adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
              adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
              adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
              adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
              adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
              adoquery88.FieldValues['b006']:=adoquery6.FieldValues['bianhao'];
              adoquery88.FieldValues['n006']:=adoquery6.FieldValues['name'];
              adoquery88.FieldValues['b007']:=adoquery7.FieldValues['bianhao'];
              adoquery88.FieldValues['n007']:=adoquery7.FieldValues['name'];
             adoquery88.FieldValues['b008']:=adoquery8.FieldValues['bianhao'];
             adoquery88.FieldValues['n008']:=adoquery8.FieldValues['name'];
             adoquery88.FieldValues['b009']:=adoquery9.FieldValues['bianhao'];
            adoquery88.FieldValues['n009']:=adoquery9.FieldValues['name'];
             adoquery88.FieldValues['b010']:=adoquery10.FieldValues['bianhao'];
             adoquery88.FieldValues['n010']:=adoquery10.FieldValues['name'];
             adoquery88.Post;
             adoquery10.Next;
              //end;
             end;    //10
            adoquery88.Append;
            adoquery88.FieldValues['b001']:=adoquery1.FieldValues['bianhao'];
            adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
             adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
             adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
             adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
            adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
            adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
            adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
           adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
             adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
            adoquery88.FieldValues['b006']:=adoquery6.FieldValues['bianhao'];
            adoquery88.FieldValues['n006']:=adoquery6.FieldValues['name'];
            adoquery88.FieldValues['b007']:=adoquery7.FieldValues['bianhao'];
           adoquery88.FieldValues['n007']:=adoquery7.FieldValues['name'];
            adoquery88.FieldValues['b008']:=adoquery8.FieldValues['bianhao'];
            adoquery88.FieldValues['n008']:=adoquery8.FieldValues['name'];
            adoquery88.FieldValues['b009']:=adoquery9.FieldValues['bianhao'];
            adoquery88.FieldValues['n009']:=adoquery9.FieldValues['name'];
             adoquery88.Post;
             adoquery9.next;
            end;    //9
          adoquery88.Append;
          adoquery88.FieldValues['b001']:=adoquery1.FieldValues['bianhao'];
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
          adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
          adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
          adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
           adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
          adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
          adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
          adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
          adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
          adoquery88.FieldValues['b006']:=adoquery6.FieldValues['bianhao'];
          adoquery88.FieldValues['n006']:=adoquery6.FieldValues['name'];
          adoquery88.FieldValues['b007']:=adoquery7.FieldValues['bianhao'];
          adoquery88.FieldValues['n007']:=adoquery7.FieldValues['name'];
          adoquery88.FieldValues['b008']:=adoquery8.FieldValues['bianhao'];
          adoquery88.FieldValues['n008']:=adoquery8.FieldValues['name'];
          adoquery88.Post;
          adoquery8.Next;
           end;   //8
          adoquery88.Append;
          adoquery88.FieldValues['b001']:=adoquery1.FieldValues['bianhao'];
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
          adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
          adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
          adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
          adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
          adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
          adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
          adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
          adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
          adoquery88.FieldValues['b006']:=adoquery6.FieldValues['bianhao'];
          adoquery88.FieldValues['n006']:=adoquery6.FieldValues['name'];
          adoquery88.FieldValues['b007']:=adoquery7.FieldValues['bianhao'];
          adoquery88.FieldValues['n007']:=adoquery7.FieldValues['name'];
          adoquery88.Post;
          adoquery7.Next;
          end;   //7
          adoquery88.Append;
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['bianhao'];
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
          adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
          adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
          adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
          adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
          adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
          adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
          adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
          adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
          adoquery88.FieldValues['b006']:=adoquery6.FieldValues['bianhao'];
          adoquery88.FieldValues['n006']:=adoquery6.FieldValues['name'];
          adoquery88.Post;
           adoquery6.Next;
           end;   //6
           adoquery88.Append;
           adoquery88.FieldValues['n001']:=adoquery1.FieldValues['bianhao'];
           adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
           adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
            adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
           adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
           adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
            adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
           adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
           adoquery88.FieldValues['b005']:=adoquery5.FieldValues['bianhao'];
            adoquery88.FieldValues['n005']:=adoquery5.FieldValues['name'];
            adoquery88.Post;
            adoquery5.Next;
           end;  //5
          adoquery88.Append;
           adoquery88.FieldValues['n001']:=adoquery1.FieldValues['bianhao'];
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
          adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
          adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
          adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
          adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
          adoquery88.FieldValues['b004']:=adoquery4.FieldValues['bianhao'];
          adoquery88.FieldValues['n004']:=adoquery4.FieldValues['name'];
          adoquery88.Post;
          adoquery4.Next;
           end;    //4
          adoquery88.Append;
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['bianhao'];
          adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
          adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
          adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
          adoquery88.FieldValues['b003']:=adoquery3.FieldValues['bianhao'];
          adoquery88.FieldValues['n003']:=adoquery3.FieldValues['name'];
          adoquery88.Post                                                                             ;
          adoquery3.Next;
           end;   //3
             adoquery88.Append;
            adoquery88.FieldValues['n001']:=adoquery1.FieldValues['bianhao'];
            adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
            adoquery88.FieldValues['b002']:=adoquery2.FieldValues['bianhao'];
            adoquery88.FieldValues['n002']:=adoquery2.FieldValues['name'];
             adoquery88.Post;
             adoquery2.Next;
         end;  //2
          adoquery88.append;
         adoquery88.FieldValues['b001']:=adoquery1.FieldValues['bianhao'];
         adoquery88.FieldValues['n001']:=adoquery1.FieldValues['name'];
         adoquery88.Post;
         adoquery1.next;
    end;  //1

end;

procedure TForm_dengji.SpeedButton3Click(Sender: TObject);
begin
close;
end;

procedure TForm_dengji.FormShow(Sender: TObject);
begin
ADOQuery88.Active:=true;
end;

end.
123

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -