Q&A

  • 버튼 제어 방법좀 갈켜주세요?
화면에 여러개의 Command Button이 있을경우입니다.
예를 들어 등록, 수정, 삭제, 저장, 취소버튼이 있습니다.
이 버튼들을 Lock the Control 하고 싶습니다.
등록을 Onclick 하면 등록과 수정과 삭제버튼은 비활성화되고,
저장과 취소버튼만 활성화 하고 싶습니다.
방법을 모르겠습니다...
아시는분덜 설명 좀 해주세요...초보라 간단한 소스가 있으면
더욱 좋구요..^^
답변 부탁드립니다.
  
이 게시물을
3  COMMENTS
  • Profile
    김수경 • 2002.10.11 22:36
    특별히 다른 방법은 없습니다.
    OnClick Event에서 각각의 Button을 Enable 또는 Disable해햐 합니다.

    즉,

    On등록Click Event에서

      등록.Enabled := false;
      수정.Enabled := false;

      처리

      등록.Enabled := true;
      수정.Enabled := true;

    이런 식으로요.
    물론 다른 Button에서도 마찬가지로처리해 주셔야 하구여~




  • Profile
    김해우 • 2002.10.11 21:53
    간다하게 사용하는 방법은 Button1.enabled := True 또는 False하는 방식이구요..

    procedure TForm1.SetBtnEnable;
    begin
      button1.Enabled := Table1.State in [dsBrowse]; //저장시
      Button2.Edabled := Table1.State in [dsEdit, dsInsert]; //수정 , 추가시
    end;

    ..
    ...
    procedure TFrom1.Button1click(Sender: TObject);
    begin
        Table1.Insert
        SetBtnEnable;
    end;

    ..

    이런 식으로 사용하시면 되는데..

    그럼 이만
  • Profile
    정성훈 • 2002.10.11 21:46
    //등록,수정버튼 클릭시, 수정(등록),삭제,종료 비활성화.
    procedure TForm1.button1.Click( Sender );
    begin
       Button_Enable( False );
    end;

    //저장버튼 클릭시, 등록,수정,삭제,종료 활성화.
    procedure TForm1.button2.Click( Sender );
    begin
       Button_Enable( True );
    end;

    procedure TForm1.button_Enable( bEnable : Boolean );
    begin
       등록버튼.Enable := bEnable;
       수정버튼.Enable := bEnable;
       저장버튼.Enable := not bEnable;
       취소버튼.Enable := not bEnable;
       종료버튼.Enable := bEnable;
    end;
←First Page
851 852 853 854 855 856 857 858 859 860
Last Page→
한델 로그인 하기
서버에 요청 중입니다. 잠시만 기다려 주십시오...