Delphi에서 is 연산자는 동적으로 객체의 타입검사를 수행하는 연산자입니다.

if ( object is Class )  코드에서

object 가 Class의 인스턴스 이거나 상속을 받은경우 true   아닌경우 false를 return 합니다.


c++ Builder에서 is 연산자는 존재하지 않구요

TObject 클래스에 비슷한 메소드가 있습니다.

InheritsFrom 이라는 함수입니다.
대충 다음과 같은 식으로 사용하시면 됩니다.

void __fastcall TForm3::Button1Click(TObject *Sender)
{
	if( Sender->InheritsFrom(__classid(TCustomForm) ))
	{
		ShowMessage("Sender is Form");
	}
	else if( Sender->InheritsFrom(__classid(TCustomButton) ))
	{
		ShowMessage("Sender is Button");
	}

}

// 조상을 제외한 정확히 특정 클래스인지 확인은 문자열로 다음과 같이 확인하실수 있습니다.

void __fastcall TForm3::Button1Click(TObject *Sender)
{
        
	if( Sender->ClassNameIs("TForm3") )
	{
		ShowMessage("Sender is Form3");
	}
	else if( Sender->ClassNameIs("TButton") )
	{
		ShowMessage("Sender is Button");
	}
}

기타  TObject 클래스에는
ClassName / ClassType등을 가져오는 함수나 프로퍼티가 있습니다.


참조하세요

그럼..


최원용 님이 쓰신 글 :
: Class1 은 class 입니다.
:
: B 는 Component 함수의 인자 입니다.
:
: procedure Component(B : Class2);
:
: begin
: if Class1(B.C.Items[iObj]) is Class3 then
: .
: .
: .
: end
:
: 이런 식으로 class를 사용하였는데요 if절 쪽
:
:
: Class1에의 의미를 잘모르겠습니다..
:
:
: is 연산자쪽에서는 Class1 과 Class3쪽 어느 부분을 비교하는 것인지 이해가 잘 되지않습니다..
:
:
: 고수님들의 많은 조언 부탁드립니다..