Addr 함수 - 객체 가져오기 포인터



procedure TForm1.FormCreate(Sender: TObject);

var

  Str: string;

  pStr: PString;

begin

  Str := 'Delphi 2007';

  pStr := @Str;       {  @     }

  ShowMessage(pStr^); {Delphi 2007}



  Str := 'Delphi 2008';

  pStr := Addr(Str);  {Addr   @        ,       }

  ShowMessage(pStr^); {Delphi 2008}





  {   Form1    }

  ShowMessage(IntToStr(Integer(@Self)));          {1244648;      }

  ShowMessage(IntToStr(Integer(Addr(Self))));     {1244648}



  {   Form1   FormCreate      }

  ShowMessage(IntToStr(Integer(@OnCreate)));      {4570956}

  ShowMessage(IntToStr(Integer(Addr(OnCreate)))); {4570956}



  {

                     ,   @      ;

           Addr,           ,        ...

  }

end;

이 내용에 흥미가 있습니까?

현재 기사가 여러분의 문제를 해결하지 못하는 경우 AI 엔진은 머신러닝 분석(스마트 모델이 방금 만들어져 부정확한 경우가 있을 수 있음)을 통해 가장 유사한 기사를 추천합니다:

git 기초 with CLI

git 초기화 git 사용자 정보 설정 여기서 —global 설정이 붙기때문에 이전에 설정을 한 적이 있다면 새로운 폴더에도 적용되기 때문에 하지않아도 된다. git에 저장할 파일 추가(add) git에 저장된 파일...

텍스트를 자유롭게 공유하거나 복사할 수 있습니다.하지만 이 문서의 URL은 참조 URL로 남겨 두십시오.

CC BY-SA 2.5, CC BY-SA 3.0 및 CC BY-SA 4.0에 따라 라이센스가 부여됩니다.

Addr 함수 - 객체 가져오기 포인터

좋은 웹페이지 즐겨찾기