Q&A

  • 콤보박스에 힌트보이기..
콤보박스 Item에
A
B
C
D...
이렇게 세팅하고 콤보박스의 크기를 대문자 하나 크기만큼으로 조정 했습니다
이런 상황에서 콤보박스가 펼쳐질때 또는 마우스가 콤보박스의 Text위로 갔을때
힌트를 보여줄 수 있을까요?
만약 A라면 힌트에 'A: 비옵니다'
       B                 'B: 막옵니다'
       C                 'C: 퍼붑니다'
이런 식으로 힌트를 보여 주고 싶은데 무신 방법이 있을까요?
감사합니다.
1  COMMENTS
  • Profile
    김종화 2002.08.15 06:35

    우선 콤보박스의 ShowHint 속성을 true 로 하시고

    procedure TForm1.ComboBox1Change(Sender: TObject);
    begin
         case ComboBox1.ItemIndex of
              0 :
                  ComboBox1.Hint := ComboBox1.Items[ComboBox1.ItemIndex] + ': 비옵니다';
              1 :
                  ComboBox1.Hint := ComboBox1.Items[ComboBox1.ItemIndex] + ': 막옵니다';
              2 :
                  ComboBox1.Hint := ComboBox1.Items[ComboBox1.ItemIndex] + ': 퍼붑니다';
         end;
    end;

    이런식으로 하시면 되겠네요..^^;;