Скачать: CL | DM;

Currency   Найти похожие ветки 

← →
Nimnull ©   (2004-01-23 16:46) [0]

Подскажите пожалуйста как переменную типа Currency ограничить 2-мя знаками после запятой. Может я этот CurrencyDecimals не правильной применяю...
__
В принципе мне это значение Float полю присваивать придется, а там определено всего два знака... DBase-овская база... и там конечно 3 и 4 знаки после запятой уйдут, но все таки просто интересно...
__
Вот к примеру в таком коде...

var
TempD, TempD2: TDateTime;
NumbDays: word;
TempTot: Currency;
const
MasDay: array[1..12] of word=(31, 29, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31);
begin
TempD:= Dm.LicSchTable.FieldByName("DZ").AsDateTime;
TempD2:=Dm.LicSchTable.FieldByName("DZ2").AsDateTime;
NumbDays:= MasDay[MonthOf(TempD)]-DayOf(TempD)+1+DayOf(TempD2);
CurrencyDecimals:=2;
TempTot:= Dm.LicSchTable.FieldByName.("POS").AsCurrency/
NumbDays;
Label1.Caption:= "Число дней = "+IntToStr(NumbDays)+
". Cумма за один день = "+CurrToStr(TempTot);
end;

---

← →
Sandman25 ©   (2004-01-23 16:50) [1]

FormatFloat("0.00", MyCurrency)

---

← →
Nimnull ©   (2004-01-23 16:56) [2]

Не уважаемый SandMan25, мне строковый параметр не нужен.
FormatFloat("0.00", MyCurrency) она же в результате String дает.
А я спрашиваю про Currency, но чтобы вот по этому формату "0.00",
было Cyrrency значение...
__
Да и кстати, спасибо за отклик на предыдущий вопрос, я вообще это все в другом месте создал, а там только обновлял...Но все равно спасибо...

---

← →
Johnmen ©   (2004-01-23 17:01) [3]

Понятие "формат "0.00"" применимо к строковой пременной, параметру etc
Разделяй понятия "хранения" и "отображения".
М.б. тебе надо округление ?

---

← →
Sandman25 ©   (2004-01-23 17:04) [4]

Откуда в переменной появляется значение? Если присваивается частное, то нужно перед присвоением округлить.

---

← →
Nimnull ©   (2004-01-23 17:11) [5]

Короче мне нужно в Float поле записать сумму одного дня из выплаченного человеку чека.
Float полу присваивается currency число округленное до двух знаков после зяпятой...
У Currency автоматом после пл. точки 4 знака, а мне надо чтобы два, да еще и второе после точки округлялось из третьего если ситуация это сделать позволяет

---

← →
Sandman25 ©   (2004-01-23 17:18) [6]

[5] Nimnull © (23.01.04 17:11)

Так округляйте. В чем проблема?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c