if Sender is TComponent then
begin
(Sender as Tcomponent).Name; // 콤포넌트 이름
(Sender as Tcomponent).Owner.Name; // 오너 이름
(Sender as Tcomponent).ComponentIndex; // 콤포넌트 인덱스
end;
procedure TForm2.CheckBox7Click(Sender: TObject); begin end; 위에서 Sender의 Name과 Sender의 부모객체, 그 부모객체에서 Sender가 몇 번째 콘트롤인지 알아내는 방법을 가르쳐 주세요. 초보라 잘 모르니 소스와 함께 자세한 설명을 ...
하얀까마귀
•
2003.02.25 03:36
안녕하세요 하얀까마귀 입니다.
SEnder 은 TComponent로 변환이 가능합니다.
if Sender is...
SEnder 은 TComponent로 변환이 가능합니다.
if Sender is TComponent then
begin
(Sender as Tcomponent).Name; // 콤포넌트 이름
(Sender as Tcomponent).Owner.Name; // 오너 이름
(Sender as Tcomponent).ComponentIndex; // 콤포넌트 인덱스
end;
우선 Tcomponent로 변환하셔서 하시면 되겠네요.
그럼 즐거운시간 되세요..