Форум: "Основная";
Текущий архив: 2009.10.18;
Скачать: [xml.tar.bz2];
Вниз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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.008 c