사용자 정의 구성 요소가 생성되었는지 어떻게 알 수 있습니까?

Question

은이 코드를 사용하여 절차 내에서 메모를 작성 : 다시 프로 시저를 호출 할 때

Global_MemoIni := TMemo.Create(Conf); 
    Global_MemoIni.Parent := Conf; 
    Global_MemoIni.Visible := False; 
    Global_MemoIni.Align := alClient; 
    Global_MemoIni.WordWrap := False; 

가 다시 global_memoini을 만듭니다.
구성 요소가 만들어져 다시 호출 할 필요가없는 것을 어떻게 알 수 있습니까?

업데이트 :

감사합니다 ... 내가 그래서 다음 번에 한 번 Global_memoini을 만들 Global_MemoIni.Free 생성 코드 위에 사용 ...하지만 난이가 만들어 알고 싶어 할 수

Answer 1

당신에게 Global_MemoIni가 Nil인지 확인하고 TMemo를 작성하십시오. 그렇지 않으면 이미 존재하므로 Free 또는 FreeAndNil을 사용하여 해제 할 수 있습니다. 무료로 사용하는 경우 Nil을 Global_MemoIni으로 지정하십시오. 그렇지 않은 경우 Global_MemoIni <> Nil 수표를 사용할 수 없습니다.

Answer 2

나는 더 가벼운 TStringList 대신에 메모를 사용하는 것에 대해 솔직히 이해하지 못합니다.

if not Assigned(Global_MemoIni) then 
begin 
    Global_MemoIni := TMemo.Create(Conf); 
    ... 
end 

그리고 오브젝트를 파괴 할 때 FreeAndNil(Global_MemoIni)를 사용하는 것을 잊지 마세요 : 당신이 객체 사용의 생성 상태를 모르는 경우 단지

unit UnitName; 

interface 

uses SysUtils, Windows, Classes, ...; 

var Global_INI: TStringList; // <-- it's defined in the interface section, therefore 
          //  it can be accessed by any unit which uses this unit 

implementation 

initialization 
    Global_INI := TStringList.Create; 
    Global_INI.LoadFromFile('C:\config.ini'); // <-- replace the file name with the 
               //  one you want 

finalization 
    FreeAndNil(Global_INI); 

end; 

Answer 3

을한다.

Answer 4

임의의 기능이 아닙니다. 어느 형태의 FormCreate에서 구성 요소 또는 생성자를 만들거나 그것을 형태의 읽기 전용 속성을 확인하고 게으른 인스턴스를 사용, 즉

if not Assigned(Global_MemoIni) then 
begin 
    Global_MemoIni := TMemo.Create(Self); 
    // rest of your code 
end; 
Result := Global_MemoIni; 

을하지만, 왜 세계인가? 양식의 필드 및 해당 읽기 전용 속성을 만들면 쉽게 액세스 할 수 있으며 위에 표시된 방법으로 보호 할 수 있습니다.

FWIW, 구성 요소를 해제하는 대신 Owner (양식)로 보냅니다. 그렇게하면 양식이 존재하는 한 사용할 수 있으며 불쾌한 잘못된 포인터 문제는 발생할 수 없습니다.