Delphi 문자열 복사본을 만들기 전에 메모리를 할당해야합니까?

Question

Delphi 문자열 복사본을 수행 할 때 메모리를 할당해야합니까?

Windows 메시지를 내 응용 프로그램의 다른 양식에 게시하는 기능이 있습니다.

// Note: PThreadMessage = ^TThreadMessage; TThreadMessage = String; 

function PostMyMessage(aStr : string); 
var 
    gMsgPtr : PThreadMessage; 
    gStrLen : Integer; 
begin 
    New(gMsgPtr); 
    gStrLen := StrLen(PWideChar(aMsg)); 
    gMsgPtr^ := Copy(aMsg, 0, gStrLen); 
    PostMessage(ParentHandle, WM_LOGFILE, aLevel, Integer(gMsgPtr)); 

    // Prevent Delphi from freeing this memory before consumed. 
    LParam(gMsgPtr) := 0; 
end; 

Answer 1

문자열을 복사하기 위해 메모리를 할당 할 필요는 없지만이 상황에서는 포인터를 Delphi 문자열에 전달하고 싶지는 않습니다. PChar (일명 C 문자열)를 전달하려고하고 을 수행하려면에 메모리를 할당해야합니다.

Answer 2

메모리를 할당 할 필요가 없습니다. 실제로 Copy에 전화 할 필요조차 없습니다. 간단한 문자열 할당이면 충분합니다. 참조 카운트는 여러 스레드를 포함하여 정확하게 추적됩니다. gMsgPtr을 삭제할 필요도 없습니다. 이 변수는 string 유형의 변수가 아니기 때문에 컴파일러는이를위한 정리 코드를 삽입하지 않습니다. 어쨌든 Copy를 호출 할 경우

begin 
    New(gMsgPtr); 
    gMsgPtr^ := aMsg; 
    PostMessage(ParentHandle, wm_LogFile, aLevel, LParam(gMsgPtr)); 
end; 

는 먼저 길이를 계산 할 필요가 없습니다. 인덱스 매개 변수가 허용되는 최대 범위까지 자동으로 고정됩니다. "문자열의 나머지 부분"을 묻고 싶으면 MaxInt을 세 번째 매개 변수로 전달하고 Copy은 무엇을 해야할지 알 수 있습니다. 마찬가지로 두 번째 매개 변수에 대해 자동으로 모든 값을 최소 유효 문자 인덱스 인 1 이상으로 늘립니다.