Конец страницы

Комментарии

• -=Serg=-

  April 2005 отредактировано 14:06

  Несовсем понял, чем отличается на вид, свободное место от пустых строк?
• Bot

  April 2005 отредактировано 14:06

  Тем, что у меня строк вообще нет. Мне их как раз и надо сделать.
• -=Serg=-

  April 2005 отредактировано April 2005

  Возможно тебе поможет свойство StartNewPage у бенда.
• Bot

  April 2005 отредактировано 14:06

  Мне не надо создавать новую страницу. Мне необходимо в странице, если есть пустое место, т.е. FreeSpace>0, между MasterData и PageFooter разлиновать.
• -=Serg=-

  April 2005 отредактировано 14:06

  Вот с этого и нужно было начинать! С точного описания проблемы.
• Bot

  April 2005 отредактировано 14:06

  Подскажи решение!
• -=Serg=-

  April 2005 отредактировано 14:06

  Например, используйю frxUserDataSet. Размести еще один бенд и выведи необходимое количество записей (линий).
• Bot

  April 2005 отредактировано 14:06

  А как мне определить сколько надо вывести записей ?
• -=Serg=-

  April 2005 отредактировано 14:06

  Проверяй FreeSpace
• Bot

  April 2005 отредактировано 14:06

  Я делаю таким образом:
  
  <span style='color:blue'>procedure Footer1OnBeforePrint(Sender: TfrxComponent);
  begin
  while (Engine.FreeSpace>6) do
  begin
  Memo16.Memo.clear;
  Memo17.Memo.clear;
  Memo18.Memo.clear;
  Memo19.Memo.clear;
  Memo52.Memo.clear;
  Memo57.Memo.clear;
  Memo61.Memo.clear;
  Memo69.Memo.clear;
  Engine.ShowBand(MasterData2);
  end;
  end;</span>
  
  но до конца страницы не доходит.
• Bot

  April 2005 отредактировано 14:06

  Ну что, кто-нибудь сможет помочь ?
• Bot

  April 2005 отредактировано 14:06

  Первую прооблему решил.
  
  Но сейчас у меня вот какая загвоздка возникла. Создаю компонент Memo и хочу ему обрамление дать таким образом:
  
  <span style='color:blue'>Memo.Frame.Typ:=(ftLeft,ftRight,ftTop,ftBottom);</span>
  
  Но ничего не получатеся, ругается. Если какую-нибудь одну линию рисовать, тогда нормально.
  
  Что я делаю не так?
• Alex_Gol

  April 2005 отредактировано 14:06

  Bot написал:

  <span style='color:blue'>Memo.Frame.Typ:=(ftLeft,ftRight,ftTop,ftBottom);</span>
  Что я делаю не так?

  Напиши
  <span style='color:blue'>Memo.Frame.Typ:=ftLeft+ftRight+ftTop+ftBottom;</span>
  
• Bot

  April 2005 отредактировано 14:06

  Класс, получилось
  
  А как сделать следующее:
  
  Есть MasterData1, у которого настроено, чтобы запись растягивалась. И есть PageFooter. Из-за того, что Мемо растягиваются, у меня на какждой странице остаётся по немногу пустого места. Как его можно либо убрать, либо заполнить пустыми Мемо ?
• Гаджимурадов Рустам

  April 2005 отредактировано 14:06

  Bot написал:

  Класс, получилось
  
  А как сделать следующее:
  
  Есть MasterData1, у которого настроено, чтобы запись растягивалась. И есть PageFooter. Из-за того, что Мемо растягиваются, у меня на какждой странице остаётся по немногу пустого места. Как его можно либо убрать, либо заполнить пустыми Мемо ?

  Не делай так, как тебе советовали. Делай через обыный child и не парься.
  Что-то типа:

  while (Engine.FreeSpace>6) do
    ShowBand(Child1);
  

  
  А насчет того, что остается пустое место после растягиваемого MasterData1, то просто положи на форму MasterFooter и в нем делай то же самое (как выше сказано).
• Bot

  April 2005 отредактировано April 2005

  написал:

  Не делай так, как тебе советовали. Делай через обыный child и не парься.

  Сделал через Footer. Работает как надо.
  

  написал:

  А насчет того, что остается пустое место после растягиваемого MasterData1, то просто положи на форму MasterFooter

  У меня 3 версия и там нет MasterFooter. Я сделал по другому. На каждой странице определял оставшееся свободное место и затем создавал там Мемо высотой равной этому свободному месту.
• Гаджимурадов Рустам

  April 2005 отредактировано 14:06

  Правильно. А то, что мастерфутера нету - легко обходится (как ты уже понял) с помощью PageFooter'a (а в втоем случае так даже лучше и правильнее).