Delphi에서 데이터베이스의 레코드를 Word로 가져오는 방법
번호: QA004684
작성일 : 2003년 5월 18일 최종 수정일 : 2003년 5월 20일
범주:
델파이 - 데이터베이스
pq :
제가 사용하는 시스템은 win2000, delphi는 버전 6.0, word2000입니다.
질문: Delphi에서는 데이터베이스의 레코드를 Word로 가져와서 테이블 형식으로 만들어야 합니다. Word에서 두 개의 테이블을 한 페이지에 나란히 표시해야 합니다.
답변 :
이 질문에 대한 나의 대답은 다음과 같습니다. 비슷한 문제를 처리했지만 데이터를 TXT에 쏟아 부었습니다. 표 형태로도 그려져 있는데 똑같은 것 같아요.
중요한 것은 변수를 TStrings 유형으로 설정한다는 것입니다.
좋다:
var
TXTstr:TStrings;
시작하다
TXTstr := TStringList.Create;
TXTstr.Append('────────┬────┬─────┬─────┬─────');
TXTstr.Append('이름│'); //첫 번째 줄
.... //데이터베이스에서 TXTADO로 값 가져오기
TXTADO.Eof가 아닌 동안
시작하다
TXTstr[1]:=TXTstr[1]+format('%8s',[TXTADO.FieldByName('XM').Asstring])+'│';
TXTADO.다음;
끝;
진행자 메모: 이 질문을 완료하려면 두 단계가 필요합니다. 하나는 데이터베이스의 데이터를 읽는 것이고, 다른 하나는 자동화 기술을 사용하여 Word를 제어하여 조판을 완료하고 이를 Word 파일로 저장하거나 인쇄하는 것입니다. 위에서 첫 번째 단계를 소개했습니다. 두 번째 단계는 QA003053 "Delphi4.0을 사용하여 Word97을 직접 제어하세요"를 참조하세요.
loga 의 의견:
VB인 경우 기록된 매크로를 WORD로 연 다음 수동으로 데이터베이스 레코드를 추가하면 VBA가 자동으로 코드를 작성할 수 있습니다. 미리보기는 참고용일 뿐입니다.
관련 질문:
QA000836 "Excel97의 명령 세트를 아는 방법"
QA001381 "VB에서 Word 및 Excel을 제어하는 방법"
QA003819 "OLE를 사용하여 Word에 텍스트를 추가하는 방법"
이 질문에 Huang Wei 님이 답변하셨습니다.