델파이 XE2와 숯불/바이트 유형

Question

내가이 문제가, 예를 들어이 코드를 보면 :

SRC는 문자열 타입이며 iindex는 정수 타입과 출력으로 내가 뭔가를 같이 가지고해야

src := ''; 
for iindex := 0 to 255 do 
    begin 
    src := src + char(byte(iindex)); 
    writeln (iindex:5, byte(src[iindex]):5); 
    end; 

:

iIndex byte(src[iIndex]) 
0   0 
1   1 
2   2 
3   3 
.................. 
254  254 
255  255 

그래서 델파이 xe까지 모든 버전의 델피에서도 마찬가지였습니다. 내가 물어 문자열의 다른 유형을 사용할 필요가 이제

iIndex byte(src[iIndex]) 
0   0 
1   0 
2   1 
3   2 
.................. 
254  253 
255  254 

: 이제 델파이 XE2로, 나는이 출력이? 물론 바이트 (src [succ (iindex)])에 바이트 (src [iindex]) 업데이트하지만 그것을 해결하기위한 해결 방법을 찾았지만 iIndex = 255 일 때, 나는 예외 (src [256])를 가지고있다. 따라서 단어를 바꿔야합니다. 물론, 나는 이것이 최상의 해결책이라고 생각하지 않습니다. 그래서 더 좋은 해결책이 있는지 물어볼 것입니다. 대단히 감사합니다.

Answer 1

범위를 벗어나는 문자열에 액세스하고 있습니다. 문자열 액세스는 Delphi에서 1 기반입니다. 범위 검사 오류가 발생해야합니다. 또한 캐스트 대신 chr() 및 ord()을 사용하는 것이 더 좋습니다.

src := ''; 
for iindex := 0 to 255 do 
begin 
    src := src + chr(iindex); 
    writeln (iindex:5, ord(src[iindex+1]):5); 
end; 

이 코드는 이전 버전의 Delphi에서 작동하지 않을 수 있습니다. 실제로 델파이 2010은 범위 검사가 비활성화되면 XE2가 동작하는 것처럼 정확하게 동작합니다. 이것은 범위 검사가 왜 중요한지에 대한 또 다른 예입니다.