You are not logged in.
Pages: 1
Hi,
I would like to chnage the space (a full lineheight in the moment) to a half line or in an integer count.
In which line in sqlit3pages.pas is this space declared?
Thanks
Josef
P.S.
And by the way: I found a possibilty to give the header a background color and I found a way to print multilines in the columns, too.
If you are interested I can send you the code.
Hi,
thanks for answer.
But now I have the next problem with column drawing.
If I use
rep.DrawTextAcrossCols(['Test',fdmimker.ZQAufNachrichtNACHTEXT.AsString,'Some text here']);
the hole text in the second column will print only in one line. The text in the second column comes from a DB Field Typed TEXT and has multlines.
Is there a way to get a multlinetext in the column?
thanks again
Josef
Hi,
I have a SQLite DB with a field. This field is typed "TEXT".
Is there a possibility to display the text of this field in a formatted manner?
With DrawText(...) I got the result, but DrawTextAt(......,20) isn't possible.
I tested a TStringstream, but it is the same like DrawTextAt. Every new line displays on the first line. No linebreaks.
But I need a correct text on possition 20 with such a field, for example.
Thanks
Josef
Hi,
sorry. Now I see the declarations are above the procedures.
many thanks
josef
Hi,
I thin k I'm to stupid to use the pagecounter.
I found in SQLite3Pages the follow: 'page n/n'.
So I tested in footer:
rep.AddTextToFooterAt('Page %d/%d', 200)
rep.AddTextToFooterAt('Page n/n', 10);
and both don't show the page numbers.
What's wrong?
thanks
Josef
Hello,
is there a possibility to give the columnheaders a background color? I only found a possibility in DrawTextAcrossCols.
For example to use a DrawBoxFilled(LeftMargin,4,RightMarginPos,40,16419913) as header background isn't possible. It's behind the column construct and not visible.
There is an option RowLineHeight in columnheaders. But only in integer. Is it possible to change this in decimal?
If you use the option background color in DrawTextAcrossCols and if you use RowLineHeight = 2 then only theRowLineHeight 1 gets the background. The second is white.
Do you have any suggestions for formating my column construct?
Josef
P.S.
And by the way: Why do you have different word constructs for LeftMargin and RightMargin (RightMargin with Pos, LeftMargin without Pos)?
Hello,
thanks for answer.
I have rotated my picture. This result is ok for me.
I need it only for a picture at the last site.
Josef
Hello,
is it possible to switch between orientation on the current TGDIPages?
with TGDIPages.Create(self) do
try
OnStartPageHeader := MyReportHeader;
// the title of the report
Caption := 'Zuchtkalender';
// now we add some content to the report
BeginDoc;
// header and footer
TextAlign := taCenter;
Font.Style := [fsBold];
.....
DrawText('Kurzbemerkungen: ');
DrawText(dmzucht.ZQzuchtkalBEZEICHNUNG.AsString);
...
newpage(true);
switch orientaion to landscape <------
DrawBmp(image2.picture.bitmap,0,RightMarginPos);
Thanks
Josef
Hello,
thanks for the example code. Now it works.
I have had problems with the correct sender declaration:
procedure MyReportHeader(Sender: TObject); //I thought the right one is TGdiPages
Thanks
Josef
Thanks for answer.
But till now I found no way to place my picture in the headsection.
Do you have some code for my click procedure to realize my picture.
Here my click procedure:
procedure TfUebersichtzuchtkalender.BTzuchtkaldruckClick(Sender: TObject);
var bmp:TBitmap;
begin
with TGDIPages.Create(self) do
try
bmp:=tBitmap.Create;
bmp.LoadFromFile('C:\Bauplan\auftrag.bmp');
// the title of the report
Caption := 'Zuchtkalender';
// now we add some content to the report
BeginDoc;
.....
thanks
Josef
Hello,
first I found your PDF engine via forum search and .... it's great. You do a great job. Thank you.
Now my question:
Is it possible to place a picture into header or footer section?
Is there anywhere a piece of code?
Thanks
Josef
Pages: 1