Q&A

  • Tmemo내용을 excel cell로 내리는 방법
안녕하세요. 한결 바람이 부드러워졌습니다.
환절기 감기 조심하십시오.

질문은 다름이 아니라.. 메모를 엑셀의 한 셀안에 집어넣는 작업을 하고 있습니다.

다른 자료들은 잘 넘어오는데 문자양이 많은 메모정보는 엑셀에
########################## <- 이런식으로 표현됩니다.
실제로 그 셀을 선택해보면 상단의 edit영역에는 정상적으로 자료가 다 올라와
있습니다.  그래서 셀서식을 둘러보앗는데 엑셀을 잘 사용하지 않아서인지
어느 부분인지 모르겠습니다. 아시는 분 좀 갈켜주시면 감사하겠습니다.

또 하나, 메모를 옮기다보니 enter을 사용해서 줄바꿈한 자료가
엑셀에서  음표로 표시되는데 이것도 보이지 않았음하는데
델파이에서 옮길때 매크로 또는 다른 기능을 추가사용해야하는지
한다면 어떻게 쓰는지도 알고싶습니다.
3  COMMENTS
  • Profile
    박지용 2006.02.22 08:31


    이것은 오류가 아니라, 엑셀의 cell width가 데이타의 길이보다 작기 때문에 그렇습니다.
    Cell의 width를 넓혀주시면 정상적으로 나옵니다.


    이것은 \n  즉, 케리지 리턴을 cell로 보내시기 전에 문자열에서 삭제을 해야되겠죠..^^


    그럼 즐 ~~~ 프
  • Profile
    구기 2006.02.22 08:47
    ########################## <- 이런식으로 표현되는건
    엑셀 자체에 셀별로 표현하는 바이트가 정해져 있어서 그런걸로 분석했습니다.
    그래서 셀 병합을 통해서 해결했습니다.

    근데 답변중에 \n 이걸 어케 써야하는건지 모르겠어요..

    제가 사용한 방법은

        XL.Cells[2, 2].Value := MEMO1.Text;

    이렇습니다.   위의 내용에 적용하는 코팅 좀 알려주세요 ㅜㅜ;

    건강 주의 하시구요...




  • Profile
    박지용 2006.02.24 02:46


    \n은 델파이에서 #13#10 이렇게 표현이 됩니다.

    그리고 델에서 아래의 함수를 제공하고 있죠.

    XL.Cells[2, 2].Value := StringReplace(MEMO1.Text, #13#10, '', [rfReplaceAll]);
    이렇게 하시면 될 것 같네요...^^

    그럼 즐~~~프