Q&A

  • Table에 Insert할려고 하는데 속도빠르고 쉽게하는 방법 좀...
Excel을 Open해서
현재Sheet의 내용을 Sheet Name이 곧 Table명 입니다..
예를 들어
  A칼럼은 Insert 안하고....B 칼럼에서 G칼럼까지..
  Row가 만약 10개 있다면....
10개 Record을 Table에 Insert할려면 어떻게해야하는지..(속도까지감안해서)
(참고로 델파이4 사용)
  
2  COMMENTS
  • Profile
    구창민 2002.12.19 00:46
    안녕하세요~ 구창민입니다.

    아래 내용은 일전에 볼랜드 뉴스그룹에서 소개된적이 있는 내용인데,,

    먼저 CreateOleObject로 Excel 을 실행시킨 다음,
    원하시는 엑셀파일을 부르고 이 불러진 화일을
    Table컴포넌트를 이용해서 Insert 하시면 될거 같네요.

    예를 들면 아래처럼..

       for i := 0 to v.cells.count do
       begin
         table.Insert;
         table.fields[0].asString := v.cells[i+1, 1];
         table.fields[1].asString := v.Cells[i+1, 2];
         table.fields[2].asString := v.Cells[i+1, 3];
         table.post;
       end;

    참고로 하시기 바랍니다.

    그럼~ 항상 즐거운 프로그래밍 하시길~~


  • Profile
    열심히 2002.12.19 00:45
    지금 만들어보던중 궁금한게 생겼는데요...

    님이 지금 원하시는 작업이 델파이에서 버턴만 한번 누르면

    엑셀생성 -> 파일 OPEN ->
    모든 WORKSHEET 찾아서 안에있는내용 INSERT이건가요?/

    이것을 말씀하시는 건가요??

    아님 그냥 엑셀파일 불러서 정해진