그리드에 있는 값들을 고대로 퀵리포트에 옮겼습니다.
마지막 밴드에 값들의 합을 넣어주려고 하는데 어떻해 해야 하나요?
amt의 값들을 더해서 QL_totamt.Caption여기에 넣어주려 하거든요..
함수가 있나요?
플그램 시작한 지도 얼마안돼고 델파이 시작한지도 얼마 안돼서
많이 헤맵니다..
밑에 소스 보시고 위에 질문한거 외에도 고칠거 있으면 봐주세요..
그럼 고수님들의 도움 부탁드립니다..
=====================================================================
var
i,amt : integer;
price,cnt : string;
with FmFnB00900Q.AdvGrid_Menu do
begin
inc(m_Row);
if m_Row >= RowCount then
begin
MoreData := False;
exit;
end
else
begin
QL_menu_desc.Caption := Cells[2 , m_Row]; //메뉴명
QL_menu_price.Caption := Cells[3 , m_Row]; //단가
price := func_del_token(QL_menu_price.Caption,',');
cnt := QL_count.Caption;
amt := strtoint(price) * strtoint(cnt);
QL_totamt.Caption := <-- 요부분이요..(-_-;;)
end;
if m_Row < RowCount then
MoreData := True
else
MoreData := False;
end;
amt := strtoint(price) * strtoint(cnt);
TotAmt := TotAmt + amt;
if m_Row = RowCount -1 then
QL_totamt.Caption := TotAmt;
이런식으로여... 위에서 TotAmt 이부분은 변수를 하나 선언하지고염
프로시져 안에서 선언하면 안되는거 아시졈...
프린트전 후에는 반드시 TotAmt를 초기화 시켜 주시고염...
참고해보세염... 그럼...