易飛ERP進貨單源碼——複製報價單

procedure TfrmCopi08.CopyFromCOPTA; //複製報價單 var   mData, mOutPutMaster, mOutPutDetail, mReturn: Variant;   i: Integer;   mTH008: Double; begin   try     FIsCopyPrior := True;     with TdmCopi08(DM) do

>>阅读原文<<