C++Builder Programming Forum
C++Builder  |  Delphi  |  FireMonkey  |  C/C++  |  Free Pascal  |  Firebird
볼랜드포럼 BorlandForum
 경고! 게시물 작성자의 사전 허락없는 메일주소 추출행위 절대 금지
C++빌더 포럼
Q & A
FAQ
팁&트릭
강좌/문서
자료실
컴포넌트/라이브러리
메신저 프로젝트
볼랜드포럼 홈
헤드라인 뉴스
IT 뉴스
공지사항
자유게시판
해피 브레이크
공동 프로젝트
구인/구직
회원 장터
건의사항
운영진 게시판
회원 메뉴
북마크
볼랜드포럼 광고 모집

C++빌더 Q&A
C++Builder Programming Q&A
[70931] Re:Re:Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기(★꼼수쟁이님봐주세요)
꼼수쟁이 [] 6533 읽음    2014-02-21 09:32
안녕하세요? 꼼수쟁이 입니다.

말씀하신 소스 들어갑니다.


TAdvStringGrid *pGrid = new TAdvStringGrid(this);
  pGrid->Name = "ImsiGrid";


  if(OpenDialog1->Execute())
  {
      String sDir = OpenDialog1->FileName;
      pGrid->LoadFromXLS(sDir);
  }
  AdvStringGrid1->ColCount = pGrid->ColCount;
  AdvStringGrid1->RowCount = pGrid->RowCount + 1;

  for(int i = 0;i < pGrid->RowCount; i++)
  {
      for(int k = 0; k < pGrid->ColCount; k++)
    {
        AdvStringGrid1->Cells[k][i+1] = pGrid->Cells[k][i];
    }
  }
  delete pGrid;

이렇게 하면 원하시는 결과 얻으실수 있을거구요..

항상 말씀드리지만 저는 정답이 아닙니다.!!! 결코!! 반드시!!! 무조건!! 장담컨데 -_-;;;;;

일단 위에 소스를 조금씩 뒤흔드시면 여러가지방법으로 재사용하실수 잇을거구요

저 위에보다 더 좋은 방법을 알게되신다면~~!

저좀 가르쳐주세요 ㅠ_ㅠ

그럼 날도 추운데 감기조심하세요~~!!






















C++초보 님이 쓰신 글 :
: 꼼수쟁이님 안녕하세요 C++초보입니다.
: 일단 너무 감사드리고요 출력 까지 되는 상태에요~~
: 그런데  원래 만들어둔 포맷이 사라지는데요 이거 살리고 로드하는방법 없을까요 ??ㅠㅠ
:
: : TForm(Owner)에 미리 셋팅해둔 상태입니다.이 지정해둔 포맷을 살리고
: Cells[1][1]부터 데이터가 쭉 나오도록 하고싶어요 ㅠㅠ도와주세요!!!!!!!!!!!!!!!!!
: 사진 첨부 하겠습니다 .
:
: : TForm(Owner)
:
:       iniTest2->AdvStringGrid1->Cells[0][0] = "순번";
:       iniTest2->AdvStringGrid1->Cells[1][0] = "1";
:       iniTest2->AdvStringGrid1->Cells[2][0] = "2";
:       iniTest2->AdvStringGrid1->Cells[3][0] = "3";
:       iniTest2->AdvStringGrid1->Cells[4][0] = "4";
:       iniTest2->AdvStringGrid1->Cells[5][0] = "5";
:       iniTest2->AdvStringGrid1->Cells[6][0] = "6";
:
:
: void __fastcall TiniTest2::ExcelOpenClick(TObject *Sender)
: {
:
:     if (OpenDialog2->Execute())
:     {
:         String sDir = OpenDialog2->FileName;
:
:                 AdvStringGrid1->LoadFromXLS(sDir);   //정상적으로 출력 하지만 포맷이 없어짐
:
:     }
:
:
: }
:
: 꼼수쟁이 님이 쓰신 글 :
: : 안녕하세요~ 꼼수쟁이입니다.
: :
: : 두가지 방법을 이용해서 불러와볼게요~
: :
: : 우선
: :
: : 질문자님께서 말씀하신방법
: :
: : opendialog 를 이용한 블라블라..
: :
: :
: :     OpenDialog2->Filter = "xls files (*.xls)|*.XLS| xlsx file (*.xlsx)|*.XLSX";
: :
: :     if (OpenDialog2->Execute())
: :     {
: :         String sDir = OpenDialog2->FileName;
: :                 AdvStringGrid1->LoadFromXLS(sDir);
: :     }
: :
: : 이렇게 해주시면되겟구요
: :
: : 두번째  AdvGridExcelIO1 를 이용한 방법!!
: :
: :
: :     OpenDialog2->Filter = "xls files (*.xls)|*.XLS| xlsx file (*.xlsx)|*.XLSX";
: :
: :     if (OpenDialog2->Execute())
: :     {
: :         String sDir = OpenDialog2->FileName;
: :     AdvGridExcelIO1->AdvStringGrid = AdvStringGrid1;
: :     AdvGridExcelIO1->XLSImport(sDir);
: :     }
: :
: : 이 되겟습니다.~ 오늘은 감기로 인해.. 정신분열이 온 이유로.. 주석생략..;;
: :
: : 수고하세요~

+ -

관련 글 리스트
70912 엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기 질문 c++초보 3441 2014/02/18
70919     Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기 질문 꼼수쟁이 5885 2014/02/19
70921         Re:Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기(★꼼수쟁이님봐주세요) C++초보 4345 2014/02/19
70931             Re:Re:Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기(★꼼수쟁이님봐주세요) 꼼수쟁이 6533 2014/02/21
70914     Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기 질문 memi 3865 2014/02/19
70915         Re:Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기 질문 4208 2014/02/19
70917             Re:Re:Re:엑셀 파일의 내용을 AdvStringGrid 에 뿌려주기 질문 Intotheblue 3617 2014/02/19
Google
Copyright © 1999-2015, borlandforum.com. All right reserved.