Q&A

  • 숫자를 텍스트화일로 생성시...
제가 하려고 하는 프로그램은 db내용을
특정포맷으로 text화일을 생성하는 프로그램입니다.
그런데 숫자를 자릿수에 맞추어 변환을 하면 - 값때문에 잘안됩니다.
예를 들어 -123이란 값이 있는데 14자리로 맞추어 변환하여야 합니다.
그래서 저는 formatfloat('00000000000000', -123) 이라고 코딩을 했습니다.

그런데 양수값일때는 문제가 없는데 음수일때는 - 기호가 1자릴를 더 차지하여
자릿수가 총15자리로 변환됩니다.

123 ==> 00000000000123
-123 ==> -00000000000123
위 처럼 변환이 됩니다.
14자리중 유효값을 제외한 자리는 반드시 0로 채워야 합니다.
위의
-123 ==> -00000000000123 이 아니라
-123 ==> -0000000000123   이 되도록 하고 싶습니다.
즉 -를 포함해 14자리가 되어댜 한다는 얘기죠.
또한가지 - 기호가 맨처음에 나타나야 합니다.

방법좀 알켜주세요.

이 게시물을
1  COMMENTS
  • Profile
    이광철 • 2003.07.06 05:32


    간단하게 funtion을 만드시죠..

    function Convert(Num: Extended) : string;
    var
      S: string;

    begin
      S := FormatFloat('00000000000000', abs(Num));
      if Num < 0 then
        S[1] := '-';

      result := S;
    end;
←First Page
614 615 616 617 618 619 620 621 622 623
Last Page→
한델 로그인 하기