안녕하세요
수고 많습니다.
AdvSringGrid에서 숫자에 콤마 3자리 (1,000,000) 또는 (1,000,000.00) 만 나타내면 주문에 대한 화면의의 작업은 마무리 됩니다.
Help/Demo을 보니 onGetFormat을 사용을 하면 해결이 된다고 했는데
해보니까 잘되지가 않네요
이것을 해결하려면 다른 이벤트나 속성 메서드를 사용해야하는지 알고싶습니다. 다른 방법이 없으면 FormatFloat(' ', str)을 사용해볼까 합니다.
무엇인가 있을것 같은데 ......
여러분의 도움으로 AdvStringGrid에 대한 것을 많은것을 배웠습니다.
그럼 수고 하세요
procedure TFIn.adv1GetFloatFormat(Sender: TObject; ACol,
ARow: Integer; var IsFloat: Boolean; var FloatFormat: String);
begin
Case ACol of //소수점 자리를 안나타나게
7..9,11,22:begin
if isFloat = True then
begin
FloatFormat :='%.0f';
end;
end;
12..14,17,21,23,26,27:begin //소수점 2자리 나타나게
if isFloat = True then
begin
FloatFormat :='%.2f';
end;
end;
end;
end;
procedure TFIn.adv1GetFormat(Sender: TObject; ACol: Integer;
var AStyle: TSortStyle; var aPrefix, aSuffix: String);
begin
Case ACol of
12,13,14,17:begin //이렇게 하면 코마가 나타난다고 되어있는데...
AStyle:=ssNumeric;
end;
end;
end;