Konst
Konst
Подробная информация
- Имя пользователя
- Konst
- Присоединился
- Посещений
- 0
- Был на сайте
- Группы
- Members
Комментарии
-
нет у меня слава богу все объекты в дизайне целы. но превью пустое. чистый лист. когда ошибка есть чтото показывает как без ошибки на превью пусто. к сожалению на демке не получается повторить. но точно в 3.03 и ниже такого не было.
-
Как менять понятно. но как определить какая активна типа Page.ItemIndex ActivePageIndex или что то в этом духе
-
воспользуйся моим поиском и заменой. я тока им правлю..
-
А как узнать какая в данный момент страница открыта? Pages[0] или 1 или 2 ???
-
открывается отчет редактируется запускаешь ошибка. опять редактируешь превью ошибка. потом бах ошибки нет и пустой лист.
-
fr 3.04 Последняя версия Ставь ее пробуй на нем и потом уже пиши есть эта ошибка или нет.
-
Такое ощущения что у нас разные версии с тобой..
-
Если отчет лежит в Блоб тебе прийдется сохранить его в файл. потом найти заменить. и только тогда снова загрузить в Блоб. Не спорю что в фаре навороченей
-
Как с наследованием если форма храниться в Блоб.??
-
я ее переименовал на ButMemoReplace кнопка заменить в мемо раньше была кажется ButReplaceMemo посмотри рядом с крыжиком она
-
Ставим в мемо [MyMoneyToStr(PSUM,1,0)] без всеких скобок проходит нормально. у вас не поймешь где нужно ставить скобки где не нужно. кстати почему не видно переменных которых мы объявили в тексте скриптта? глобальных.
-
вот можешь добавить кнопку procedure TFrmReplace.ButMemoReplaceAllClick(Sender: TObject); var I : Integer; s1 : String; begin if Trim(Ed_FindText.Text)='' then exit; for i:=0 to Lb_Controls.Items.Count-1 do begin Lb_Controls.ItemIndex …
-
Поиск в мемо делаешь у тебя получается список объектов. кликаешь в списке на объект у тебя в мемо текст появляется. жмешь кнопку над мемо. появляется диалог поиск и замена. жми найти находит .потом заменить. все на экране. в мемо потом ручками …
-
Смотри в коде объявляю переменную в самом начале var PSUM, NDS:extended; дальше procedure Button1OnBeforePrint(Sender: TfrxComponent); begin with Button1, Engine do begin Идет вычисление. AGENTS :=INT(* 3)/100; PSUM := - AGENTS; …
-
А ты попробуй поставить в файле unit frx_BsReplace; function TfrxWizardReplace.Execute: Boolean; var Page: TfrxReportPage; begin Designer.Lock; FrmReplace := TFrmReplace.Create(self); FrmReplace.Wizard := Self; if FrmReplace.ShowModal = m…
-
Запусти поиск найдутся все вхождения что там не найдено. и смотри. в тройке он ончень чувствителен к скобкам. [] <> поиграй ими
-
работает но кривовато при сохранении в 2.53 выбираешь файл ФР3 потом в 3 должен открываться. вот после этого надо дорабатывать рашпелем
-
Добавлено в визард поиск и замена пропертей. Stretch ShiftOver WordWrap WordBreak Очень погает после конвертации отчетов из 2.53. заменяет все списком сразу. с исходниками можете добавить другие которые вам нужны. мне пока хватает этих.
-
Ты воспользуйся моим мастером поиском замены. там все это лечится... нажимаешь найти проперь такую то тебе полный список где есть такое. нажимаешь заменить у конкретного или у всех сразу. и проперть меняется. я тока с этим отчеты перевожу.
-
Делаю так. Var i1,i2 :Integer; ex:Extended; ex := Params[0]; i1 := Params[1]; i2 := Params[2]; Таже самая ошибка. я что то не въезжаю. Или я такой2 тормоз или продукт такой сырой!!!! Или нужно что-то где то прописать чтобы работало…
-
AlexTZ написал: Напишу, сейчас времени нет. А мы тут ругаемся.. Уже не печатаемыми словами. Матами...
-
Все равно не понял как. что то я не вьехал. на кнопку со значком функции???? не получается
-
Так это сколько надо движений мышкой сделать?
-
AlexTZ написал: AlexTZ написал: Если поставить мышкой по правому клику что объект не печатаемый он продолжает печататься пока в инспекторе не посавишь что он не печатаемый Да ну, не может быть. Флажок снимается синхронно в инспекторе. …
-
Саша я тебе уже писал почему об этом ничего ни слова. напиши документ переход с версии 2.53 и там все нюансы напиши. а то столько времени убивается.. и не понятно то ли это Баг толи фича
-
Если поставить мышкой по правому клику что объект не печатаемый он продолжает печататься пока в инспекторе не посавишь что он не печатаемый
-
Почему я должен прописывать так [IIF(
=1,IntToStr(
)+'/'+IntToStr(
),DateToStr(
))] в 2.53 можно было просто писать [IF(
=1,
+'/'+
,
)] И очень часто надо явно указывать типы. раньше этого не было и все работало на ура.
в визарде все списком и удобнее редактировать.После запуска отчета печатется 2 строчки мастер банда с данными потом выскакивает диалог с ошибкой Были обнаружены следующие ошибки Invalid variant opeation в каком месте что за ошибка ничего не понятноfunction TfrxExpressionCache.Calc(const Expression: String; var ErrorMsg: String): Variant; Result := v.Value; end; v.Value= Delphi exception EVariantTypeCastError at $F1FF949 Expression= 'IIF(=1,+'/'+,DateToStr())' и выскакивает оши…