거의 3 멘토링 프로그램은 속지 않을 것 재생 주문

[〓⑤⑦⑤⑥⑧③①②〓] 초대 마] [①⑤⑧⑧①⑧⑧⑧ 공식 웹 사이트 hct728 점 C0 분의 qryStage.First하며 SQL Server 쿼리 내부 // 링크
qryProductivity.First, 외부 SQL 서버의 쿼리에 // 링크
하지 qryStage.Eof 또는 qryProductivity.Eof가하는 동안 / ? / 내가의 아이디어와 .NET 따라 올 오류가있는 경우이 문장
(가) 시작
CDS_Output.Insert을,
CDS_Outputfac.Value을 : = 'ZD00을';
CDS_Outputres.Value = 복사 (cbStage.Text, 1, 3),
그렇지 않은 경우 (cbShift. = 텍스트 '') 당시
선두
에 StrToInt (cbStage.Text가) [010020030060]는 다음 경우
선두
CDS_Outputarea.Value을 : = '하며 DFZ - 전원 - SMD'
최종
다른 사람이
선두
다음 DFZ - 전원 - 더 SPI '= CDS_Outputarea.Value'을
끝 ;
끝;
CDS_Outputdate.Value :. = qryStage.fieldbyname ( 'outputdate') AsInteger;
CDS_Outputshift.Value :. qryStage.fieldbyname = ( 'outputPeriod') AsString;
CDS_Outputline.Value = qryStage.fieldbyname ( '선') AsString;.
CDS_Outputlinetype.Value = qryStage.fieldbyname ( '선') AsString;.
CDS_Outputitem.Value = qryStage.fieldbyname ( 'bcno') AsInteger].
CDS_Outputmodel.Value :. qryStage.fieldbyname = ( 'bc_model') AsString;
CDS_Outputpn.Value :. qryStage.fieldbyname = ( 'bc_part_no') AsString;
CDS_Outputoutput.Value = qryStage.fieldbyname ( 'OutputQty') AsInteger].

//提取外部服务器SQL资料并显示在그리드上面
CDS_Outputmanpower.Value = qryProductivity.fieldbyname ( '인력') AsString;.
CDS_Outputlabor.Value :. = qryProductivity.fieldbyname ( '노동') AsString;
CDS_Outputqa1.Value :
CDS_Outputonoff1.Value :. qryProductivity.fieldbyname = ( '- 오프') AsString;
CDS_Output.Post;
qryStage.Next;
qryProductivity.Next;

종료;

종료;
절차 Tproductivity.FormCreate (발신자 : TObject의);
시작
CDS_Output.CreateDataSet을;
종료;

절차 Tproductivity.FormClose (발신자 : TObject의; var에 작업 : TCloseAction);
시작
CDS_Output.Destroy을;
종료;

종료.


내가 선을 분할하고있어 -------- ---------

문제 : 주요 내가해야 할,의 경우는 다음과 같습니다 외부 SQL 서버의 데이터와 결합 로컬 SQL 서버 통합에 대한 정보를 추출 할 수있는 Grid 컨트롤에 표시됩니다

나는 두 개의 연결, 2 쿼리 및 두 DS를 보냈다. DTicketDateset 공유. 코드로서, 문제는 확실히 존재하고, 초보자 때문에,이 문제를 찾을 수 없습니다. 코드 형식은 약간의 문제가 아니라 안목을 가리키는 가리키는 물어 . (I 상사를 싫어하지만, 방법은, 누가 내가. 하나가 슈 Daoshou에 배우고, 학습하지 않는 전문 프로그래머입니다.)

추천

출처www.cnblogs.com/dasf/p/11717257.html