Как программно форматировать Memo

Vit@L · September 2011

Доброго времени суток.
Пользовался поиском, но ничего не нашел, вот решил создать тему.
Подскажите пожалуйста, как программно из Delphi присвоить формат для компонента memo в отчете.
Т.е. суть в следующем, после определенных манипуляций, переменной X в программе присваивается некое значение формата Float. Затем значение этой меременной присваивается компоненту memo следующим образом:

Memo1.Memo.Add(floattostr(x));

Но после вывода отчета на экран, форматирование не работает. Т.е. нужно к примеру чтобы показывалось число вида 3 327,50, а в итоге показывается 3327,5, как все же сделать форматирование?
Заранее благодарен.

Vit@L · September 2011

Кстати, небольшое дополнение.
Пробовал присваивать следующим образом:

Memo1.Memo.Add('['+floattostr(first_ost)+']');

с форматированием все хорошо, но по непонятной причине, причем не всегда, а только в некоторых случаях, выскакивает ошибка: "Memo1: Ошибка в выражении '53,2': ';' expected"

Vit@L · September 2011

Неужели никто не может подсказать?

Stalker4 · September 2011

Vit@L написал: »

Подскажите пожалуйста, как программно из Delphi присвоить формат для компонента memo в отчете.

Для программного форматирования в мемке используй функции Format или FormatFloat.

Vit@L · September 2011

А можно примерчик пожалуйста?

gpi · September 2011

procedure Memo4OnBeforePrint(Sender: TfrxComponent);
begin
if Engine.FinalPass then
Memo4.Text := 'Sum: ' + Format('%2.2m',[Get(<Sales."Company">)]);
end;

Vit@L · September 2011

gpi, а если у меня этой мемке присваивается значения переменной х из кода Delphi, как тогда быть? И все же можно пример с использованием функции Format или FormatFloat?

Vit@L · September 2011

Кстати, я понял почему появляется ошибка "Memo1: Ошибка в выражении '53,2': ';' expected". при таком коде:

Memo1.Memo.Add('['+floattostr(х)+']');

Она появляется тогда, когда дробная часть числа больше нуля. Т.е. к примеру, если будет 12,00 то все будет нормально, а если 12,10 то вылетает ошибка. Почему так?

Shtopor · December 2011

А чем плох:
FloatToStrF(SomeVar,ffFixed,8,2)

Как программно форматировать Memo

Комментарии

Оставить комментарий