Q&A

  • 포커스된 컨트롤 종류알아내기..
폼핸들을 알고.....그중 포커스 들어간컴퍼넌트가 어떤 컴퍼넌트인지

종류를 알수 있는 방법이 없을까요???



포커스된 컴퍼넌트가 Edit 다, ComboBox 라든지 알수 있는 방법요..



그럼..



1  COMMENTS
  • Profile
    한하눌 2000.10.18 19:58
    초보맨 wrote:

    > 폼핸들을 알고.....그중 포커스 들어간컴퍼넌트가 어떤 컴퍼넌트인지

    > 종류를 알수 있는 방법이 없을까요???

    >

    > 포커스된 컴퍼넌트가 Edit 다, ComboBox 라든지 알수 있는 방법요..

    >

    > 그럼..

    >

    폼의 keypreview를 true로 하시고

    폼의 onkeydown에

    procedure TForm1.FormKeyDown(Sender: TObject; var Key: Word;

    Shift: TShiftState);

    begin

    if key = vk_return then

    showmessage(self.ActiveControl.name)

    end;



    컴퍼넌트의 이름을 가지고 알아내실수도 있지 않을까요 ?

    편법으로 cmbGubun 이라고 컴종류를 이름앞에 사용할경우

    if copy(self.activecontrol.name,1,3) = 'cmb' then

    showmessage('콤보입니다');

    너무 엽기적인가요?