Q&A

  • 조건 처리는 ?_? ~~


버튼 1,2,3 ... 10 가 있다구 치구...



하나의 procedure 에서 처리를 하려구 하는데....



버튼 1 이 눌렸는지 버튼 2 가 눌렸는지.. 아님.. 버튼 10 이 눌렸는지 ....



반응을 나타내려구 합니다....





procedure TForm1.BtnClick(Sender: TObject);

begin



여기서 어떻게 해야? 무슨버튼을 눌렸는지 체크할수 있을까요?



end;





조건 처리를 어떻게 해야 하나요?



고수님의 답변 기다립니다....



ㅠ.ㅠ









2  COMMENTS
  • Profile
    최석기 2000.09.20 19:32
    안녕하세요.

    델파이세상(http://www.freechal.com/delphiworld)에 최석기입니다.



    뭐 방법은 여러가지가 있습니다..



    제 생각에는 Tag라는 프로퍼티를 이용하는 방법이 젤 쉬울꺼 같네요..



    각 버튼마다 Tag라는 프로퍼티에 일련에 구분되는 숫자를 주세요..



    Button1.Tag := 1;

    Button2.Tag := 2;

    Button3.Tag := 3;

    ..

    ..

    ..



    procedure TForm1.Button1Click(Sender: TObject);

    begin

    case TButton(Sender).Tag of

    1: ;//버튼1에 코딩

    2: ;//버튼2에 코딩

    3: ;//버튼3에 코딩

    end;

    end;



    이런 식으로 처리하시면 될꺼예요..



    웹페이지 wrote:

    >

    > 버튼 1,2,3 ... 10 가 있다구 치구...

    >

    > 하나의 procedure 에서 처리를 하려구 하는데....

    >

    > 버튼 1 이 눌렸는지 버튼 2 가 눌렸는지.. 아님.. 버튼 10 이 눌렸는지 ....

    >

    > 반응을 나타내려구 합니다....

    >

    >

    > procedure TForm1.BtnClick(Sender: TObject);

    > begin

    >

    > 여기서 어떻게 해야? 무슨버튼을 눌렸는지 체크할수 있을까요?

    >

    > end;

    >

    >

    > 조건 처리를 어떻게 해야 하나요?

    >

    > 고수님의 답변 기다립니다....

    >

    > ㅠ.ㅠ

    >

    >

    >

    >

  • Profile
    강인규 2000.09.20 19:28
    일단 버튼클릭이벤트를 하나 만들구.....



    showmessage((sender as Tbutton).Caption);



    이루케 코딩합니다.



    그리구 나머지 버튼을 선택해서 그 이벤트를 연결해줍니다.



    즐프하세여~~ ^-^



    웹페이지 wrote:

    >

    > 버튼 1,2,3 ... 10 가 있다구 치구...

    >

    > 하나의 procedure 에서 처리를 하려구 하는데....

    >

    > 버튼 1 이 눌렸는지 버튼 2 가 눌렸는지.. 아님.. 버튼 10 이 눌렸는지 ....

    >

    > 반응을 나타내려구 합니다....

    >

    >

    > procedure TForm1.BtnClick(Sender: TObject);

    > begin

    >

    > 여기서 어떻게 해야? 무슨버튼을 눌렸는지 체크할수 있을까요?

    >

    > end;

    >

    >

    > 조건 처리를 어떻게 해야 하나요?

    >

    > 고수님의 답변 기다립니다....

    >

    > ㅠ.ㅠ

    >

    >

    >

    >