최일성 wrote:

> 안녕하세여!

> 이제 델파이를 배우기시작한 사람인데여

> 레코드를 계산하려면 어케해야하는지 궁금하군여

>

> 동일인이 여려명 들어가있고

> 같은사람에 대해서는 값을 합산하는 것이죠

>

> 어떤방법이 가장 좋을지 갈켜주세여!

> 예제 소스도 좀 부탁합니다!

> 많은 도움이 필요합니다~

> 항상 들러서 채크하죠! 감사합니다!~~ ! ^_^`



db구조가 어떤 형태인지 몰라서 제대로 말씀드리는 건지 모르겠습니다.



코드 이름 금액



이런 식으로 들어가 있다고 가정하면,







한 사람에 대해서 검색하려면



function TForm1.CalcTotalPerMan:Double;

begin

Result:= 0;

with Query1 do begin

DisableControls; //해당 데이타 컨트롤이 있으면 잠시 연결을 중지한다.

Close;

sql.Clear;

sql.Add('SELECT 코드,SUM(금액) FROM "TEST.DB" ');

sql.Add('GROUP BY 코드');

Open;

Result:= Fields[0].AsFloat;

EnableControls; //해당 데이타 컨트롤을 다시 연결한다.

end;

end;





한 사람에 대해서 검색하려면



function TForm1.CalcTotalPerMan(Code:String):Double;

begin

Result:= 0;

with Query1 do begin

DisableControls; //해당 데이타 컨트롤이 있으면 잠시 연결을 중지한다.

Close;

sql.Clear;

sql.Add('SELECT SUM(금액) FROM "TEST.DB" ');

sql.Add('WHERE 코드=:P1');

ParamByName('N1').AsString:= Code;

Open;

Result:= Fields[0].AsFloat;

EnableControls; //해당 데이타 컨트롤을 다시 연결한다.

end;

end;



이런 식으로 하면 될 것같은데 잘 되었으면 좋겠습니다.