Q&A

  • 패널을 마우스가 올라가면 나타나는방법좀.
안녕하세요.^^
저기 폼에 패널을 1개를 넣고 그 패널안에 패널 한개를 더 넣어서
폼을 시작하면 패널안에 넣은 패널은 보이지 않게 했다가
마우스가 숨은 패널로 옴기면은 숨은 패널이 나타나게 하고 싶거든요.
그런대 무조건 마우스가 올릴때 마다 나타나는것이 아니고
폼이 최대화되었을때만 실행하게 할려면 어떻게 하면 돼나요??
1  COMMENTS
  • Profile
    최용일 2002.04.18 18:20
    안녕하세요. 최용일입니다.

    WindowState가 wsMaximized인가를 판단하시면 되겠네요...

    procedure TForm1.Panel1MouseMove(Sender: TObject; Shift: TShiftState; X, Y: Integer);
    begin
        if WindowState = wsMaximized then
            if 마우스좌표가숨은판넬위 then
                숨은판넬.Visible := True;
    end;

    ^^ 항상 즐코하세요...