지금 코드가 맞아요.... 다른 방법도 있긴하지만...

지금도 잘되는 코드입니닷..







델이랑파이랑 wrote:

> 좋은 아침입니다..

> messagebox 에서 combobox아이템으로 부터 9 이하의 값을 받았을때--(초기의 콤보박스의 텍스트에는 10월이상의 값을 띄워줌) 메시지 박스를 띄우고 이 메시지 박스에서 ok버튼을 누르면 9 이하의 잘못선택된 값이 그대로 남아 있게됩니다..

> 제가 의도하는 것은 메시지 박스의 ok버튼을 누르면 잘못선택된(9 이하의) 값이 콤보박스 텍스트에 남아있는게 아니라 오류값선택이전의 값으로(즉10월이상의 값)하고자 합니다..

> 메시지 박스의 ok버튼에 관한 이벤트에다 최초의 정상적인 값(10월 이상)을 환원시키면 될 것 같은데 이 이벤트가 어떻게 발생하는지 잘 모르겠군요..고수님들 좀 가르쳐주세요..

> 아래는 소스입니다..

>

> mmstr:=mmcombo.text;//mmstr는 전역변수로 mmcombo클릭시 미리 넣어둠(10월이상)

>

> procedure TForm1.mmcomboChange(Sender: TObject);

> var

> mmint:integer;

> begin

> mmint:=strtoint(mmcombo.text);

> if mmint <10 then

> begin

> Application.Messagebox('10월 이상 선택가능합니다!','월선택 Error!',MB_OK);

> mmcombo.text:=mmstr;//mmcombo클릭시 미리 얻어놓은 값(10월이상일때)

> end;

> end;

>

>

>

>