Разницу между FormatTEXT и FormatFLOAT осщусчаем хотябы визуально без ползания в хелп ???
Вот так реализуется твоя задача:
[FormatFloat('0.00',445.676767)] руб.
Осчущаем, конечно. Просто находился перед делемой, что взять FormatText или FormatFloat. Остановился на FormatText.
Нужная мне реализация просто отделить рубли и копейки не точкой (запятой), а минусом. То есть (в базе у меня все в копейках) если число 314, мне надо записать 3 - 14 (а не 3,14).
Вот что получилось:
выводим в МЕМО [s1]
s1 := '';
if [DialogForm.quSubDet."CENA"] > 0 then
begin
//s1:=[FORMATFLOAT('0,00 ' , [[DialogForm.quSubDet."CENA"]/100])];
summ := Str([DialogForm.quSubDet."CENA"]);
r := Length(summ);
s1 := Copy(summ, 1, r-2) + ' - ' + Copy(summ, r-1, r);
end;
Комментарии
отобразить как 445,68 руб.
Разницу между FormatTEXT и FormatFLOAT осщусчаем хотябы визуально без ползания в хелп ???
Вот так реализуется твоя задача:
Нужная мне реализация просто отделить рубли и копейки не точкой (запятой), а минусом. То есть (в базе у меня все в копейках) если число 314, мне надо записать 3 - 14 (а не 3,14).
Вот что получилось:
выводим в МЕМО [s1]
s1 := '';
if [DialogForm.quSubDet."CENA"] > 0 then
begin
//s1:=[FORMATFLOAT('0,00 ' , [[DialogForm.quSubDet."CENA"]/100])];
summ := Str([DialogForm.quSubDet."CENA"]);
r := Length(summ);
s1 := Copy(summ, 1, r-2) + ' - ' + Copy(summ, r-1, r);
end;