quickreport einsteigerhilfe ???

[Gigant02]

hallo ich wollte mich mal in das thema quickreport einarbeiten

also ich will eine Seite drucken da soll z.B. ein recht eck drauf abgebildet sein und darin möchte ich gerne einen Text schreiben.


wie muss ich das machen ???

wo finde ich eine gute anleitung dafür ?

lg, Gigant

[mikhal]

Tutorial z.B. bei DSDT.

Oder auf Englisch.

Grüße
Mikhal

[Gigant02]

hey danke

also ich werde das mal durcharbeiten

hat jemand vielleicht ein ähnliches einfes demo programm für mich ??

lg, Gigant

[MrSpock]

Hallo Gigant02,

vielleicht habe ich das Problem nicht verstanden :gruebel: . Ich habe mal ein kleines Beispiel angehängt.

[Gigant02]

hey danke für den test code

hmm noch habe ich kein problem ich habe nur noch keine ahnung wie ich daran gehe das ist mein problem

lg, Gigant

[Gigant02]

hmm ich habe mir das gerade angesehen und meine frage ist

ist das alles ????

ist ja einfach lach

ist echt der hammer mehr habe ich garnicht gesucht und es ist echt total simpel

besten dank nochmal

lg, Gigant

[MrSpock]

Hallo gigant02,

ja, das ist alles. Deshalb war ich so überrascht. Aber wenn du noch nie mit QR gearbeitet hast (und das gilt natürlich auch für all die anderen Reportgeneratoren), dann ist ein einfaches Beispiel manchmal schon ne Menge Wert.

[Gigant02]

ja stimmt danke

aber ich habe noch eine frage

und zwar wie kann ich ein label um 90 grad drehen ???

lg, Gigant

[Gigant02]

hmm das muss doch irgendwie gehen

ich will ein CD-Cover bedrucken und an den rändern soll das ganz klar seitlich sein

wie mache ich das ???

ich bin schon an rumprobieren komme aber noch nicht recht drauf und in der oh finde ich auch nicht viel

lg, Gigant

[MrSpock]

Hallo Gigant02,

Zitat:

Zitat von Gigant02

... und an den rändern soll das ganz klar seitlich sein

was genau meinst du damit?

[Gigant02]

hmm wie soll ich das sagen

an besten die schrift in label um 90 grad drehen

lg, Gigant

[MrSpock]

Hallo Gigant02,

das ist leider für Quickreport kein Einsteigerthema mehr :mrgreen: .

Du kannst da nur den Trick anwenden, dass du den Font als solchen drehst und ihn dann dem Label zuweist.

Etwa so:

Delphi-Quellcode:

procedure TForm2.QRLabel1Print(sender: TObject; var Value: String);
var
   lf : TLogFont;
   tf : TFont;
begin
   with QRLabel1 do begin
     tf := TFont.Create;
     tf.Assign(Font);
     GetObject(tf.Handle, sizeof(lf), @lf);
     lf.lfEscapement := 900;
     lf.lfOrientation := 900;
     tf.Handle := CreateFontIndirect(lf);
     Font.Assign(tf);
     QRLabel1.Font.Assign(tf);
     tf.Free;
   end;
end;

[MarcoWarm]

oder ein wenig einfacher mit dieser Komponente :zwinker:

http://www.torry.net/quicksearchd.ph...abel&Title=Yes

[Gigant02]

Zitat:

Zitat von MrSpock

Hallo Gigant02,

das ist leider für Quickreport kein Einsteigerthema mehr :mrgreen: .

Du kannst da nur den Trick anwenden, dass du den Font als solchen drehst und ihn dann dem Label zuweist.

Etwa so:

Delphi-Quellcode:

procedure TForm2.QRLabel1Print(sender: TObject; var Value: String);
var
   lf : TLogFont;
   tf : TFont;
begin
   with QRLabel1 do begin
     tf := TFont.Create;
     tf.Assign(Font);
     GetObject(tf.Handle, sizeof(lf), @lf);
     lf.lfEscapement := 900;
     lf.lfOrientation := 900;
     tf.Handle := CreateFontIndirect(lf);
     Font.Assign(tf);
     QRLabel1.Font.Assign(tf);
     tf.Free;
   end;
end;

so nun habe ich endlich mein programm nach längeren soweit das ich ausgiebig testen wollte nun da habe ich mal ausgedruckt und gemerkt in der vorschau geht alles so wie es soll aber der ausdruck selber sind die label's nicht gedreht worden

wie kann ich das ändern ???

lg, Gigant