Q&A

  • 게이지 만들려구 하거덩여 이거 쓰는법좀 갈켜 주세요//
움..셈플에 있는 게이지 어케 쓰는거에여??

아무리 책 차자바두 엄네영...

1  COMMENTS
  • Profile
    quick21 2000.08.11 18:54
    왕왕초도 델피언 wrote:

    > 움..셈플에 있는 게이지 어케 쓰는거에여??

    > 아무리 책 차자바두 엄네영...



    먼저 간단한 소스로 설명할께요..



    procedure TForm1.Button1Click(Sender: TObject);

    var i : integer;

    begin

    with Gauge1 do

    begin

    Maxvalue := 100;

    progress := 0;

    for i := 1 to 100 do

    begin

    progress := progress + 1;

    end;

    end;

    end;



    위에서 보듯이 먼저 MaxValue값은 말그대로 최대값 즉 gauge의 전체값을 잡는 겁니다.

    그리고 progress는 단계로별로 gauge 가 증가하는 값입니다.



    만약 DB table를 가지고 한다면

    Maxvalue := table1.RecordCount로 잡으시면 됩니다.(참조: RecordCount는 table1의 레코드 총 갯수)



    도움이 되셨나 모르겠네요..

    그럼 즐거운 델나라가 되시길.....