도서 [도서] 델파이 Begin ... End - 김원경 저 (2011년)
2012.03.13 00:22
이 글은 새 게시판으로 이전되었습니다.
새 게시판 링크:
https://welcome.devgear.co.kr/guide-embarcadero/book/델파이-begin-end-2011년-665쪽-r8/
댓글 4
-
AllwaysHappy
2017.11.06 10:38
-
김원경
2019.08.22 09:18
책에 있는 소스와 지금 버전의 엑셀 사용 방법에서 약간의 차이가 있을 수 있습니다. 다른 버전의 코드를 사용해 보십시오.
uses Udm,comobj, Ucheckgrid;
var
Excel: OleVariant;
WorkBook: OleVariant;
WorkSheet: OleVariant;
procedure TDeptForm.Button2Click(Sender: TObject);
var
I: Integer;
begin
Excel := CreateOleObject('Excel.Application');
Excel.Visible := True;
// 워크북 추가
Excel.WorkBooks.Add;
WorkBook := Excel.ActiveWorkBook;
// 워크시트 추가
Workbook.sheets.add;
try
// 작업할 워크시트 선택
WorkSheet := WorkBook.WorkSheets[1];
for I := 0 to StringGrid1.RowCount do
begin
WorkSheet.Cells[i+1,1].value := StringGrid1.Cells[0,i];
WorkSheet.Cells[i+1,2].value := StringGrid1.Cells[1,i];
WorkSheet.Cells[i+1,3].value := StringGrid1.Cells[2,i];
end;
// WorkBook.SaveAs('d:\ExcelOutputTest.xls');
finally
// 워크북 닫기
WorkBook.close;
WorkBook:=unAssigned;
WorkSheet:=unAssigned;
// 엑셀 종료
Excel.Quit;
Excel:=unAssigned;
end ;
-
올강올캉
2018.09.10 18:08
안녕하세요.
유튜브에 있는 인터넷 강의가 많은 도움이 되어 감사 말씀드립니다.
강의를 듣고 따라 하던중 ‘델파이 기본 교육_15.델파이와 DB연결과 dbExpress’에서 문제가 생겨 이렇게 문의 드립니다.
자료실 다운로드하게 해 주신 4개 파일중 하나인,
를 다운받아 압축을 풀면, 여러 가지 파일이 나오는데, 여러개의 파일 중에
....
MUSICMALL.IB
PROJECTDB.IB
SAMPLE.IB
등등이 있습니다.
이 파일중 SAMPLE.IB가 INTERBASE에 연결하려면 다음과 같은 에러 메시지가 뜹니다.
Unsupported on-disk structure for file C:\delphi programs\insa\db\SAMPLE.IB; found 12, support 17
나머지 파일중 MUSICMALL.IB, PROJECTDB.IB은 에러가 없는데 말입니다.
몇 번을 다운로드받아 다시 시도해도 같은 증상입니다.
혹 업로드 해 주신 SAMPLE.IB가 문제 있는지 확인 부탁드립니다.
-
김원경
2019.08.22 09:00
다운로드된 데이터베이스 버전과 사용하시는 데이터베이스 버전 구조가 틀려서 발생하는 오류메세지입니다.(참고로 데이터베이스 작성시 이전 버전과 호환되는 구조로 작성)
제가 새로운 버전의 데이터베이스를 파일 첨부해 놓도록하겠습니다. 확인하시고 결과를 알려주시면 감사하겠습니다.
안녕하세요!! 초보 개발자입니다. 그래서 교재를 보고 코딩을 하고 있습니다만
교재 P262에 있는 TIP 중에서 6번의 내용대로 코딩을 하였습니다.
그런데 V.Workbooks.Add(XlWBATWorksheet); 부문에서 에라가 발생하는데,,
에라 내용('Workbooks 클라스 중 Add속성을 구할 수 없습니다')입니다.
정오표를 찾아보니 정오표에도 없습니다. 혹시 교재대로하면 않되는가요?
아니면 어떠한 특정한 변수나 코포넌트를 사용해야 하나요?
아니면 Use문에 특정한 Pas를 선언해야 하나요?
혹시 너무 황당한 질문을 하지나 않는지요?? 감사합니다. 오늘도 즐거운 하루되세요~~~
감사합니다. 고맙습니다~~