такая же ситуация иногда проявляется и с картинками, некоторые читалки pdf, отображают картинки , некоторые игнорируют, такое бывает с экспортом в компоненте
» FastReport
Разобрался, спасибо.
Есть ли полноценная версия под XE4 ?
Цитата:
Есть ли полноценная версия под XE4 ?
Думмаю да, особенно учитывая что обрезанная версия FR идет с XE4.
Отдельной версии под ХЕ4 пока нет.
хелп плиз, а то чета я не вкуряу.
вопрос номер раз. Есть отчет, есть кнопка "редактировать"(frxPreview1.Edit;) нажимаю и открывается редактор текущего отчета, но, блин, он отмечен как "Untitled" то есть новый. Заполнял я и filename, все равно новый. Как движку сказать, что я редактирую, а не создаю? Ибо усеры бунтуют, так как открывается диалог сохранения, где надо его еще найти и не ошибиться.
и вопрос номер 2. Банально, но как вызвать дизайнер для создания нового отчета? так как не вижу нужной процедуры.
спасибо
вопрос номер раз. Есть отчет, есть кнопка "редактировать"(frxPreview1.Edit;) нажимаю и открывается редактор текущего отчета, но, блин, он отмечен как "Untitled" то есть новый. Заполнял я и filename, все равно новый. Как движку сказать, что я редактирую, а не создаю? Ибо усеры бунтуют, так как открывается диалог сохранения, где надо его еще найти и не ошибиться.
и вопрос номер 2. Банально, но как вызвать дизайнер для создания нового отчета? так как не вижу нужной процедуры.
спасибо
Цитата:
Банально, но как вызвать дизайнер для создания нового отчета?
Код:
FReport := TfrxReport.Create(nil);
FReport.DesignReport;
LadyOfWood
спасибо
спасибо
кто знает как Grand Total колонки в кросс отчете поместить слева а не справа?
mcdie
Настройками, по моему, никак.
Я делал так:
Код:
var GT: Array [0..1000] of Extended;
procedure DBCross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);
begin
If DBCross1.IsGrandTotalColumn(ColumnIndex) Then GT[RowIndex]:=Value;
end;
procedure DBCross1OnPrintRowHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant);
var v: Extended;
begin
If HeaderIndexes[1]=0 Then Memo.Text:=FloatToStr(GT[HeaderIndexes[0]]);
end;
Настройками, по моему, никак.
Я делал так:
Код:
var GT: Array [0..1000] of Extended;
procedure DBCross1OnPrintCell(Memo: TfrxMemoView; RowIndex, ColumnIndex, CellIndex: Integer; RowValues, ColumnValues, Value: Variant);
begin
If DBCross1.IsGrandTotalColumn(ColumnIndex) Then GT[RowIndex]:=Value;
end;
procedure DBCross1OnPrintRowHeader(Memo: TfrxMemoView; HeaderIndexes, HeaderValues, Value: Variant);
var v: Extended;
begin
If HeaderIndexes[1]=0 Then Memo.Text:=FloatToStr(GT[HeaderIndexes[0]]);
end;
exteris
спасибо
спасибо
Подскажите кто в курсе как при экспорте через TfrxBIFFExport изменить имя страницы в xls, что бы вместо Страница 0, Страница 1, Страница 2 и т.д. можно указать было свое название.
Есть стандартный отчет с подписями в конце отчета.
Как реализовать возможность, чтобы подписи были на последней странице с хотя бы одной строчкой данных (MasterData)?
Знаю, что есть какая-то возможность реализовать это через второй проход, но хотелось бы увидеть пример.
Как реализовать возможность, чтобы подписи были на последней странице с хотя бы одной строчкой данных (MasterData)?
Знаю, что есть какая-то возможность реализовать это через второй проход, но хотелось бы увидеть пример.
mcdie
MasterData.Visible := false;
if <Page> = <TotalPages> then MasterData.Visible := true;
MasterData.Visible := false;
if <Page> = <TotalPages> then MasterData.Visible := true;
Vitus_Bering
Не совсем то. Нужно одну запись с предпоследнего листа с данными перекинуть на последний лист (который с подписью), в случае когда этой хотя бы одной записи данных на последнем листе нет.
Не совсем то. Нужно одну запись с предпоследнего листа с данными перекинуть на последний лист (который с подписью), в случае когда этой хотя бы одной записи данных на последнем листе нет.
mcdie
Могу только подсказать без примера.
В событии бэнда OnAfterCalcHeight посчитать оставшееся место на странице
if Engine.FreeSpace < [высота подписей] + [высота строчки данных]
then Engine.NewPage; // вставить новую страницу
Подчеркиваю, это идея, в коде запросто мог наврать.
Могу только подсказать без примера.
В событии бэнда OnAfterCalcHeight посчитать оставшееся место на странице
if Engine.FreeSpace < [высота подписей] + [высота строчки данных]
then Engine.NewPage; // вставить новую страницу
Подчеркиваю, это идея, в коде запросто мог наврать.
mmlm10
Спасибо, попробую
Спасибо, попробую
mcdie Или я чето не понял..... а что стандартный бэнд подвал отчета не подходит?
Andryshok
Нет, поскольку он может быть распечатанным на последней странице «сам по себе», а человеку надо чтобы на последней странице была хотя бы одна строчка с табличными данными.
Нет, поскольку он может быть распечатанным на последней странице «сам по себе», а человеку надо чтобы на последней странице была хотя бы одна строчка с табличными данными.
miwa А если в данных всего одна строчка, не находишь ли ты это странным ? Или в таком случае у него отчет будет на одной странице, форму отчета плиз в студию.
Andryshok
Нормальная ситуация.
По правилам документооборота на пустом листе подписи не допускаются.
Нормальная ситуация.
По правилам документооборота на пустом листе подписи не допускаются.
Andryshok
Цитата:
В таком случае весь документ будет на одной странице. Не вижу ничего странного. За формой отчета - к mcdie.
Цитата:
А если в данных всего одна строчка, не находишь ли ты это странным ?
В таком случае весь документ будет на одной странице. Не вижу ничего странного. За формой отчета - к mcdie.
Цитата:
Нет, поскольку он может быть распечатанным на последней странице «сам по себе», а человеку надо чтобы на последней странице была хотя бы одна строчка с табличными данными.
MasterDataOnBeforePrint:
if MasterData1.RecNo = MasterData.RecordCount then
Engine.NewPage;
?
NickNNN
Так переход на новую страницу будет независимо от остатка свободного места на текущей.
Надо добавлять проверку Engine.FreeSpace
Так переход на новую страницу будет независимо от остатка свободного места на текущей.
Надо добавлять проверку Engine.FreeSpace
mmlm10, вчитался не вдумчиво в вопрос. Там достаточно для полосы поставить галочку "Держать подвал вместе", тогда подвал не "выкинет" на новую страницу
NickNNN
Вообще-то это для групп, а есть в отчете группы или нет, знает только автор вопроса.
Вообще-то это для групп, а есть в отчете группы или нет, знает только автор вопроса.
Цитата:
NickNNN
Вообще-то это для групп, а есть в отчете группы или нет, знает только автор вопроса.
Поставил полосу данных, количество записей 9 штук. Влезает ровно на лист
Поставил футер
Если не ставить галочку "держать подвал вместе", выносит футер на новый лист отдельно.
Если поставить - с последней записью
updates.vsgroup.ua/fr/footer.fr3
NickNNN
Убедил! Как-то я на эту галку раньше внимания не обращал. Спасибо.
Убедил! Как-то я на эту галку раньше внимания не обращал. Спасибо.
Ребята, помогите, есть вариант?
4.11.8
Child на нём поля "текст", всё это хозяйство - договор.
Каждый пункт договора в своём поле, а вот с номерами пунктов засада.
Их надо сделать жирными, а в одном текстовом поле только один формат.
Рядышком с текстом пункта делаю ещё поле в котором жирно пишется номер пункта, но когда пункт длиннее одной строчки, то текст пункта растягивается, а следующий номер остаётся на месте.
Подскажите как связать два соседних текстовых поля, так чтобы пока не закончится одно из них следующие ниже поля сдвигались?
Или каким-нибудь иным методом номера пунктов договора писать жирным.
4.11.8
Child на нём поля "текст", всё это хозяйство - договор.
Каждый пункт договора в своём поле, а вот с номерами пунктов засада.
Их надо сделать жирными, а в одном текстовом поле только один формат.
Рядышком с текстом пункта делаю ещё поле в котором жирно пишется номер пункта, но когда пункт длиннее одной строчки, то текст пункта растягивается, а следующий номер остаётся на месте.
Подскажите как связать два соседних текстовых поля, так чтобы пока не закончится одно из них следующие ниже поля сдвигались?
Или каким-нибудь иным методом номера пунктов договора писать жирным.
Правой кнопкой на поле - разрешить HTML теги. далее в <b></b> возьмите нужную часть текста
Страницы: 1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859
Предыдущая тема: CBuilder и копирование файла
Форум Ru-Board.club — поднят 15-09-2016 числа. Цель - сохранить наследие старого Ru-Board, истории становления российского интернета. Сделано для людей.