Q&A

  • Format 에 관한 초보적인 질문 입니다.
1)

aaa := 100;

Edit1.Text := format('%0.10d',[aaa]);



2)

aaa := -100;

Edit1.Text := format('%0.10d',[aaa]);



위와 같이 코딩하면 1)의 경우 '0000000100' 2)의 경우 '-0000000100' 이 Assign 되던데



제가 원하는건 1)의 경우 '0000000100' 2)의 경우 '-000000100' 이 Assign 도기를 원합니다.



그러니깐 양수이면 그냥 10자리 음수이면 부호를 포함해 10 자리가 되기를 원합니다



한 수 부탁드립니다. 꾸벅 ^.^

이 게시물을
1  COMMENTS
  • Profile
    하기 • 2001.06.07 21:02
    간단하게 한번만 Check하면 되지 않을까요?

    if aaa >= 0 then Edit1.Text := format('%0.10d',[aaa])

    else Edit1.Text := format('%0.9d',[aaa]);

    이렇게요 ... ^^;





    미지수 wrote:

    > 1)

    > aaa := 100;

    > Edit1.Text := format('%0.10d',[aaa]);

    >

    > 2)

    > aaa := -100;

    > Edit1.Text := format('%0.10d',[aaa]);

    >

    > 위와 같이 코딩하면 1)의 경우 '0000000100' 2)의 경우 '-0000000100' 이 Assign 되던데

    >

    > 제가 원하는건 1)의 경우 '0000000100' 2)의 경우 '-000000100' 이 Assign 도기를 원합니다.

    >

    > 그러니깐 양수이면 그냥 10자리 음수이면 부호를 포함해 10 자리가 되기를 원합니다

    >

    > 한 수 부탁드립니다. 꾸벅 ^.^
←First Page
1743 1744 1745 1746 1747 1748 1749 1750 1751 1752
Last Page→
한델 로그인 하기