Вниз
Скачать: CL | DM;

FastReport 4.2.52 неправильно работает MemoOnBeforePrint   Найти похожие ветки 

← →
tytus ©   (2007-06-27 13:08) [0]

в скрипте frxReport пишу:
procedure Memo19OnBeforePrint(Sender: TfrxComponent);
begin
 if Value>100 then Value:=100;                                                                                                                            
end;
так вот - не работает. Если допустим значение равно 102.21 то всеравно пишет 102.21....
Как правильно писать?


← →
Сергей М. ©   (2007-06-27 13:16) [1]

Что такое "Value" ?


← →
tytus ©   (2007-06-27 13:22) [2]

>Сергей М. ©   (27.06.07 13:16) [1]
В доке по фастрепорту пишется, что сие есть внутренняя переменная frxMemoView.
Так как-же правильно написать?


← →
clickmaker ©   (2007-06-27 13:25) [3]


> внутренняя переменная frxMemoView

а Sender не надо тогда перед Value?


← →
tytus ©   (2007-06-27 13:31) [4]

>clickmaker ©   (27.06.07 13:25) [3]
Ежели писать Sender то ругается "Source File not found fs_iilparser.pas"


← →
Сергей М. ©   (2007-06-27 13:37) [5]


> ругается "Source File not found fs_iilparser.pas"


Значит у тебя демо-версия

Да и нет у TFrxComponent св-ва Value.

Обращайся к объекту и его св-вам прямо по его имени - Memo19


← →
zz 5 ©   (2007-06-27 13:43) [6]


> Да и нет у TFrxComponent св-ва Value.

Это не свойство TFrxComponent, а служебная переменная.


> tytus

У меня получился вот такой код:

procedure Memo4OnAfterData(Sender: TfrxComponent);
begin
 if Value > 0 then TfrxMemoView(Sender).Text := "666";                                                                                                    
end;


← →
tytus ©   (2007-06-27 13:44) [7]

>Сергей М. ©   (27.06.07 13:37) [5]
ты Архи прав - демка.
Обращался и по имени - нихрена... наверное все из-за демки.
Короче данные я гребу из временки на Oracle, а во временку заношу из процедуры в пакете.
Короче я поправил текст процедуры и все нормально... Короче сделал через...



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

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



Память: 0.46 MB
Время: 0.021 c
15-1185986188
oldman
2007-08-01 20:36
2007.09.02
А была ли Windows 1.0 beta?


2-1186566622
DINOEL
2007-08-08 13:50
2007.09.02
нетривиальная задача ,нужно заархивировать 30 файлов в zip


15-1185973165
TStas
2007-08-01 16:59
2007.09.02
Компонент TNMHTTP


1-1182796225
d_oleg
2007-06-25 22:30
2007.09.02
IMethodHandler - параметры?


8-1150877108
fun.exe
2006-06-21 12:05
2007.09.02
Скопировать кусок Bitmap




   Наверх