Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2009.10.18;
Скачать: CL | DM;

Вниз

TFrxMemoView - OnBeforePrint - поставить знак "минус"   Найти похожие ветки 

 
tytus   (2008-08-27 12:20) [0]

Доброго дня мастера. Нужно перед текстом в этом мемовью поставить знак "минус". Значения наполняются с набора данных в полосе MasterData.

procedure Memo27OnBeforePrint(Sender: TfrxComponent);
begin
 Memo27.Text := "-" + Memo27.Text;// так не работает
 Value := - <frxDB1."Field1">;// тоже не работает
end;


 
Сергей М. ©   (2008-08-27 12:29) [1]


> Значения наполняются с набора данных


Что мешает организовать в НД дополнительное вычисляемое поле для этой цели ?


 
tytus   (2008-08-27 12:40) [2]

>Сергей М. ©   (27.08.08 12:29) [1]
... хотелось средствами FastReport сделать...


 
brother ©   (2008-08-27 12:45) [3]

Memo27.Text := ord(45) + Memo27.Text;
так?


 
tytus   (2008-08-27 12:51) [4]

>brother ©   (27.08.08 12:45) [3]
не так... нужно Chr(45)
но все равно не работает...


 
tytus   (2008-08-27 12:56) [5]

методом научного тыка -) и читанием мануала по FS, до меня наконец-то дошло - нужно обрабатывать другое событие:

procedure Memo27OnAfterData(Sender: TfrxComponent);
begin
 if Value <> null then
   Memo27.Text := "-" + FloatToStr(Value);                                                                                                                    
end;


так работает. Вот вам и могучий скрипт от FS -)))


 
brother ©   (2008-08-28 04:53) [6]

> Memo27.Text := ord(45) + Memo27.Text;

что-то меня занесло), главное понял о чем я)

> методом научного тыка -) и читанием мануала по FS, до меня
> наконец-то дошло - нужно обрабатывать другое событие:

ого О_о



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

Текущий архив: 2009.10.18;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.017 c
2-1250834158
ford
2009-08-21 09:55
2009.10.18
TRxDBRichEdit не выводит popupmenu


4-1219768499
Deltas
2008-08-26 20:34
2009.10.18
Кнопки в системном меню


15-1250510423
Художник
2009-08-17 16:00
2009.10.18
Изменить толщину пера при растривании вектора


15-1250495822
D.L.
2009-08-17 11:57
2009.10.18
EurekaLog


2-1250146359
oldman
2009-08-13 10:52
2009.10.18
Запуск программы, установленной в Виндоус по умолчанию