rotieren / drehen / Text / QRLabel

[Patrick Sack]

Hi,
<br>
<br>D5E inkl. UpdatePack1 und Quick Report 3.0.X
<br>
<br>ich suche eine Möglichkeit einen Text gedreht auszudrucken. Alle Komponenten die ich bis jetzt im Netz gefunden habe waren maximal für Delphi 3 zu gebrauchen.
<br>Wenn es nun wirklich keine Komponente gibt, die So etwas leistet wie kann man das dann selber realisieren?
<br>
<br>In meiner Not habe ich einfach mal einen Test gemacht:
<pre>
Das soll nur ein kleiner Test sein, um zu sehen, ob man überhaupt den Bericht von Hand manipulieren kann.
procedure TrptMain.QuickRepBeforePrint(Sender: TCustomQuickRep;
var PrintReport: Boolean);
begin
rptMain.Canvas.Font.size := 30;
rptMain.Canvas.Font.Name := 'Arial';
rptMain.Canvas.TextOut(10,20,'Test');
rptMain.Canvas.Ellipse(200,300,400,700);
end;
</pre>
<br>
<br>So geht es aber anscheinend nicht.
<br>
<br>mfg
<br>PS

[Patrick Sack]

Hi,
<br>
<br>gibt es nicht irgendwo eine solche Komponente?
<br>
<br>mfg
<br>p

[Bruno Danuseg]

Hallo Patrick,<p>
QR-Komponenten müssen von TQRPrintable abgeleitet sein.<p>
Es gibt eine Komponente für gedrehten Text bei <a href="http://www.thsd.de">http://www.thsd.de</a>.<p>
Allerdings nicht for free (QR Powerpack). QRDesign aus dem gleichen Hause habe ich selbst im Einsatz und kann es wärmstens empfehlen

[Patrick Sack]

Danke!
<br>
<br>Habe es bestellt.
<br>
<br>mfg
<br>P

[Ralf Jansen]

Hallo,

natürlich kann man bei QReport auch direkt auf den Canvas schreiben.
Man muß nur den Canvas von QRPrinter nehmen und dann daran denken das Bänder nicht transparent sind. D.h. das wenn man in BeforePrint auf den Canvas schreibt, wird der Text sehr wahrscheinlich von einem Band wieder verdeckt.

Grüße
Ralf Janse

[Bruno Danuseg]

Hallo, <p>
sicher ist das möglich (Beispiel DrawDirect von QR: Dort wird direkt auf dem QRPrinter-Canvas geschrieben, um die Lücken bei vertikalen Linien zwischen Bands zu schliessen). Ich denke aber, das dies für gedrehte Label nicht der optimale Weg ist. Leitet man von TQRPrintable eine Komponente ab, so braucht man sich um die Anpassung der Bands usw. keine Gedanken zu machen