Q&A

  • QReport에서 숫 자를 '0/0'-->' / ' 형태로 출력하고 싶어요
QReport에서 숫 자를 '1/1' 형태로 출력하고 싶어요

그런데 값이 zero일때는 '0/0'이 되버리거든요 이것을 ' / '처럼 처리할려면

어떻게 합니까?



qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);



많이 많이 봐 주십시요.답변도...

감사...감사...



3  COMMENTS
  • Profile
    티오브이 2001.02.15 05:56
    장우석 wrote:

    > QReport에서 숫 자를 '1/1' 형태로 출력하고 싶어요

    > 그런데 값이 zero일때는 '0/0'이 되버리거든요 이것을 ' / '처럼 처리할려면

    > 어떻게 합니까?

    >

    > qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);

    >

    > 많이 많이 봐 주십시요.답변도...

    > 감사...감사...

    >

    간단하게 이렇게 하면 어떨까요...

    if ( InChk[1] = 0 or OutChk[1] = 0 ) then qrLabel26.Caption := ' / '

    else qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);



    두개가 동시에 만족한다면 or ===> and 로 바꿔주면 되겠죠...



  • Profile
    장우석 2001.02.15 06:08
    티오브이 wrote:

    > 장우석 wrote:

    > > QReport에서 숫 자를 '1/1' 형태로 출력하고 싶어요

    > > 그런데 값이 zero일때는 '0/0'이 되버리거든요 이것을 ' / '처럼 처리할려면

    > > 어떻게 합니까?

    > >

    > > qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);

    > >

    > > 많이 많이 봐 주십시요.답변도...

    > > 감사...감사...

    > >

    > 간단하게 이렇게 하면 어떨까요...

    > if ( InChk[1] = 0 or OutChk[1] = 0 ) then qrLabel26.Caption := ' / '

    > else qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);

    >

    > 두개가 동시에 만족한다면 or ===> and 로 바꿔주면 되겠죠...

    >

    답변 감사 감사..

    그렇게하면 좋은줄알죠.

    qrLabel.Caption이 100여개 되는데 지금처럼표시할려면 200줄 ㅋㅋㅋ

    정말 소스 늘어져서요... 혹시 좋은 함수 있으신분 부탁합니다...





  • Profile
    김유중 2001.02.15 08:15
    쩝. 간단하지 않나요?

    그냥 함수로 만들어 사용하세요.



    장우석 wrote:

    > 티오브이 wrote:

    > > 장우석 wrote:

    > > > QReport에서 숫 자를 '1/1' 형태로 출력하고 싶어요

    > > > 그런데 값이 zero일때는 '0/0'이 되버리거든요 이것을 ' / '처럼 처리할려면

    > > > 어떻게 합니까?

    > > >

    > > > qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);

    > > >

    > > > 많이 많이 봐 주십시요.답변도...

    > > > 감사...감사...

    > > >

    > > 간단하게 이렇게 하면 어떨까요...

    > > if ( InChk[1] = 0 or OutChk[1] = 0 ) then qrLabel26.Caption := ' / '

    > > else qrLabel26.Caption := IntToStr(InChk[1]) + '/' + IntToStr(OutChk[1]);

    > >

    > > 두개가 동시에 만족한다면 or ===> and 로 바꿔주면 되겠죠...

    > >

    > 답변 감사 감사..

    > 그렇게하면 좋은줄알죠.

    > qrLabel.Caption이 100여개 되는데 지금처럼표시할려면 200줄 ㅋㅋㅋ

    > 정말 소스 늘어져서요... 혹시 좋은 함수 있으신분 부탁합니다...

    >

    >