Ошибки в скрипте отчёта
SlasherX
Россия, Магнитогорск
В отчёте имеется следующий код:
procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
Var
s1 : Double;
begin
...
If RSS >0 Then s1 := ROUND(Rab*10/RSS)/10
Else s1 := 0;
TopSumMemo.Text := IntToStr(RSS) + #10 + FloatToStr(s1);
...
End.
При предварительном просмотре в дизайнере всё было нормально, но при попытке сформировать отчёт из программы вылетает ошибка
"Invalid variant type conversion".
При изменении кода на:
procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
Var
s1 : Double;
begin
...
If RSS >0 Then s1 := ROUND(Rab*10/RSS)
Else s1 := 0;
TopSumMemo.Text := IntToStr(0+RSS) + #10 + FloatToStr(s1/10);
...
End.
ошибка перестала возникать. Кто-нибудь знает в чём проблема?
procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
Var
s1 : Double;
begin
...
If RSS >0 Then s1 := ROUND(Rab*10/RSS)/10
Else s1 := 0;
TopSumMemo.Text := IntToStr(RSS) + #10 + FloatToStr(s1);
...
End.
При предварительном просмотре в дизайнере всё было нормально, но при попытке сформировать отчёт из программы вылетает ошибка
"Invalid variant type conversion".
При изменении кода на:
procedure ReportSummary1OnBeforePrint(Sender: TfrxComponent);
Var
s1 : Double;
begin
...
If RSS >0 Then s1 := ROUND(Rab*10/RSS)
Else s1 := 0;
TopSumMemo.Text := IntToStr(0+RSS) + #10 + FloatToStr(s1/10);
...
End.
ошибка перестала возникать. Кто-нибудь знает в чём проблема?
Комментарии
Borland Delphi 6.0 Enterprise (Build 6.240) Update Pack 2
Но второй апдейт я сам ставил, и исчезли все баги, которые были без него.
Например: открытие формы, с активным Query не приводит к закрытию всей Дельфы, без предупреждения, а просто вылетает ошибка что Connection некорректен.
все равно такая ж х..ня... извините за выражение...
Касательно Update2 для D6:
Если я не ошибаюсь, то этот Update2 борланд сначала выкладывал, потом находил там ошибки и убирал его, а потом опять выкладывал.
То есть сущестует два варината этого Update2 старый и новый.
Если ты точно не знаешь, какой у тебя, то качни его с борланда еще раз.
У тебя как я понял D6_upd2_ent.exe имеет размер 35 327 776,
а у меня 34,903,298.