 |
BorlandTalk.com Borland discussion newsgroups
|
| View previous topic :: View next topic |
| Author |
Message |
jacky Guest
|
Posted: Tue Jun 13, 2006 4:20 pm Post subject: tabs and newpage |
|
|
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender: TObject);
var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
newpage;
end;
end;
When I execute the RvSystem1 I'got 2 pages. On the first one I'got 7
rows with text "kolo bolo" in the grid. I understand this. But why I got
an empty grid on the second page? I want to get blank page after print
the grid. |
|
| Back to top |
|
 |
Guillem Guest
|
Posted: Tue Jun 13, 2006 6:34 pm Post subject: Re: tabs and newpage |
|
|
jacky wrote:
| Quote: | I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender: TObject);
var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
|
try adding ClearTabs here
| Quote: | newpage;
end;
end;
|
--
Best regards :)
Guillem Vicens Meier
Dep. Informática Green Service S.A.
www.clubgreenoasis.com
--
Contribute to the Indy Docs project: http://docs.indyproject.org
--
In order to contact me remove the -nospam |
|
| Back to top |
|
 |
jacky Guest
|
Posted: Wed Jun 14, 2006 8:12 am Post subject: Re: tabs and newpage |
|
|
Guillem napisa³(a):
| Quote: | jacky wrote:
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender: TObject);
var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
try adding ClearTabs here
newpage;
end;
end;
|
There is no difference after adding that line |
|
| Back to top |
|
 |
Guillem Guest
|
Posted: Wed Jun 14, 2006 2:29 pm Post subject: Re: tabs and newpage |
|
|
jacky wrote:
| Quote: | Guillem napisa³(a):
jacky wrote:
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender: TObject);
var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
try adding ClearTabs here
newpage;
end;
end;
There is no difference after adding that line
|
sorry, I meant after the NewPage call...
--
Best regards :)
Guillem Vicens Meier
Dep. Informática Green Service S.A.
www.clubgreenoasis.com
--
Contribute to the Indy Docs project: http://docs.indyproject.org
--
In order to contact me remove the -nospam |
|
| Back to top |
|
 |
jacky Guest
|
Posted: Wed Jun 14, 2006 5:27 pm Post subject: Re: tabs and newpage |
|
|
Guillem napisa³(a):
| Quote: | jacky wrote:
Guillem napisa³(a):
jacky wrote:
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender: TObject);
var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
try adding ClearTabs here
newpage;
end;
end;
There is no difference after adding that line
sorry, I meant after the NewPage call...
Again no difference ;( |
I work on BDS 2005 prof. |
|
| Back to top |
|
 |
Guillem Guest
|
Posted: Wed Jun 14, 2006 8:45 pm Post subject: Re: tabs and newpage |
|
|
jacky wrote:
| Quote: | Guillem napisa³(a):
jacky wrote:
Guillem napisa³(a):
jacky wrote:
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender:
TObject); var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
try adding ClearTabs here
newpage;
end;
end;
There is no difference after adding that line
sorry, I meant after the NewPage call...
Again no difference ;(
I work on BDS 2005 prof.
|
sorry, it's been some time since i last used Rave Reports. Right now
i'm out of ideas. :(
--
Best regards :)
Guillem Vicens Meier
Dep. Informática Green Service S.A.
www.clubgreenoasis.com
--
Contribute to the Indy Docs project: http://docs.indyproject.org
--
In order to contact me remove the -nospam |
|
| Back to top |
|
 |
Karol Bieniaszewski Guest
|
Posted: Thu Jun 29, 2006 3:06 pm Post subject: Re: tabs and newpage |
|
|
U¿ytkownik "Guillem" <guillemvicens-nospam (AT) clubgreenoasis (DOT) com> napisa³ w
wiadomo¶ci news:xn0enh0w1hn6zz002 (AT) newsgroups (DOT) borland.com...
| Quote: | jacky wrote:
Guillem napisa³(a):
jacky wrote:
Guillem napisa³(a):
jacky wrote:
I've got the following event:
procedure TDBGridPrintPreviewForm.RvSystem1Print(Sender:
TObject); var
lCount: Integer;
begin
with Sender as TBaseReport do
begin
ClearTabs;
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
SetTab(NA,pjLeft,2,0,BOXLINEALL,0);
for lCount:=0 to 7 do
begin
printtab('kolo');
printtab('bolo');
newline
end;
try adding ClearTabs here
newpage;
end;
end;
There is no difference after adding that line
sorry, I meant after the NewPage call...
Again no difference ;(
I work on BDS 2005 prof.
sorry, it's been some time since i last used Rave Reports. Right now
i'm out of ideas. :(
--
|
this is becaouse Rave have error of painting horizontal and vertical lines -
in raport created from code (by TRvSystem).
All this lines are cloned on next pages.
See my error raport in Quality Central - QC27206
Karol Bieniaszewski |
|
| Back to top |
|
 |
|
|
You cannot post new topics in this forum You cannot reply to topics in this forum You cannot edit your posts in this forum You cannot delete your posts in this forum You cannot vote in polls in this forum
|
|