Q&A

  • dbgrid에서 금액을 수정할때마다 총계 계산하려면....
dbgrid에서 금액부분을 수정할때마다 edit박스의 총계금액을 계산하려고 하는데



어떤 이벤트에 어떻게 코딩해야 하는지 조언을 부탁드립니다...



for loop문을 이용하면 될것 같은데 쉽지 않네요...

3  COMMENTS
  • Profile
    빅용철 2001.11.13 02:43
    OnClacFields 이벤트를 사용하세요.



    먼저, Field를 추가하시고(Fields Editordptj Claculated로), OnClacFields 이벤트에서

    해당 Field의 계산을 하세요.





    초보자 wrote:

    > dbgrid에서 금액부분을 수정할때마다 edit박스의 총계금액을 계산하려고 하는데

    >

    > 어떤 이벤트에 어떻게 코딩해야 하는지 조언을 부탁드립니다...

    >

    > for loop문을 이용하면 될것 같은데 쉽지 않네요...

  • Profile
    정성훈 2001.11.12 22:31
    초보자 wrote:

    > dbgrid에서 금액부분을 수정할때마다 edit박스의 총계금액을 계산하려고 하는데

    >

    > 어떤 이벤트에 어떻게 코딩해야 하는지 조언을 부탁드립니다...

    >

    > for loop문을 이용하면 될것 같은데 쉽지 않네요...



    DBGrid의 CellClick나 Enter에 넣으시면 될듯..



    with Query1 do

    begin

    Edit1.Text := '0';

    First;

    while not Eof do

    begin

    Edit1.Text := IntToStr( StrToInt( Edit1.Text ) + FieldByName( '금액필드' ).AsInteger );

    Next;

    end;

    end;

  • Profile
    초보자 2001.11.12 23:14
    답변감사합니다.

    dbgrid상에서 수정한 금액을 table update없이 grid상에서만 변경하고 그 변경된

    값들의 총금액을 알고 싶습니다.





    정성훈 wrote:

    > 초보자 wrote:

    > > dbgrid에서 금액부분을 수정할때마다 edit박스의 총계금액을 계산하려고 하는데

    > >

    > > 어떤 이벤트에 어떻게 코딩해야 하는지 조언을 부탁드립니다...

    > >

    > > for loop문을 이용하면 될것 같은데 쉽지 않네요...

    >

    > DBGrid의 CellClick나 Enter에 넣으시면 될듯..

    >

    > with Query1 do

    > begin

    > Edit1.Text := '0';

    > First;

    > while not Eof do

    > begin

    > Edit1.Text := IntToStr( StrToInt( Edit1.Text ) + FieldByName( '금액필드' ).AsInteger );

    > Next;

    > end;

    > end;