Форум: "Основная";
Текущий архив: 2003.01.09;
Скачать: [xml.tar.bz2];

Вниз

Quick Report   Найти похожие ветки 

← →
Rus   (2002-12-27 10:10) [0]

Уважаемые мастера,
хотел использовать Quick Report в чистом виде - написал строчки:

uses QuickRpt;

{$R *.RES}

var q: TQuickRep;
begin
q:= TQuickRep.Create(nil);
try
q.Preview;
finally
q.Free;
end;
end.

Получил проблемы:
1. по кнопке свернуть сворачивается не как главная форма, а как подчиненное окно
2. в процессе работы пользователю недоступны настройки принтера

Пожалуйста подскажите решение. Спасибо.

---

← →
mrcat   (2002-12-27 11:02) [1]

что в Вашем понимании "в чистом виде"?

---

← →
shane54   (2002-12-27 11:13) [2]

Видимо Rus (27.12.02 10:10) имел ввиду "в чистом виде" - без использования компонент на форме - создание Report"а в run-time.

---

← →
mrcat   (2002-12-27 11:19) [3]

program QReport;

uses
QUnit in "QUnit.pas" {QuickReport: TQuickRep};

begin
with TQuickReport.Create(nil) do
begin
Preview;
Destroy;
end;
end.

---

← →
mrcat   (2002-12-27 11:22) [4]

сворачивается не как главная форма, а как подчиненное окно
TQuickRep.Create( self);
в процессе работы пользователю недоступны настройки принтера
принтер установлен в системе?

---

← →
Rus   (2002-12-27 11:36) [5]

> shane54
Да, в run-time, полностью программа выглядит так:

program Print;

uses
QuickRpt;
{$R *.RES}

var q: TQuickRep;
begin
q:= TQuickRep.Create(self);
try
q.Preview;
finally
q.Free;
end;
end.

> mrcat
TQuickRep.Create(self); - не компилируется - пишет Undeclared identifier: "self"

---

← →
Pat   (2002-12-27 11:39) [6]

>в процессе работы пользователю недоступны настройки принтера
QReport, кажется, вообще не реагирует на настройки принтера. У него свой объект TQRPrinter...ИМХО

---

← →
Rus   (2002-12-27 11:39) [7]

> mrcat
принтер - сетевой

---

← →
Skier   (2002-12-27 11:41) [8]

>Rus
Пишешь консольное приложение с использованием VCL ?!
Не понятно...
Естественно что про self оно ничего не знает...

---

← →
Rus   (2002-12-27 11:48) [9]

> Skier
с nil работает (открывает файлы, печатает, но не позволяет менять принтер из программы, не позволяет задавать диапозон страниц)

> mrcat

program QReport;

uses
QUnit in "QUnit.pas" {QuickReport: TQuickRep};

begin
with TQuickReport.Create(nil) do
begin
Preview;
Destroy;
end;
end.

те же проблемы

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2003.01.09;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.007 c