Q&A

  • button1을 클릭했을때와..button2 를 클릭했을때를 표현하려고 합니다
폼에 button1,과 button2 가 있는데..
button1을 클릭했을때와..button2 를 클릭했을때를 표현하려고 합니다..

if (button1을 클릭했을때 ) then
begin
  QLbl_item.Caption    := 11;
  QLbl_size.Caption    := 22;
end
else if (button2를 클릭했을때 ) then
begin
  QLbl_item.Caption    := aa;
  QLbl_size.Caption    := dd;
end;

(button1을 클릭했을때 )    <--
(button2을 클릭했을때 )    <-- 이걸 어떻해 표현해야 하나요..
워낙 한심스런 질문이지만..꼬옥 답해 주세요...ㅠ.ㅠ
3  COMMENTS
  • Profile
    무식 2003.03.06 04:05
    냉무에요..
  • Profile
    구창민 2003.03.06 02:52
    Button1 의 이벤트를 이렇게 쓰시고,

    Button2 의 이벤트를 Button1 의 이벤트와 연결하세여..

      if Sender is TButton then
      begin
        if (Sender as TButton).Name = 'Button1' then
        begin
          QLbl_item.Caption    := 11;
          QLbl_size.Caption    := 22;
        end;
        if (Sender as TButton).Name = 'Button2' then
        begin
          QLbl_item.Caption    := aa;
          QLbl_size.Caption    := dd;
        end;
      end;


  • Profile
    정성훈 2003.03.06 02:29
    Sender 사용하면 쉬운데 기억이 안나네요 쩝
    Sender 기억나는분 리플좀 달아주세요.
    버튼1 클릭때 Boolean 변수에 True 주구요
    버튼2 클릭때 Boolean 변수에 False 줘서요

    if Boolean변수 then
    begin
      QLbl_item.Caption    := 11;
      QLbl_size.Caption    := 22;
    end else begin
      QLbl_item.Caption    := aa;
      QLbl_size.Caption    := bb;
    end;