$타입으로 입력되어있는 값들을 연산하려면 어떻게
해야하나요?
-----------------------------------------------------------------------
[질문]
델파이에서 파라독스로 만든 DB 중에 필드 타입이 ..
$ 타입으로 입력한 값들을 연산하려고 합니다. 어떻게 해야하요??
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
예를 들어서
TEST.DB 라는 화일의 필드에 입력된 값이
------------------------------------------
: 파라독스테이블 :
------------------------------------------
:필드명 : EX : EX1 : EX2 :
:값 :\3,000 : \10,000 : \20,000 :
------------------------------------------
입니다. 이것을 모두 합산하려면 어떻게 해야하나요?
EX 필드는 DBEdit1으로 입력받고,
EX1 필드는 DBEdit2 "
EX2 필드는 DBEdit3으로 입력받습니다.
[본인생각:실제소스]
문제의 요지는
$타입을 정수형으로 변환하여 연산하는 방법인듯한데..
정수형으로 값을 바꾸려면 어케해야하나요??
Var
EX,EX1,EX2 : Integer;
UsedDay,Used,AddPer : Integer; // 단가,사용일수,사용량, 가산율
Amount : LongInt; // 사용금액
Begin
Table1.Edit;
Table1.FieldValues['EX'].AsInteger := EX;
Table1.FieldValues['EX1'].AsInteger := EX1;
Table1.FieldValues['EX2'].AsInteger := EX;
Table1.Post;
UsedDay := StrToInt(dbeUsed_day.Text); <<<-------에러납니다..
AddPer := StrToInt(dbeAdd_per.Text) div 100;
Used := StrToInt(dbeUsed.Text);
//사용금액 = (단가 * 사용량 * 사용일수) + (단가 * 사용량 * 사용일수 * 가산율)
Amount := ( EX * Used * UsedDay) + ( EX * Used * UsedDay * AddPer);
dbeAmount.Text := IntToStr(Amount);
end;
[p.s]
가정에 늘 행복이 가득하시길 기원합니다.
|