Entwickler-Ecke

Grafische Benutzeroberflächen (VCL & FireMonkey) - Beim Drucken eine Überschrift aufs Papier "zaubern"


AceTheFace - Mo 26.08.02 14:57
Titel: Beim Drucken eine Überschrift aufs Papier "zaubern"
Hallo,

ich druck mein StringGrid mir folgender Prozedur:

http://home.pages.at/dbr-software/delphi/griddr.htm

Dabei wird aber eben nur das StringGrid an sich gedruckt. Wie schaffe ich es, dass er zusätzlich noch eine Überschrift über das Grid druckt?

Gruss und Danke!

Ace


Renegade - Mo 26.08.02 21:49

Habs nur mal kurz überflogen - müßte aber folgendermaßen funze:

Vor der Zeile for x:=vSpalte to bSpalte do begin
müsstes du folgende Zeile einfügen

Quelltext
1:
drawtext(canvas.handle,pchar('Hallo',length('Hallo'),r,DT_SINGLELINE or DT_VCENTER);                    


Habe es nicht getestet oder so. Kann auch sein das du noch die Position angeben mußt.

Naja hoffe das hilft dir zumindest ein bischen.


Gruß Renegade


AceTheFace - Di 27.08.02 14:54

Zitat:

Habe es nicht getestet oder so. Kann auch sein das du noch die Position angeben mußt.


Wie gebe ich denn dem Text eine absolute Position auf dem Blatt? Habe es bis jetzt nur geschafft, dass er den Text in eine Zelle des StringGrids schreibt... :(

Trotzdem mal ein erstes Dankeschön!

Gruss,

Ace