Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Quick Report! Метод NewPage выдает ошибку! [D3, D4, D5, D6, Win95/98, Win2k]


urich ©   (2002-11-28 12:11:00) 

Всем привет!

Есть проблема - в QR динамически помещаю qrlabel и qrimage (Заголовок и картинка). Необходимо печатать 2 картинки на листе.
Перед созданием третьих qrimage и qrlabel, необходимо перейти на следующую страницу. Метод NewPage вызывает ошибку. С чем это может быть связано?


Johnmen   (2002-11-28 12:59:00) [1]

NewPage имеет смысл только в рамках генерации отчета.
>А что, нужно прописывать где-то в событиях QuickRep?
Да...Можно и так сказать...


urich   (2002-11-28 12:28:00) [2]

Button click...

А что, нужно прописывать где-то в событиях QuickRep?


Johnmen   (2002-11-28 12:19:00) [3]

А где прописан указанный код ?


urich   (2002-11-28 12:15:00) [4]

for i:=1 to strtoint(s) do
begin
readln(f,s);
btn:=Tqrlabel.Create(quickrep1);
btn.Font.Charset:=RUSSIAN_CHARSET;
btn.Font.Name:="arial";
btn.Parent:=quickrep1;
btn.Top:=100+420*(i-1);
btn.Left:=50;
btn.Width:=150;
btn.Height:=20;
btn.Caption:=s;

img:=Tqrimage.Create(quickrep1);
img.Parent:=quickrep1;
img.Top:=120+420*(i-1);
img.Left:=100;
img.Width:=580;
img.Height:=390;

readln(f,s);
img.Picture.LoadFromFile(s);

if (i mod 2)=0 then quickrep1.NewPage;

end;


Наверх

Титульная страница Поиск, карта сайта Написать письмо