Nightmareterrible
Nightmareterrible
Подробная информация
- Имя пользователя
- Nightmareterrible
- Присоединился
- Посещений
- 0
- Был на сайте
- Группы
- Members
Комментарии
-
Было уже http://www.fast-report.com/en/forum/?p=/discussion/9455
-
Нет, вставляется он в Delphi: procedure Button1Click(Sender:TObject); begin frxReport1 := TfrxReport.Create(Form1); //... далее тот код frxReport1.ShowReport; end;
-
Я тоже раньше думал, как это сделать при помощи отчёта, но чем заморачиваться, решил оставить это на код. Перед вызовом создаю то, что нужно: frxHeader := frxReport1.FindObject('PageHeader1'); for i := 0 to 11 do begin…
-
Переменная необходима в коде обязательно? Если объявить её в переменных FastReport, и использовать: Set('StrText', NewValue) тогда должно работать без ошибок.
-
Попробуйте писать не в Page1.OnBeforePrint, а, например, в MasterData1.OnBeforePrint. Если вероятность, что данные ещё не загружены до отображения MasterData1 (у вас же есть такой бэнд в отчёте?)
-
Потому что группа уже напечатана при вызове данного метода, и этот метод будет работать только для следующей группы. Попробуйте в GroupHeader.OnBeforePrint
-
frxDBDataSet.DataSet решает вашу проблему?
-
1) Удалите FastReport (лучше при помощи Uninstall Tool или подобных утилит) 2) на диске С: выполните поиск по маске frx* с любыми расширениями и fs*, также проверьте другие dcu и pas файлы. Возможно, скомпиленные библиотеки остались в папке проекта…
-
Сам датасет находится в Delphi или внутри отчёта? Для первого случая попробуйте frxDBDataSet.DataSet
-
Бэнды помещаете куда? Прямо на страницу или на какой-нибудь компонент? Пришлите макет отчёта для примера, в котором не печатается.
-
Предлагаю выложить проект (exe + исходники) в файлы аттача, пусть люди берут, кому надо. Мне не надо было, но после прочтения поста начинаю задумываться - а ведь такое средство просмотра было бы нелишним, особенно если сделать добавления: -- ассоц…
-
Благодаря помощи тех. поддержки разобрался. Если кому надо, держите код. 1) После показа отчёта код: TfrxPreviewForm(frxReport1.PreviewForm).PrintB.OnClick := frxPreviewPrintButtonClick; 2) procedure frxPreviewPrintButtonClick(Sender: TObjec…
-
Ну хоть идею подскажите. Как фокус установить на количество копий?
-
+1 солидарен.
-
Причину я нашёл. Отчёт вызывается из Form2: procedure TFrom2.Button1Click(Sender:TObject); begin DataModule1.frxReport1.ShowReport; //затем Form2 закрывается Close; end; и вот при этом действии отчёт (PreviewForm) уходит на задний план, …
-
Рад, что смог помочь.
-
У вас небольшая ошибка в коде - не frxReport1GetValue, а DataSetGetValue В общем, анализируйте. После 17:00 уже не отвечу. Исходники прикрепил То или не то? unit Unit7; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics,…
-
Не могу понять: почему вы вводите значения вручную вместо того, чтобы использовать базу данных (DataSet)? Чтобы не выводить что-то, нужно это скрыть TfrxMasterData(...).Visible := (<условие> = true); TfrxMemoView(...).Visible := (<услови…
-
Ещё могу посоветовать пробежаться по демо-примерам отчётов. Классная штука, скачать можно здесь: http://www.fast-report.com/ru/download/ Выбираете FastReport VCL -> Demo -> compiled Demo. В самом демо есть пример отчёта "Drill-down groups…
-
А по какому условию они должны разбиваться по группам? Можно, например, так: Select {... поля ...}, Group_Number --хранится в базе данных Select {... поля ...}, (Select <выражение>) as Group_Number --вычисляется Добавляем на форму frxD…
-
В принципе, ситуация с группировкой может быть не стандартной. Если хотите, пришлите пример готового отчёта (рисунок или WORD) и кусок имеющейся базы или её макет, смогу если не помочь, то хотя бы подсказать.
-
Добавьте в конце строчку frxReport1.SaveToFile('d:\234.fr3') и посмотрите на макет в дизайнере. Галимотья какая-то получается. Смотрите вложения. 234.fr3 и 1.jpg - ваш отчёт. 123.fr3 и 2.jpg - мой отчёт.
-
Не очень понимаю, зачем frxBand. И рекомендую использовать fr01cm или fr1cm, цифра "20" не факт, что даст корректный результат. Пришлите тестовый проект с кусочком базы данных, попробую разобраться.
-
Случай 1. У нас только один MasterData (то есть один SQL-запрос, один датасет, как хотите) Исходя из задачи, которую вы преследуете предложу 2 варианта: 1) Если таких групп должно быть точное число (2, 5, 6), то можно создать некий параметр вида:…
-
Таблица значений - это один и тот же Датасет (набор данных, SQL-запрос, ...) или разные? От этого зависит модель.
-
Я так понимаю мемки у вас на MasterData лежат? Сам такого не делал, но думаю, что это можно реализовать следующим образом. Заводите переменную Rashod_Podrazd, ставите значение 0. Заводите переменную Uchastok_old, ставите значение ''. Далее в рас…Раздел: Как Masterdata вывести сумму значений 2-х, 3-х ячеек в колонке рядом Комментарий от Nightmareterrible June 2013
-
Думал, вы через Delphi делаете, поэтому написал конструкции для него. Для Fr3 единственный нормальный вариант - двойной проход с занесением в переменную. Создайте переменную MySum со значением 0 Допустим, итоговая сумма у вас заносится в Memo12…
-
Не очень разумно использовать TstringList для сохранения целочисленных значений. Используйте эти конструкции на выбор: 1) MyValues: Array of Integer; (или of double) ... добавление элемента: SetLength(MyValues, High(MyValues) + 2); MyValues[Hi…
-
Была точно такая же проблема. Решил следующим образом: s:=''; if <условие> then s := s + #13#10+ 'текст'; Memo1.Text := s; Не забывайте ставить #13#10, просто #13 может быть недостаточно для некоторых программ просмотра текста. Я себя…
-
Можно и по-другому. Делаете 2 MasterData. В первом - данные, во втором - точно такие же поля, но пустые. Далее перед печатью второго MasterData (я делал в GroupHeader2.OnAfterCalcHeight) пишем скрипт: MasterData2.RowCount :=Round(abs((Engine.Free…