Q&A

  • [질문] TStringList Object ...
안녕하세요.

왜 그런지 모르겠는데요.

아래 코드에서  오브젝트 값을 메모장 이나 변수에 넣으려고 하면 예외가 생기네요..
헌데... 메시지 박스로 뿌리면 예외 없이 잘 되어 지구요..  
흠....
무슨 차이 일까요?

procedure TForm1.btn2Click(Sender: TObject);
var
  nListCnt  : Integer ;
  szTmp : String ;
begin
      for nListCnt := 0 to slValue.Count - 1 do
      begin
        //mmo1.Lines.Add( string( slValue.Objects[ nListCnt ] ) ) ; --> Out of memory
        //szTmp := string( slValue.Objects[ nListCnt ]  ) ; --> Invalid pointer operation
        //ShowMessage( string( slValue.Objects[ nListCnt ] ) ) ; --> 아무 이상없음
      end ;

end;

날이 많이 쌀쌀해 졌네요.

다들 감기 조심하세요.
1  COMMENTS
  • Profile
    구창민 2009.12.02 20:31
    무얼 하시려는지 모르겠는데..
    Object 의 번지를 찍으시려는 거면..

    아래처럼 해야 맞지 않을지요?

    mmo1.Lines.Add( IntToStr(integer(slValue.Objects[ nListCnt ]) ) ) ;

    내용을 찍으시려는 거면.. Object 가 아니라 아래처럼 값을 그대로 출력하세요...

    mmo1.Lines.Add( slValue[ nListCnt ] ) ;