Q&A

  • 스트링그리드에 천단위 표시를 추가하는법?
출력폼에서 stringgrid와 edit1에 천단위 표시를 할려고 합니다.





도움말을 보고 두번째행을 이렇게(cells[0, i_row]:= format('%.0n', (out_data[i].out2));



바꿔보았는데 형식변환에러가 발생합니다.



어떻게 해야하는지 설명좀 부탁드릴께요...





i_row := 1;



for i:=1 to COUNT do

begin

if out_data[i].out2<> 0 then

begin

with stringgrid1 do

begin

cells[0, i_row] := out_data[i].out1;

cells[1, i_row] := inttostr(out_data[i].out2);

cells[2, i_row] := inttostr(out_data[i].out3);

cells[3, i_row] := inttostr(out_data[i].out4);

cells[4, i_row] := out_data[i].out5;

end;

i_row := i_row+1;

end;

end;

1  COMMENTS
  • Profile
    장명선 2001.04.21 04:18
    FormatCurr('#,0', 10000);

    도움말에 보면 잘 나와있습니다...







    이금선 wrote:

    > 출력폼에서 stringgrid와 edit1에 천단위 표시를 할려고 합니다.

    >

    >

    > 도움말을 보고 두번째행을 이렇게(cells[0, i_row]:= format('%.0n', (out_data[i].out2));

    >

    > 바꿔보았는데 형식변환에러가 발생합니다.

    >

    > 어떻게 해야하는지 설명좀 부탁드릴께요...

    >

    >

    > i_row := 1;

    >

    > for i:=1 to COUNT do

    > begin

    > if out_data[i].out2<> 0 then

    > begin

    > with stringgrid1 do

    > begin

    > cells[0, i_row] := out_data[i].out1;

    > cells[1, i_row] := inttostr(out_data[i].out2);

    > cells[2, i_row] := inttostr(out_data[i].out3);

    > cells[3, i_row] := inttostr(out_data[i].out4);

    > cells[4, i_row] := out_data[i].out5;

    > end;

    > i_row := i_row+1;

    > end;

    > end;