안녕하세요.
왜 그런지 모르겠는데요.
아래 코드에서 오브젝트 값을 메모장 이나 변수에 넣으려고 하면 예외가 생기네요..
헌데... 메시지 박스로 뿌리면 예외 없이 잘 되어 지구요..
흠....
무슨 차이 일까요?
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;
날이 많이 쌀쌀해 졌네요.
다들 감기 조심하세요.
Object 의 번지를 찍으시려는 거면..
아래처럼 해야 맞지 않을지요?
mmo1.Lines.Add( IntToStr(integer(slValue.Objects[ nListCnt ]) ) ) ;
내용을 찍으시려는 거면.. Object 가 아니라 아래처럼 값을 그대로 출력하세요...
mmo1.Lines.Add( slValue[ nListCnt ] ) ;