Q&A

  • 상태바에 프로그래스바를 출력하고싶습니다.
프로그레스바와 상태바를 각각 컨드롤 할 수는 있겠는데,
상태바에 프로그래스 바를 포함할려면 어떻게 해야 하나요?
아래 게시물을 읽어 보았는데,

ProgressBar1.Parent:=StatusBar1;

로 정의하면 가능하다고 하는데, 전 아무런 변화가 없네요.

제가 작성한 예제는 아래와 같습니다. 어디를 고쳐야하는지 알려주시면 감사하겠습니다.

procedure TForm1.Timer1Timer(Sender: TObject);
begin
    Form1.ProgressBar1.Parent:=Form1.StatusBar1;
    Form1.ProgressBar1.Position := Form1.ProgressBar1.Position + Form1.ProgressBar1.Step;
end


이 게시물을
2  COMMENTS
  • Profile
    홍성락 • 2002.09.12 19:31
    hsr/////////////////////////////////////////////////////////////////
    적용은 된겁니다, 다만 위치가 폼에있을때를 유지하므로 화면에 안보이는겁니다. 아래는 상태바2번째(StatusBar1.Panels[1])에 위치 시키려고 조금식 수식을 준겁니다, TRect을 구해야 편한데 없는듯하네요.
    수치는 조정해보세요.

        ProgressBar1.Parent := StatusBar1;
        ProgressBar1.Top := 2;
        ProgressBar1.Height := StatusBar1.Height-2;
        ProgressBar1.Left := StatusBar1.Panels[0].Width+5;
        ProgressBar1.Width := StatusBar1.Width - (StatusBar1.Panels[0].Width)-10;
  • Profile
    이정용 • 2002.09.12 19:45
    알려주신데로 다시 작성하니 잘되네요! 정말 신기합니다 *^^*
    이거 해결할려구 3일동안 고심했었는데, 일찍 물어볼걸 괜히 시간 낭비했나봅니다. 알려주셔서 다시한번 감사 드립니다.
←First Page
883 884 885 886 887 888 889 890 891 892
Last Page→
한델 로그인 하기